1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
(* COPYRIGHT (c) 1996 Bell Laboratories. *)
(* interact.sig *)
signature INTERACT =
sig
exception Interrupt
val interact : unit -> unit
val useFile : string -> unit
val useStream : TextIO.instream -> unit
val evalStream : TextIO.instream * Environment.environment ->
Environment.environment
val withErrorHandling : bool -> (* true: treat all exns like usercode exns *)
{ thunk: unit -> unit, flush: unit -> unit, cont: exn -> unit } -> unit
val installCompManagers:
{ manageImport : Ast.dec * EnvRef.envref -> unit,
managePrint : Symbol.symbol * EnvRef.envref -> unit,
getPending : unit -> Symbol.symbol list } -> unit
val redump_heap_cont : string SMLofNJ.Cont.cont ref
end (* signature INTERACT *)
|
