file - プロローグファイルですべてのスペースとセンドを削除するにはどうすればよいですか?

Question

ファイルを読み込んですべてのスペースを削除し、これらを送信 (nl) して、すべてをリストに入れたいと思います。

例:

myfile.txt = (First Line (Second ( line ) and Third and other)
To List = [FirstLine(Second(line)andthirdandother)]

それはどのように達成できますか？

ありがとう

Answer 1

Prolog にread_file_to_codes /3 やcode_type /2 などの適切なビルトインがある場合は、この方法で実行できます。

file_to_list(File, List) :-
  read_file_to_codes(File, Codes, []),
  exclude(bad_char, Codes, List).

bad_char(C) :-
  code_type(C, space).