new atoms, terms and slight functionality
This commit is contained in:
69
H/rhstruct.h
69
H/rhstruct.h
@@ -85,8 +85,51 @@
|
||||
#ifdef EUROTRA
|
||||
TermDollarU = AtomTermAdjust(TermDollarU);
|
||||
#endif
|
||||
TermAppend = AtomTermAdjust(TermAppend);
|
||||
TermAtom = AtomTermAdjust(TermAtom);
|
||||
TermBinary = AtomTermAdjust(TermBinary);
|
||||
TermBoolean = AtomTermAdjust(TermBoolean);
|
||||
TermChars = AtomTermAdjust(TermChars);
|
||||
TermCodes = AtomTermAdjust(TermCodes);
|
||||
TermCompact = AtomTermAdjust(TermCompact);
|
||||
TermDec10 = AtomTermAdjust(TermDec10);
|
||||
TermDots = AtomTermAdjust(TermDots);
|
||||
TermEof = AtomTermAdjust(TermEof);
|
||||
TermEOfCode = AtomTermAdjust(TermEOfCode);
|
||||
TermError = AtomTermAdjust(TermError);
|
||||
TermException = AtomTermAdjust(TermException);
|
||||
TermFail = AtomTermAdjust(TermFail);
|
||||
TermFalse = AtomTermAdjust(TermFalse);
|
||||
TermFloat = AtomTermAdjust(TermFloat);
|
||||
TermGlobal = AtomTermAdjust(TermGlobal);
|
||||
TermIgnore = AtomTermAdjust(TermIgnore);
|
||||
TermInteger = AtomTermAdjust(TermInteger);
|
||||
TermMax = AtomTermAdjust(TermMax);
|
||||
TermModule = AtomTermAdjust(TermModule);
|
||||
TermMulti = AtomTermAdjust(TermMulti);
|
||||
TermOff = AtomTermAdjust(TermOff);
|
||||
TermOn = AtomTermAdjust(TermOn);
|
||||
TermPortray = AtomTermAdjust(TermPortray);
|
||||
TermProlog = AtomTermAdjust(TermProlog);
|
||||
TermQuiet = AtomTermAdjust(TermQuiet);
|
||||
TermRead = AtomTermAdjust(TermRead);
|
||||
TermReadOnly = AtomTermAdjust(TermReadOnly);
|
||||
TermReadWrite = AtomTermAdjust(TermReadWrite);
|
||||
TermReFoundVar = AtomTermAdjust(TermReFoundVar);
|
||||
TermReset = AtomTermAdjust(TermReset);
|
||||
TermSilent = AtomTermAdjust(TermSilent);
|
||||
TermSingle = AtomTermAdjust(TermSingle);
|
||||
TermSource = AtomTermAdjust(TermSource);
|
||||
TermString = AtomTermAdjust(TermString);
|
||||
TermSymbolChar = AtomTermAdjust(TermSymbolChar);
|
||||
TermTerm = AtomTermAdjust(TermTerm);
|
||||
TermText = AtomTermAdjust(TermText);
|
||||
TermThread = AtomTermAdjust(TermThread);
|
||||
TermTrue = AtomTermAdjust(TermTrue);
|
||||
TermWarning = AtomTermAdjust(TermWarning);
|
||||
TermWrite = AtomTermAdjust(TermWrite);
|
||||
TermXml = AtomTermAdjust(TermXml);
|
||||
|
||||
USER_MODULE = AtomTermAdjust(USER_MODULE);
|
||||
IDB_MODULE = AtomTermAdjust(IDB_MODULE);
|
||||
ATTRIBUTES_MODULE = AtomTermAdjust(ATTRIBUTES_MODULE);
|
||||
@@ -113,6 +156,12 @@
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
RestorePredHash();
|
||||
#if defined(YAPOR) || defined(THREADS)
|
||||
|
||||
@@ -267,22 +316,8 @@
|
||||
|
||||
#endif
|
||||
|
||||
|
||||
|
||||
OpList = OpListAdjust(OpList);
|
||||
|
||||
CharConversionTable = CodeCharPAdjust(CharConversionTable);
|
||||
CharConversionTable2 = CodeCharPAdjust(CharConversionTable2);
|
||||
|
||||
|
||||
|
||||
Yap_LibDir = CodeConstCharPAdjust(Yap_LibDir);
|
||||
Yap_ForeignDir = CodeConstCharPAdjust(Yap_ForeignDir);
|
||||
Yap_CommonsDir = CodeConstCharPAdjust(Yap_CommonsDir);
|
||||
Yap_BinDir = CodeConstCharPAdjust(Yap_BinDir);
|
||||
|
||||
LastWtimePtr = CodeVoidPAdjust(LastWtimePtr);
|
||||
|
||||
RestoreForeignCode();
|
||||
|
||||
|
||||
@@ -299,10 +334,10 @@
|
||||
RestoreEmptyWakeups();
|
||||
|
||||
|
||||
RestoreSWIBlobTypes();
|
||||
RestoreSWIBlobs();
|
||||
RestoreBlobTypes();
|
||||
RestoreBlobs();
|
||||
|
||||
|
||||
#if defined(YAPOR) || defined(THREADS)
|
||||
REINIT_LOCK(SWI_Blobs_Lock);
|
||||
REINIT_LOCK(Blobs_Lock);
|
||||
#endif
|
||||
|
Reference in New Issue
Block a user