new atoms, terms and slight functionality

This commit is contained in:
Vítor Santos Costa
2015-06-19 00:56:24 +01:00
parent 3b42554a68
commit 5746edafaf
23 changed files with 699 additions and 143 deletions

View File

@@ -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