From 2da7ff5f7253bd9ab93c3eb84e4ea9c4cb666957 Mon Sep 17 00:00:00 2001 From: mainzelm Date: Tue, 19 Jun 2001 11:31:27 +0000 Subject: [PATCH] Structure name change. --- scsh/syscalls.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scsh/syscalls.scm b/scsh/syscalls.scm index b4d6e14..e24810c 100644 --- a/scsh/syscalls.scm +++ b/scsh/syscalls.scm @@ -612,7 +612,7 @@ proc-group)))) signal)) (define (itimer sec) - ((structure-ref events schedule-timer-interrupt!) (* sec 1000))) + ((structure-ref scsh-events schedule-timer-interrupt!) (* sec 1000))) ;;; SunOS, not POSIX: ;;; (define-foreign signal-process-group/errno ;;; (killpg (integer proc-group) (integer signal))