support ply
This commit is contained in:
parent
fe8544c01e
commit
bdeea3b15e
@ -82,6 +82,7 @@ otherwise.
|
|||||||
'eam.yap',
|
'eam.yap',
|
||||||
'chtypes.yap',
|
'chtypes.yap',
|
||||||
'yapor.yap',
|
'yapor.yap',
|
||||||
|
'qly.yap',
|
||||||
'udi.yap'].
|
'udi.yap'].
|
||||||
|
|
||||||
:- dynamic prolog:'$user_defined_flag'/4.
|
:- 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