Fixed an arity bug in %set-unix-signal-handler's call to
%%set-unix-signal-handler.
This commit is contained in:
parent
8d7dee0bfa
commit
230263ee0d
|
@ -170,7 +170,8 @@
|
|||
handler-code
|
||||
%set-unix-signal-handler)
|
||||
(let retry ()
|
||||
(receive (err old-hc) (%%set-unix-signal-handler sig handler-code)
|
||||
(receive (err old-hc old-flags)
|
||||
(%%set-unix-signal-handler sig handler-code 0)
|
||||
(cond ((not err) old-hc)
|
||||
((= err errno/intr) (retry))
|
||||
(else (errno-error err %set-unix-signal-handler sig handler-code))))))
|
||||
|
|
Loading…
Reference in New Issue