scsh-conservatory
/
scsh-0.6
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

itimer moved to syscalls but is implemented via rts/events.scm

This commit is contained in:
mainzelm 2001-01-09 15:55:03 +00:00
parent c1d6d368e5
commit 31894f1894
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
scsh/syscalls.scm
View File

@ -612,7 +612,8 @@
(else (error "Illegal proc passed to signal-process-group" (else (error "Illegal proc passed to signal-process-group"
proc-group)))) proc-group))))
signal)) signal))
(define (itimer sec)
((structure-ref events schedule-timer-interrupt!) (* sec 1000)))
;;; SunOS, not POSIX: ;;; SunOS, not POSIX:
;;; (define-foreign signal-process-group/errno ;;; (define-foreign signal-process-group/errno
;;; (killpg (integer proc-group) (integer signal)) ;;; (killpg (integer proc-group) (integer signal))