support ply
This commit is contained in:
parent
fe8544c01e
commit
bdeea3b15e
@ -82,6 +82,7 @@ otherwise.
|
||||
'eam.yap',
|
||||
'chtypes.yap',
|
||||
'yapor.yap',
|
||||
'qly.yap',
|
||||
'udi.yap'].
|
||||
|
||||
:- dynamic prolog:'$user_defined_flag'/4.
|
||||
|
24
pl/qly.yap
Normal file
24
pl/qly.yap
Normal file
@ -0,0 +1,24 @@
|
||||
|
||||
/*************************************************************************
|
||||
* *
|
||||
* YAP Prolog *
|
||||
* *
|
||||
* Yap Prolog was developed at NCCUP - Universidade do Porto *
|
||||
* *
|
||||
* Copyright L.Damas, V.S.Costa and Universidade do Porto 1985-2011 *
|
||||
* *
|
||||
**************************************************************************
|
||||
* *
|
||||
* File: qly.yap *
|
||||
* Last rev: *
|
||||
* mods: *
|
||||
* comments: fast save/restore *
|
||||
* *
|
||||
*************************************************************************/
|
||||
|
||||
save_module(Mod) :-
|
||||
atom_concat(Mod,'.qly',F),
|
||||
open(F,write,S),
|
||||
'$save_module_preds'(S, Mod),
|
||||
close(S).
|
||||
|
Reference in New Issue
Block a user