prompt
This commit is contained in:
@@ -2322,7 +2322,7 @@ static Int new_system_predicate(
|
||||
}
|
||||
|
||||
static Int
|
||||
p_is_system_predicate(USES_REGS1) { /* '$is_multifile'(+S,+Mod) */
|
||||
is_system_predicate(USES_REGS1) { /* '$is_multifile'(+S,+Mod) */
|
||||
PredEntry *pe;
|
||||
Term t1 = Deref(ARG1);
|
||||
|
||||
@@ -2341,7 +2341,7 @@ static Int
|
||||
}
|
||||
|
||||
static Int
|
||||
p_is_opaque_predicate(USES_REGS1) { /* '$is_multifile'(+S,+Mod) */
|
||||
is_opaque_predicate(USES_REGS1) { /* '$is_multifile'(+S,+Mod) */
|
||||
PredEntry *pe;
|
||||
Term t1 = Deref(ARG1);
|
||||
bool out;
|
||||
@@ -4323,9 +4323,9 @@ void Yap_InitCdMgr(void) {
|
||||
TestPredFlag | SafePredFlag);
|
||||
Yap_InitCPred("$new_system_predicate", 3, new_system_predicate,
|
||||
SafePredFlag | SyncPredFlag);
|
||||
Yap_InitCPred("$is_system_predicate", 2, p_is_system_predicate,
|
||||
Yap_InitCPred("$is_system_predicate", 2, is_system_predicate,
|
||||
TestPredFlag | SafePredFlag);
|
||||
Yap_InitCPred("$is_opaque_predicate", 2, p_is_opaque_predicate,
|
||||
Yap_InitCPred("$is_opaque_predicate", 2, is_opaque_predicate,
|
||||
TestPredFlag | SafePredFlag);
|
||||
Yap_InitCPred("$new_discontiguous", 3, p_new_discontiguous,
|
||||
SafePredFlag | SyncPredFlag);
|
||||
|
Reference in New Issue
Block a user