diff options
Diffstat (limited to 'libguile/scmsigs.c')
-rw-r--r-- | libguile/scmsigs.c | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/libguile/scmsigs.c b/libguile/scmsigs.c index c36c83d98..bdbf525e7 100644 --- a/libguile/scmsigs.c +++ b/libguile/scmsigs.c @@ -51,6 +51,7 @@ #include "libguile/async.h" #include "libguile/eval.h" +#include "libguile/root.h" #include "libguile/vectors.h" #include "libguile/validate.h" @@ -166,9 +167,7 @@ sys_deliver_signals (void) #ifndef HAVE_SIGACTION signal (i, take_signal); #endif - scm_apply (SCM_VELTS (*signal_handlers)[i], - SCM_LIST1 (SCM_MAKINUM (i)), - SCM_EOL); + scm_call_1 (SCM_VELTS (*signal_handlers)[i], SCM_MAKINUM (i)); } } return SCM_UNSPECIFIED; |