我發現下面的序言碼一次讀取一個字符,並打印出來。
process(File) :-
open('C:/Users/BHARAT/Desktop/a.txt', read, In),
get_char(In, Char1),
process_stream(Char1, In),
close(In).
process_stream(end_of_file, _) :- !.
process_stream(Char, In) :-
print(Char),
get_char(In, Char2),
process_stream(Char2, In).
但如果文件有多條線路,有沒有辦法在一個時間閱讀1整條生產線,這樣就容易進行符號化。