我正在学习 Ocaml,我需要创建一个可以通过以下方式与用户交互的程序:
Program: "Welcome!"
User: command1 arg1 arg2
program: "The answer is..."
User: command2 arg
program: "The answer is..."
User: exit
我需要一个循环方案来制作类似的东西
最佳答案
这是一个循环,它将读取输入行,直到它到达文件末尾,或者看到一行显示“退出”。
let rec loop () =
match read_line () with
| "exit" -> ()
| s -> Printf.printf "I saw %s\n%!" s; loop ()
| exception End_of_file -> ()
要在源文件中调用这个循环,可以这样:
let () = loop ()
要在顶层尝试它(OCaml REPL):
# loop ();;
关于input - 如何制作互动节目?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/43267452/