Module Refmt_lib.Printer_maker

type 'a parser_result = {
  1. ast : 'a;
  2. comments : Reason.Reason_comment.t list;
  3. parsed_as_ml : bool;
  4. parsed_as_intf : bool;
}
type parse_itype = [
  1. | `ML
  2. | `Reason
  3. | `Binary
  4. | `BinaryReason
  5. | `Auto
]
type print_itype = [
  1. | `ML
  2. | `Reason
  3. | `Binary
  4. | `BinaryReason
  5. | `AST
  6. | `None
]
exception Invalid_config of string
module type PRINTER = sig ... end
val err : string -> 'a
val ocamlBinaryParser : bool -> string -> 'a parser_result
val reasonBinaryParser : bool -> string -> 'a parser_result
val prepare_output_file : string option -> out_channel
val close_output_file : string option -> out_channel -> unit