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