trunk/driver/cduce.mli

exception Escape of exn

val toplevel: bool ref
val verbose: bool ref

val extra_specs: (string * Arg.spec * string) list ref

val script : Format.formatter -> Format.formatter -> char Stream.t -> bool
val topinput : Format.formatter -> Format.formatter -> char Stream.t -> bool

val dump_env : Format.formatter -> unit

val compile: string -> string option -> unit
val compile_run: string -> unit
val run: string -> unit

val print_exn: Format.formatter -> exn -> unit


val eval: string -> (Atoms.V.t option * Value.t) list
  (* Can be used from CDuce units *)
1	exception Escape of exn
2
3	val toplevel: bool ref
4	val verbose: bool ref
5
6	val extra_specs: (string * Arg.spec * string) list ref
7
8	val script : Format.formatter -> Format.formatter -> char Stream.t -> bool
9	val topinput : Format.formatter -> Format.formatter -> char Stream.t -> bool
10
11	val dump_env : Format.formatter -> unit
12
13	val compile: string -> string option -> unit
14	val compile_run: string -> unit
15	val run: string -> unit
16
17	val print_exn: Format.formatter -> exn -> unit
18
19
20	val eval: string -> (Atoms.V.t option * Value.t) list
21	(* Can be used from CDuce units *)