add missing predicate.
This commit is contained in:
parent
e27ceac1aa
commit
4dc28bc48a
2
C/exec.c
2
C/exec.c
@ -1946,6 +1946,8 @@ Yap_InitExecFs(void)
|
|||||||
Yap_InitCPred("$execute0", 2, p_execute0, 0);
|
Yap_InitCPred("$execute0", 2, p_execute0, 0);
|
||||||
Yap_InitCPred("$execute_nonstop", 2, p_execute_nonstop, 0);
|
Yap_InitCPred("$execute_nonstop", 2, p_execute_nonstop, 0);
|
||||||
Yap_InitCPred("$execute_clause", 4, p_execute_clause, 0);
|
Yap_InitCPred("$execute_clause", 4, p_execute_clause, 0);
|
||||||
|
Yap_InitCPred("$current_choice_point", 1, p_save_cp, 0);
|
||||||
|
Yap_InitCPred("$current_choicepoint", 1, p_save_cp, 0);
|
||||||
CurrentModule = HACKS_MODULE;
|
CurrentModule = HACKS_MODULE;
|
||||||
Yap_InitCPred("current_choice_point", 1, p_save_cp, 0);
|
Yap_InitCPred("current_choice_point", 1, p_save_cp, 0);
|
||||||
Yap_InitCPred("current_choicepoint", 1, p_save_cp, 0);
|
Yap_InitCPred("current_choicepoint", 1, p_save_cp, 0);
|
||||||
|
Reference in New Issue
Block a user