sig
val register_handler :
?library:string ->
?priority:int ->
?keep_default:bool ->
name:string -> signal:int -> callback:(int -> unit) -> unit -> unit
val register_exclusive_handler :
name:string -> signal:int -> install:(unit -> unit) -> unit -> unit
val restore_management : int -> unit
val keep_away_from : int -> unit
type action = [ `Callback of int -> unit | `Install of unit -> unit ]
type entry = {
sig_number : int;
sig_library : string option;
sig_priority : int;
sig_keep_default : bool;
sig_name : string;
sig_action : Netsys_signal.action;
}
val list : unit -> Netsys_signal.entry list
val keep_away_list : unit -> int list
val init : unit -> unit
module Debug : sig val enable : bool Pervasives.ref end
end