Mercurial > hg > xemacs-beta
comparison src/signal.c @ 44:8d2a9b52c682 r19-15prefinal
Import from CVS: tag r19-15prefinal
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:55:10 +0200 |
parents | 441bb1e64a06 |
children | 131b0175ea99 |
comparison
equal
deleted
inserted
replaced
43:23cafc5d2038 | 44:8d2a9b52c682 |
---|---|
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 |