From f133ff279ec8fffa55691a837244a9680275cd6b Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?V=C3=ADtor=20Santos=20Costa?= Date: Thu, 5 Nov 2015 15:31:09 +0000 Subject: [PATCH] use same name for function and predicate. --- C/signals.c | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/C/signals.c b/C/signals.c index 6db8c24d9..f31005e0b 100755 --- a/C/signals.c +++ b/C/signals.c @@ -325,7 +325,7 @@ void Yap_debug_end_loop(void) #endif static Int -p_first_signal( USES_REGS1 ) +first_signal( USES_REGS1 ) { Atom at; yap_signals sig; @@ -440,9 +440,9 @@ p_first_signal( USES_REGS1 ) } static Int -p_continue_signals( USES_REGS1 ) +continue_signals( USES_REGS1 ) { - return p_first_signal( PASS_REGS1 ); + return first_signal( PASS_REGS1 ); } void @@ -453,8 +453,8 @@ Yap_InitSignalCPreds(void) Yap_InitCPred("$creep_fail", 0, p_creep_fail, SafePredFlag); Yap_InitCPred("$stop_creeping", 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 ("$continue_signals", 0, p_continue_signals, SafePredFlag|SyncPredFlag); + Yap_InitCPred ("$first_signal", 1, first_signal, SafePredFlag|SyncPredFlag); + Yap_InitCPred ("$continue_signals", 0, continue_signals, SafePredFlag|SyncPredFlag); Yap_InitCPred("creep_allowed", 0, creep_allowed, 0); #ifdef DEBUG Yap_InitCPred("sys_debug", 1, p_debug, SafePredFlag|SyncPredFlag);