defrec.scm -- trivial doc bug in comments.

jcontrol1.c -- signal handler stuff

signal handler hacking -- added Unix signals to VM's interrupt set.
This commit is contained in:
shivers 1996-08-21 21:29:59 +00:00
parent 3595da3986
commit 6d8929b608
2 changed files with 4 additions and 4 deletions

View File

@ -31,15 +31,15 @@
;;;
;;; - Accessor procedures:
;;; (employee:name emp)
;;; (employee:id-number emp)
;;; (employee:id emp)
;;; (employee:salary emp)
;;; (employee:department emp)
;;; (employee:sex emp)
;;; (employee:married? emp)
;;;
;;; - Setter procedures:
;;; (set-employee:name emp)
;;; (set-employee:id-number emp)
;;; (set-employee:name emp "Janet Q. Random")
;;; (set-employee:id emp 8271)
;;; (set-employee:salary emp 20000)
;;; (set-employee:department emp "Vaporware")
;;; (set-employee:sex emp 'female)

View File

@ -65,7 +65,7 @@ scheme_value set_int_handler(int sig, scheme_value handler, int flags,
}
*oflags = old.sa_flags;
if( old.sa_handler == SIG_IGN ) *ohandler = SCHFALSE;
/* if( old.sa_handler == SIG_IGN ) *ohandler = SCHFALSE;
else if( old.sa_handler == SIG_DFL ) *ohandler = SCHTRUE;
else if( old.sa_handler == scm_handle_sig ) {
*ohandler = ENTER_FIXNUM(0); /* Fix later. */