1 (* Copyright (C) 1999-2006 Henry Cejtin, Matthew Fluet, Suresh
2 * Jagannathan, and Stephen Weeks.
3 * Copyright (C) 1997-2000 NEC Research Institute.
5 * MLton is released under a BSD-style license.
6 * See the file MLton-LICENSE for details.
9 signature MLTON_SIGNAL =
19 val handler: (MLtonThread.Runnable.t -> MLtonThread.Runnable.t) -> t
21 val isDefault: t -> bool
22 val isIgnore: t -> bool
23 val simple: (unit -> unit) -> t
31 val allBut: signal list -> t
33 val getBlocked: unit -> t
34 val isMember: t * signal -> bool
36 val setBlocked: t -> unit
37 val some: signal list -> t
38 val unblock: t -> unit
41 val getHandler: t -> Handler.t
42 val handled: unit -> Mask.t
45 val setHandler: t * Handler.t -> unit
46 (* suspend m temporarily sets the signal mask to m and suspends until an
47 * unmasked signal is received and handled, and then resets the mask.
49 val suspend: Mask.t -> unit
53 signature MLTON_SIGNAL_EXTRA =
57 val handleGC: (unit -> unit) -> unit