// support
This commit is contained in:
parent
801944a0cc
commit
0f121e7f9d
@ -108,7 +108,7 @@
|
|||||||
AtomDoStaticClause = Yap_FullLookupAtom("$do_static_clause");
|
AtomDoStaticClause = Yap_FullLookupAtom("$do_static_clause");
|
||||||
AtomDots = Yap_LookupAtom("dots");
|
AtomDots = Yap_LookupAtom("dots");
|
||||||
AtomDOUBLE = Yap_FullLookupAtom("Double");
|
AtomDOUBLE = Yap_FullLookupAtom("Double");
|
||||||
AtomDoubleDash = Yap_FullLookupAtom("//");
|
AtomDoubleSlash = Yap_FullLookupAtom("//");
|
||||||
AtomE = Yap_LookupAtom("e");
|
AtomE = Yap_LookupAtom("e");
|
||||||
AtomEOFBeforeEOT = Yap_LookupAtom("end_of_file_found_before_end_of_term");
|
AtomEOFBeforeEOT = Yap_LookupAtom("end_of_file_found_before_end_of_term");
|
||||||
AtomEQ = Yap_LookupAtom("=");
|
AtomEQ = Yap_LookupAtom("=");
|
||||||
|
@ -108,7 +108,7 @@
|
|||||||
AtomDoStaticClause = AtomAdjust(AtomDoStaticClause);
|
AtomDoStaticClause = AtomAdjust(AtomDoStaticClause);
|
||||||
AtomDots = AtomAdjust(AtomDots);
|
AtomDots = AtomAdjust(AtomDots);
|
||||||
AtomDOUBLE = AtomAdjust(AtomDOUBLE);
|
AtomDOUBLE = AtomAdjust(AtomDOUBLE);
|
||||||
AtomDoubleDash = AtomAdjust(AtomDoubleDash);
|
AtomDoubleSlash = AtomAdjust(AtomDoubleSlash);
|
||||||
AtomE = AtomAdjust(AtomE);
|
AtomE = AtomAdjust(AtomE);
|
||||||
AtomEOFBeforeEOT = AtomAdjust(AtomEOFBeforeEOT);
|
AtomEOFBeforeEOT = AtomAdjust(AtomEOFBeforeEOT);
|
||||||
AtomEQ = AtomAdjust(AtomEQ);
|
AtomEQ = AtomAdjust(AtomEQ);
|
||||||
|
@ -320,9 +320,9 @@
|
|||||||
Atom AtomDOUBLE_;
|
Atom AtomDOUBLE_;
|
||||||
#define AtomDOUBLE Yap_heap_regs->AtomDOUBLE_
|
#define AtomDOUBLE Yap_heap_regs->AtomDOUBLE_
|
||||||
#define TermDOUBLE MkAtomTerm( Yap_heap_regs->AtomDOUBLE_ )
|
#define TermDOUBLE MkAtomTerm( Yap_heap_regs->AtomDOUBLE_ )
|
||||||
Atom AtomDoubleDash_;
|
Atom AtomDoubleSlash_;
|
||||||
#define AtomDoubleDash Yap_heap_regs->AtomDoubleDash_
|
#define AtomDoubleSlash Yap_heap_regs->AtomDoubleSlash_
|
||||||
#define TermDoubleDash MkAtomTerm( Yap_heap_regs->AtomDoubleDash_ )
|
#define TermDoubleSlash MkAtomTerm( Yap_heap_regs->AtomDoubleSlash_ )
|
||||||
Atom AtomE_;
|
Atom AtomE_;
|
||||||
#define AtomE Yap_heap_regs->AtomE_
|
#define AtomE Yap_heap_regs->AtomE_
|
||||||
#define TermE MkAtomTerm( Yap_heap_regs->AtomE_ )
|
#define TermE MkAtomTerm( Yap_heap_regs->AtomE_ )
|
||||||
|
@ -113,7 +113,7 @@ A DomainError N "domain_error"
|
|||||||
A DoStaticClause F "$do_static_clause"
|
A DoStaticClause F "$do_static_clause"
|
||||||
A Dots N "dots"
|
A Dots N "dots"
|
||||||
A DOUBLE F "Double"
|
A DOUBLE F "Double"
|
||||||
A DoubleDash F "//"
|
A DoubleSlash F "//"
|
||||||
A E N "e"
|
A E N "e"
|
||||||
A EOFBeforeEOT N "end_of_file_found_before_end_of_term"
|
A EOFBeforeEOT N "end_of_file_found_before_end_of_term"
|
||||||
A EQ N "="
|
A EQ N "="
|
||||||
|
Reference in New Issue
Block a user