diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

new atoms, terms and slight functionality

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files

69
H/ihstruct.h
View File

@@ -85,8 +85,51 @@
#ifdef EUROTRA
TermDollarU = MkAtomTerm(AtomDollarU);
#endif
TermAppend = MkAtomTerm(AtomAppend);
TermAtom = MkAtomTerm(AtomAtom);
TermBinary = MkAtomTerm(AtomBinary);
TermBoolean = MkAtomTerm(AtomBoolean);
TermChars = MkAtomTerm(AtomChars);
TermCodes = MkAtomTerm(AtomCodes);
TermCompact = MkAtomTerm(AtomCompact);
TermDec10 = MkAtomTerm(AtomDec10);
TermDots = MkAtomTerm(AtomDots);
TermEof = MkAtomTerm(AtomEof);
TermEOfCode = MkAtomTerm(AtomEOfCode);
TermError = MkAtomTerm(AtomError);
TermException = MkAtomTerm(AtomException);
TermFail = MkAtomTerm(AtomFail);
TermFalse = MkAtomTerm(AtomFalse);
TermFloat = MkAtomTerm(AtomFloat);
TermGlobal = MkAtomTerm(AtomGlobal);
TermIgnore = MkAtomTerm(AtomIgnore);
TermInteger = MkAtomTerm(AtomInteger);
TermMax = MkAtomTerm(AtomMax);
TermModule = MkAtomTerm(AtomModule);
TermMulti = MkAtomTerm(AtomMulti);
TermOff = MkAtomTerm(AtomOff);
TermOn = MkAtomTerm(AtomOn);
TermPortray = MkAtomTerm(AtomPortray);
TermProlog = MkAtomTerm(AtomProlog);
TermQuiet = MkAtomTerm(AtomQuiet);
TermRead = MkAtomTerm(AtomRead);
TermReadOnly = MkAtomTerm(AtomReadOnly);
TermReadWrite = MkAtomTerm(AtomReadWrite);
TermReFoundVar = MkAtomTerm(AtomRefoundVar);
TermReset = MkAtomTerm(AtomReset);
TermSilent = MkAtomTerm(AtomSilent);
TermSingle = MkAtomTerm(AtomSingle);
TermSource = MkAtomTerm(AtomSource);
TermString = MkAtomTerm(AtomString);
TermSymbolChar = MkAtomTerm(AtomSymbolChar);
TermTerm = MkAtomTerm(AtomTerm);
TermText = MkAtomTerm(AtomText);
TermThread = MkAtomTerm(AtomThread);
TermTrue = MkAtomTerm(AtomTrue);
TermWarning = MkAtomTerm(AtomWarning);
TermWrite = MkAtomTerm(AtomWrite);
TermXml = MkAtomTerm(AtomXml);
USER_MODULE = MkAtomTerm(AtomUser);
IDB_MODULE = MkAtomTerm(AtomIDB);
ATTRIBUTES_MODULE = MkAtomTerm(AtomAttributes);
@@ -111,6 +154,12 @@
Yap_InitModules();
Yap_InitPlIO();
Yap_InitFlags(true);
Yap_ExecutionMode = INTERPRETED;
InitPredHash();
@@ -267,22 +316,8 @@
#endif
InitFlags();
OpList = NULL;
CharConversionTable = NULL;
CharConversionTable2 = NULL;
ParserErrorStyle = EXCEPTION_ON_PARSER_ERROR;
Yap_LibDir = NULL;
Yap_ForeignDir = NULL;
Yap_CommonsDir = NULL;
Yap_BinDir = NULL;
LastWtimePtr = NULL;
ForeignCodeLoaded = NULL;
ForeignCodeBase = NULL;
ForeignCodeTop = NULL;
@@ -299,10 +334,10 @@
InitEmptyWakeups();
MaxEmptyWakeups = 0;
SWI_BlobTypes = NULL;
SWI_Blobs = NULL;
BlobTypes = NULL;
Blobs = NULL;
NOfBlobs = 0;
NOfBlobsMax = 256;
#if defined(YAPOR) || defined(THREADS)
INIT_LOCK(SWI_Blobs_Lock);
INIT_LOCK(Blobs_Lock);
#endif