在 Prolog 中读取字符串（从文件中）

Question

我在 Prolog 中编写了一个词法分析器和一个解析器。它将字符串与其 AST 统一起来。这是我正在处理的编译器/解释器项目的一部分。自然，我现在想从文件中读取字符串来解析它。但是，我为此找到的谓词是 read，它只读取 Prolog 原子和谓词，例如带有

的文件

hello.

我一直在玩弄 double_quotes 设置，但没有成功。

我希望能够读取这样的文件

let id = \x.x in id (S (S Z))

然后将此字符串发送到解析谓词。

Answer 1

您可以使用read_line_to_codes/2 或read_line_to_codes/3。从stdin 读取单独的行并将它们打印到stdout 的示例程序如下：

read_lines([H|T]) :-
  read_line_to_codes(user_input, H), H \= end_of_file, read_lines(T).
read_lines([]).

write_lines([]).
write_lines([H|T]) :-
  writef("%s\n", [H]), write_lines(T).

main :-
  read_lines(X), write_lines(X).

（这里使用writef/2进行打印。）还有read_stream_to_codes/2和read_stream_to_codes/3，它们与行无关。以下代码将所有来自标准输入的输入一次性打印到标准输出：

main :-
  read_stream_to_codes(user_input, X), writef("%s", [X]).

当然，也可以从文件而不是标准输入中读取。有关更多信息，请参阅 readutil 库。