3

Turbo的保存功能是否有任何SWI的类似物,它保存到文件事实中,之前通过咨询加载,然后通过断言附加?

4

1 回答 1

3

我没有在手册中找到任何类似保存的功能。可以尝试以下替换:

% Save whole DB into file
save(FileName) :-
  open(FileName, update, F),
  with_output_to(S, listing),
  close(F).

甚至更短:

save(FileName) :-
  tell(FileName), listing, told.
于 2012-02-25T09:49:25.507 回答