val print_exn: Format.formatter -> exn -> unit
val run : Format.formatter -> char Stream.t -> bool (* Returns true if everything is ok (no error) *)
