13 lines
214 B
OCaml
13 lines
214 B
OCaml
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!";;
|