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

maintain compatibility with olde linuxen.

Browse Source
This commit is contained in:
Vitor Santos Costa
2018-09-29 14:43:27 -05:00
parent 87c6971bb6
commit f57377a23a
14 changed files with 57 additions and 54 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
C/cdmgr.c Normal file → Executable file
View File

@@ -3082,6 +3082,7 @@ static Int p_clean_up_dead_clauses(USES_REGS1) {
void Yap_HidePred(PredEntry *pe) {
pe->PredFlags |= (HiddenPredFlag | NoSpyPredFlag | NoTracePredFlag);
/*
char newMod[1024];
strncpy(newMod, "$$$--hidden-module--",1023);
Term cmod = pe->ModuleOfPred;
@@ -3090,6 +3091,7 @@ void Yap_HidePred(PredEntry *pe) {
else
strncat(newMod, RepAtom(AtomOfTerm(cmod))->StrOfAE, 1023-strlen(newMod));
pe->ModuleOfPred = MkAtomTerm(Yap_LookupAtom(newMod));
*/
}
static Int /* $system_predicate(P) */