2 * 2004 Matthew Fluet (mfluet@acm.org)
3 * Ported to MLton threads.
8 * COPYRIGHT (c) 1996 AT&T Research.
16 val result : unit -> 'a result
17 val put : ('a result * 'a) -> unit
18 val putExn : ('a result * exn) -> unit
19 val get : 'a result -> 'a
20 val getEvt : 'a result -> 'a CML.event