1 (***********************************************************************)
5 (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *)
6 (* Objective Caml port by John Malecki and Xavier Leroy *)
8 (* Copyright 1996 Institut National de Recherche en Informatique et *)
9 (* en Automatique. All rights reserved. This file is distributed *)
10 (* under the terms of the Q Public License version 1.0. *)
12 (***********************************************************************)
18 val max_printer_depth
: int ref
19 val max_printer_steps
: int ref
21 val print_exception
: formatter
-> Debugcom.Remote_value.t
-> unit
22 val print_named_value
:
23 int -> Parser_aux.expression
-> Env.t
->
24 Debugcom.Remote_value.t
-> formatter
-> Types.type_expr
->
27 val reset_named_values
: unit -> unit
28 val find_named_value
: int -> Debugcom.Remote_value.t
* Types.type_expr
31 Path.t
-> Types.type_expr
-> formatter
->
32 (formatter
-> Obj.t
-> unit) -> unit
33 val remove_printer
: Path.t
-> unit