blob: 948eca8f3eb2cc46bbdf774843f1ec1af5cb1f4c (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
# XWHEN -- Post an exception handler.
procedure xwhen (signal, handler, old_handler)
int signal # signal to be caught
int handler # epa of user supplied exception handler
int old_handler # epa of old handler, if any
begin
call zxwhen (signal, handler, old_handler)
end
|