mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-21 20:20:24 +02:00
Code Activity

Treat 'SIG_IGN' as a pointer.

Browse source 
* 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.
This commit is contained in:
Ludovic Courtès 2016-10-11 10:57:43 +02:00 • committed by Andy Wingo
parent 1107db3eb1
commit 7d6f309ccd
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
libguile/posix.c
View file

@ -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