Mercurial > hg > xemacs-beta

comparison src/signal.c @ 116:9f59509498e1 r20-1b10

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b10
author cvs
date Mon, 13 Aug 2007 09:23:06 +0200
parents cf808b4c4290
children 41ff10fd062f
comparison
equal deleted inserted replaced
115:f109f7dabbe2 116:9f59509498e1
374 If quit-flag is already non-nil, it stops the job right away. */ 374 If quit-flag is already non-nil, it stops the job right away. */
375 375
376 static SIGTYPE 376 static SIGTYPE
377 interrupt_signal (int sig) 377 interrupt_signal (int sig)
378 { 378 {
379 /* This function can GC (?!) */ 379 /* This function can call lisp */
380 /* #### we should NOT be calling lisp from a signal handler, boys
381 and girls */
380 /* Must preserve main program's value of errno. */ 382 /* Must preserve main program's value of errno. */
381 int old_errno = errno; 383 int old_errno = errno;
382 384
383 EMACS_REESTABLISH_SIGNAL (sig, interrupt_signal); 385 EMACS_REESTABLISH_SIGNAL (sig, interrupt_signal);
384 386