scsh-0.5/scsh/cxux/signals.scm

36 lines
1.2 KiB
Scheme

;;; Signal constant definitions for "m88k-cxux"
;;; Copyright (c) 1994 by Olin Shivers.
;;; Copyright (c) 1994 by Brian D. Carlstrom.
(define-syntax define-signals
(syntax-rules ()
((define-signals form ...)
(begin (define-enum-constant "signal" . form) ...))))
;;POSIX only defined here.
(define-signals
;; POSIX
(hup 1) ; hangup
(int 2) ; interrupt
(quit 3) ; quit
(ill 4) ; illegal instruction (not reset when caught)
(iot 6) ; IOT instruction
(abrt 6) ; used by abort, replace SIGIOT in the future
(fpe 8) ; floating point exception
(kill 9) ; kill (cannot be caught or ignored)
(segv 11) ; segmentation violation
(pipe 13) ; write on a pipe with no one to read it
(alrm 14) ; alarm clock
(term 15) ; software termination signal from kill
(stop 23) ; sendable stop signal not from tty
(tstp 24) ; stop signal from tty
(cont 25) ; continue a stopped process
(chld 18) ; to parent on child stop or exit
(ttin 26) ; to readers pgrp upon background tty read
(ttou 27) ; like TTIN for output if (tp->t_local&LTOSTOP)
;; User defined
(usr1 16) ; user defined signal 1
(usr2 17) ; user defined signal 2
)