fix flags
This commit is contained in:
parent
792f3e9dd9
commit
c927cd5133
@ -662,7 +662,7 @@ Yap_InitErrorPreds( void )
|
||||
CACHE_REGS
|
||||
Term cm = CurrentModule;
|
||||
CurrentModule = ERROR_MODULE;
|
||||
Yap_InitCPred("is_boolean", 2, is_boolean, 0L);
|
||||
Yap_InitCPred("is_callable", 2, is_callable, 0L);
|
||||
Yap_InitCPred("is_boolean", 2, is_boolean, TestPredFlag);
|
||||
Yap_InitCPred("is_callable", 2, is_callable, TestPredFlag);
|
||||
CurrentModule = cm;
|
||||
}
|
||||
|
Reference in New Issue
Block a user