summaryrefslogtreecommitdiffstats
path: root/stdlib/sys.mli
diff options
context:
space:
mode:
authorXavier Leroy <xavier.leroy@inria.fr>1998-08-08 16:52:33 +0000
committerXavier Leroy <xavier.leroy@inria.fr>1998-08-08 16:52:33 +0000
commitc6b82c5c30ba710e5bf55729f09f12a9356ddcd6 (patch)
treec022d95cf48398fe52559d8c4f078c778a30ec26 /stdlib/sys.mli
parent63be4e8d2bdb08ebfd3ac504b2bb30d02dd8cd18 (diff)
Sys.signal renvoie l'ancien handler
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@2039 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'stdlib/sys.mli')
-rw-r--r--stdlib/sys.mli6
1 files changed, 4 insertions, 2 deletions
diff --git a/stdlib/sys.mli b/stdlib/sys.mli
index 2178df5da..1bdbb191b 100644
--- a/stdlib/sys.mli
+++ b/stdlib/sys.mli
@@ -65,9 +65,11 @@ type signal_behavior =
- [Signal_handle f]: call function [f], giving it the signal
number as argument. *)
-external signal: int -> signal_behavior -> unit = "install_signal_handler"
+external signal: int -> signal_behavior -> signal_behavior
+ = "install_signal_handler"
(* Set the behavior of the system on receipt of a given signal.
- The first argument is the signal number. *)
+ The first argument is the signal number. Return the behavior
+ previously associated with the signal. *)
val sigabrt: int (* Abnormal termination *)
val sigalrm: int (* Timeout *)