Module Translclass

type error =
  1. | Tags of string * string
exception Error of Location.t * error
val report_error : error Format_doc.format_printer
val report_error_doc : error Format_doc.printer