summaryrefslogtreecommitdiff
path: root/libguile
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2016-10-11 10:57:43 +0200
committerAndy Wingo <wingo@pobox.com>2017-03-01 19:58:31 +0100
commit7d6f309ccde91711a957485a2fbb82f2e81d4db2 (patch)
tree77ee6cb53d333e4e93ef75a356ad9bbcbc90b767 /libguile
parent1107db3eb193f2afa0aa18d37e3688ad74c77a14 (diff)
Treat 'SIG_IGN' as a pointer.
* libguile/posix.c (scm_system_star): Cast 'SIG_IGN' to 'scm_t_uintptr_t' and use 'scm_from_uintptr_t'. This fixes an 'int-conversion' warning with GCC 6.2.
Diffstat (limited to 'libguile')
-rw-r--r--libguile/posix.c8
1 files changed, 5 insertions, 3 deletions
diff --git a/libguile/posix.c b/libguile/posix.c
index 686b801ff..041b8b129 100644
--- a/libguile/posix.c
+++ b/libguile/posix.c
@@ -1,6 +1,6 @@
/* Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003,
* 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012, 2013,
- * 2014 Free Software Foundation, Inc.
+ * 2014, 2016 Free Software Foundation, Inc.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public License
@@ -1489,10 +1489,12 @@ SCM_DEFINE (scm_system_star, "system*", 0, 0, 1,
scm_dynwind_begin (0);
/* Make sure the child can't kill us (as per normal system call). */
- scm_dynwind_sigaction (SIGINT, scm_from_long ((long) SIG_IGN),
+ scm_dynwind_sigaction (SIGINT,
+ scm_from_uintptr_t ((scm_t_uintptr) SIG_IGN),
SCM_UNDEFINED);
#ifdef SIGQUIT
- scm_dynwind_sigaction (SIGQUIT, scm_from_long ((long) SIG_IGN),
+ scm_dynwind_sigaction (SIGQUIT,
+ scm_from_uintptr_t ((scm_t_uintptr) SIG_IGN),
SCM_UNDEFINED);
#endif