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

fix duplicated system predicate + android related cleanups

Browse Source
This commit is contained in:
Vítor Santos Costa
2014-06-20 11:13:39 +01:00
parent d0f2f50a8e
commit 74a65633d8
13 changed files with 935 additions and 403 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
C/modules.c
View File

@@ -263,21 +263,6 @@ p_strip_module( USES_REGS1 )
Yap_unify(ARG2, tmod);
}
static Int
p_system_module( USES_REGS1 )
{
Term t1 = Deref(ARG1);
if (t1 == PROLOG_MODULE) {
return TRUE;
}
return t1 == TermProlog ||
t1 == IDB_MODULE ||
t1 == IDB_MODULE ||
t1 == ATTRIBUTES_MODULE ||
t1 == SYSTEM_MODULE ||
t1 == GLOBALS_MODULE;
}
static Int
p_context_module( USES_REGS1 )
{
@@ -351,7 +336,6 @@ Yap_InitModulesC(void)
Yap_InitCPred("$change_module", 1, p_change_module, SafePredFlag|SyncPredFlag);
Yap_InitCPred("strip_module", 3, p_strip_module, SafePredFlag|SyncPredFlag);
Yap_InitCPred("context_module", 1, p_context_module, 0);
Yap_InitCPred("$system_module", 1, p_system_module, 0);
Yap_InitCPredBack("$all_current_modules", 1, 1, init_current_module, cont_current_module,
SafePredFlag|SyncPredFlag);
}