2012-02-25 1 views

ответ

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. 
+1

О, спасибо. Это просто потрясающе. –