summaryrefslogtreecommitdiff
path: root/libguile/scmsigs.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/scmsigs.c')
-rw-r--r--libguile/scmsigs.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/scmsigs.c b/libguile/scmsigs.c
index 33afc8391..618506ea7 100644
--- a/libguile/scmsigs.c
+++ b/libguile/scmsigs.c
@@ -333,7 +333,7 @@ SCM_DEFINE (scm_sigaction_for_thread, "sigaction", 1, 3, 0,
|| SCM_NUM2LONG (2, handler) == (long) SIG_IGN)
{
#ifdef HAVE_SIGACTION
- action.sa_handler = (SIGRETTYPE (*) (int)) scm_to_int (handler);
+ action.sa_handler = (SIGRETTYPE (*) (int)) scm_to_long (handler);
#else
chandler = (SIGRETTYPE (*) (int)) scm_to_int (handler);
#endif