parent
3239ff9076
commit
269b603081
|
@ -142,10 +142,11 @@
|
|||
(int->signal int)) => ; to ignored.
|
||||
(lambda (sig)
|
||||
(%set-unix-signal-handler sig 0)))
|
||||
|
||||
((and handler (not ohandler) ; Toggling from ignored
|
||||
(int->signal int)) => ; to something.
|
||||
(lambda (sig)
|
||||
(%set-unix-signal-handler sig 2))))
|
||||
(lambda (sig)
|
||||
(%set-unix-signal-handler sig 2))))
|
||||
|
||||
ohandler))
|
||||
|
||||
|
|
Loading…
Reference in New Issue