Small updates

This commit is contained in:
Matthieu Dubuget
2021-05-24 11:02:34 +02:00
parent ad72fdeb0b
commit c50e512184
5 changed files with 11 additions and 38 deletions

View File

@ -1,5 +1,5 @@
let rec parse_and_print () =
print_string "Entier ? > ";
print_string "Entier (Ou [Q]uitter [H]elp) ? > ";
flush stdout;
input_line stdin |> function
| "q" | "Q" -> ()