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

use same name for function and predicate.

Browse Source
This commit is contained in:
Vítor Santos Costa 2015-11-05 15:31:09 +00:00
parent bc8541666a
commit f133ff279e
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
C/signals.c
View File

@ -325,7 +325,7 @@ void Yap_debug_end_loop(void)
#endif #endif
static Int static Int
p_first_signal( USES_REGS1 ) first_signal( USES_REGS1 )
{ {
Atom at; Atom at;
yap_signals sig; yap_signals sig;
@ -440,9 +440,9 @@ p_first_signal( USES_REGS1 )
} }
static Int static Int
p_continue_signals( USES_REGS1 ) continue_signals( USES_REGS1 )
{ {
return p_first_signal( PASS_REGS1 ); return first_signal( PASS_REGS1 );
} }
void void
@ -453,8 +453,8 @@ Yap_InitSignalCPreds(void)
Yap_InitCPred("$creep_fail", 0, p_creep_fail, SafePredFlag); Yap_InitCPred("$creep_fail", 0, p_creep_fail, SafePredFlag);
Yap_InitCPred("$stop_creeping", 0, stop_creeping, NoTracePredFlag|HiddenPredFlag|SafePredFlag); Yap_InitCPred("$stop_creeping", 0, stop_creeping, NoTracePredFlag|HiddenPredFlag|SafePredFlag);
Yap_InitCPred("$disable_debugging", 0, stop_creeping, NoTracePredFlag|HiddenPredFlag|SafePredFlag); Yap_InitCPred("$disable_debugging", 0, stop_creeping, NoTracePredFlag|HiddenPredFlag|SafePredFlag);
Yap_InitCPred ("$first_signal", 1, p_first_signal, SafePredFlag|SyncPredFlag); Yap_InitCPred ("$first_signal", 1, first_signal, SafePredFlag|SyncPredFlag);
Yap_InitCPred ("$continue_signals", 0, p_continue_signals, SafePredFlag|SyncPredFlag); Yap_InitCPred ("$continue_signals", 0, continue_signals, SafePredFlag|SyncPredFlag);
Yap_InitCPred("creep_allowed", 0, creep_allowed, 0); Yap_InitCPred("creep_allowed", 0, creep_allowed, 0);
#ifdef DEBUG #ifdef DEBUG
Yap_InitCPred("sys_debug", 1, p_debug, SafePredFlag|SyncPredFlag); Yap_InitCPred("sys_debug", 1, p_debug, SafePredFlag|SyncPredFlag);