/[gcl]/gcl/o/usig2.c
ViewVC logotype

Diff of /gcl/o/usig2.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.13 by camm, Sat Sep 6 17:32:14 2003 UTC revision 1.14 by camm, Sun Sep 14 02:43:08 2003 UTC
# Line 145  char safety_required[]={XX,XX,XX,XX,XX,X Line 145  char safety_required[]={XX,XX,XX,XX,XX,X
145                          XX,XX,XX,XX,XX,XX,XX,XX};                          XX,XX,XX,XX,XX,XX,XX,XX};
146    
147  void  void
148  init_safety(void)  gcl_init_safety(void)
149  { safety_required[SIGINT]=sig_try_to_delay;  { safety_required[SIGINT]=sig_try_to_delay;
150    safety_required[SIGALRM]=sig_normal;    safety_required[SIGALRM]=sig_normal;
151  }  }
152        
153  DO_INIT(init_safety();)  DO_INIT(gcl_init_safety();)
154  DEFUN_NEW("SIGNAL-SAFETY-REQUIRED",object,sSsignal_safety_required,SI,2,2,  DEFUN_NEW("SIGNAL-SAFETY-REQUIRED",object,sSsignal_safety_required,SI,2,2,
155            NONE,OI,IO,OO,OO,(fixnum signo,fixnum safety),            NONE,OI,IO,OO,OO,(fixnum signo,fixnum safety),
156        "Set the safety level required for handling SIGNO to SAFETY, or if \        "Set the safety level required for handling SIGNO to SAFETY, or if \

Legend:
Removed from v.1.13  
changed lines
  Added in v.1.14

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26