From 6d8929b608f3f422ce423ec0d1206f9c664a0ea4 Mon Sep 17 00:00:00 2001
From: shivers <shivers>
Date: Wed, 21 Aug 1996 21:29:59 +0000
Subject: [PATCH] defrec.scm -- trivial doc bug in comments. jcontrol1.c --
 signal handler stuff

signal handler hacking -- added Unix signals to VM's interrupt set.
---
 scsh/defrec.scm  | 6 +++---
 scsh/jcontrol1.c | 2 +-
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/scsh/defrec.scm b/scsh/defrec.scm
index 7d09bd1..992886e 100644
--- a/scsh/defrec.scm
+++ b/scsh/defrec.scm
@@ -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)
diff --git a/scsh/jcontrol1.c b/scsh/jcontrol1.c
index ca725cc..6195947 100644
--- a/scsh/jcontrol1.c
+++ b/scsh/jcontrol1.c
@@ -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. */