Module Oug_print


module Oug_print: sig .. end

val ps : Format.formatter -> string -> unit
val fps : Format.formatter -> ('a, Format.formatter, unit) Pervasives.format -> 'a
val string_of_partial : Typedtree.partial -> string
val string_of_optional : Typedtree.optional -> string
val string_of_path : Path.t -> string
val string_of_rec_flag : Asttypes.rec_flag -> string
val print_type_expr : Format.formatter -> Types.type_expr -> unit
val print_type_desc : Format.formatter -> Types.type_desc -> unit
val print_row_desc : Format.formatter -> Types.row_desc -> unit
val print_pattern : Format.formatter -> Typedtree.pattern -> unit
val print_pattern_desc : Format.formatter -> Typedtree.pattern_desc -> unit
val print_expression : Format.formatter -> Typedtree.expression -> unit
val print_exp_desc : Format.formatter -> Typedtree.expression_desc -> unit
val print_pel : Format.formatter -> (Typedtree.pattern * Typedtree.expression) list -> unit
val print_meth : Format.formatter -> Typedtree.meth -> unit
val print_class_expr : Format.formatter -> Typedtree.class_expr -> unit
val print_class_exp_desc : Format.formatter -> Typedtree.class_expr_desc -> unit
val print_iel : Format.formatter -> (Ident.t * Typedtree.expression) list -> unit
val print_class_structure : Format.formatter -> Typedtree.class_structure -> unit
val print_class_field : Format.formatter -> Typedtree.class_field -> unit
val print_module_expr : Format.formatter -> Typedtree.module_expr -> unit
val print_module_expr_desc : Format.formatter -> Typedtree.module_expr_desc -> unit
val print_structure : Format.formatter -> Typedtree.structure -> unit
val structure_item : Format.formatter -> Typedtree.structure_item -> unit
val print_env_summary : Buffer.t -> Env.summary -> unit