ocaml - 接收 Stdlib.Scanf.Scan_failure : character '\\n'

Question

我按照指导下载并执行了 utop here ，然后我运行了以下代码:

Scanf.scanf "%d %d"(fun a b -> Printf.printf "%d\n"(a - b));;

在我第一次输入 3 1 时，它运行良好，给出 2 - : unit = (),

但在第二次尝试相同的输入后，它继续给出消息:

Exception:
Stdlib.Scanf.Scan_failure
"scanf: bad input at char number 3: character '\\n' is not a decimal digit".

Answer 1

Scanf 消耗尽可能少的输入。

如果你评价

Scanf.scanf "%d %d" (fun a b -> Printf.printf "%d\n" (a - b))

并发送到标准输入

3 1\n

Scanf 读取并使用 3 1 前缀并将换行符 \n 留在输入缓冲区中。然后下一次调用

Scanf.scanf "%d %d" (fun a b -> Printf.printf "%d\n" (a - b))

将卡在这个剩余的字符上并失败

Stdlib.Scanf.Scan_failure
"scanf: bad input at char number 3: character '\\n' is not a decimal digit".

在这种情况下，您可以使用此 \n 字符

Scanf.scanf "\n" ();
Scanf.scanf "%d %d" (-);;

或

Scanf.scanf "\n%d %d" (-);;

但是，更好的解决方案可能是在您的输入格式中添加换行符:

Scanf.scanf "%d %d\n" (fun a b -> Printf.printf "%d\n" (a - b))