Import Upstream version 20180207
[hcoop/debian/mlton.git] / lib / stubs / mlton-stubs / world.sig
1 (* Copyright (C) 2009 Matthew Fluet.
2 * Copyright (C) 2002-2005 Henry Cejtin, Matthew Fluet, Suresh
3 * Jagannathan, and Stephen Weeks.
4 * Copyright (C) 1997-2000 NEC Research Institute.
5 *
6 * MLton is released under a BSD-style license.
7 * See the file MLton-LICENSE for details.
8 *)
9
10 signature MLTON_WORLD =
11 sig
12 datatype status = Clone | Original
13
14 val load: string -> 'a
15 (* Save the world to resume with the current thread. *)
16 val save: string -> status
17 (* Save the world to resume with the given thread. *)
18 val saveThread: string * MLtonThread.Runnable.t -> unit
19 end