marionnet-dev team mailing list archive
-
marionnet-dev team
-
Mailing list archive
-
Message #00427
[Branch ~marionnet-drivers/ocamlbricks/trunk] Rev 295: Added several tools about signals in SysExtra:
------------------------------------------------------------
revno: 295
committer: Jean-Vincent Loddo <loddo@xxxxxxxxxxxxxxxxxxxx>
branch nick: ocamlbricks
timestamp: Wed 2012-01-11 22:56:14 +0100
message:
Added several tools about signals in SysExtra:
val name_of_signal : int -> string
val description_of_signal : int -> string * string * string * string
val description_of_name : string -> string * string * string
val signal_behavior : int -> Sys.signal_behavior
val iter_on_signals : ?except:(int list) -> (int -> Sys.signal_behavior -> unit) -> unit
val fold_on_signals : ?except:(int list) -> ('a -> int -> Sys.signal_behavior -> 'a) -> 'a -> 'a
val log_signal_reception : ?except:(int list) -> unit -> unit
The last function is useful for debugging, especially forking:
match Unix.fork () with
| 0 -> (* The child here: *)
SysExtra.log_signal_reception ~except:[26] ();
...
With this setting, all signal received by the child will be notified on stderr (through Ocamlbricks_log).
modified:
EXTRA/limbo.ml
EXTRA/sysExtra.ml
EXTRA/sysExtra.mli
EXTRA/threadExtra.ml
Makefile
Makefile.d/test.sh
--
lp:ocamlbricks
https://code.launchpad.net/~marionnet-drivers/ocamlbricks/trunk
Your team marionnet-dev is subscribed to branch lp:ocamlbricks.
To unsubscribe from this branch go to https://code.launchpad.net/~marionnet-drivers/ocamlbricks/trunk/+edit-subscription