diff --git a/scsh/sighandlers.scm b/scsh/sighandlers.scm
index 13e731c..6dfbb71 100644
--- a/scsh/sighandlers.scm
+++ b/scsh/sighandlers.scm
@@ -26,7 +26,7 @@
 ;;; * Only during a F_SETLKW
 ;;;
 ;;; From rts/interrupt.scm (package interrupts, interface interrupts-interface)
-;;;     WITH-INTERRUPTS INTERRUPT-HANDLERS SET-ENABLED-INTERRUPTS 
+;;;     WITH-INTERRUPTS INTERRUPT-HANDLERS SET-ENABLED-INTERRUPTS !
 ;;;	ENABLED-INTERRUPTS
 ;;; Must define WITH-INTERRUPTS* and WITH-INTERRUPTS.
 
@@ -54,6 +54,11 @@
 	(lp (cdr ints) (bitwise-ior ans (arithmetic-shift 1 (- (car ints) 1))))
 	ans)))
 
+;;; I'm trying to be consistent about the ! suffix -- I don't use it
+;;; when frobbing process state. This is not a great rule; perhaps I
+;;; should change it.
+(define set-enabled-interrupts set-enabled-interrupts!)
+
 (define-simple-syntax (with-enabled-interrupts mask body ...)
   (with-interrupts mask (lambda () body ...)))