Add OCaml parrot.

ocaml/main.ml

@@ -0,0 +1,12 @@
+let evaluate str =
+  str;;
+
+try
+  while true do
+    print_string "> ";
+    let line = read_line () in
+    let answer = evaluate line in
+    print_endline answer
+  done;
+with
+  End_of_file -> print_endline "Bye!";;