Ast.exception_to_mapSource constraint 'c exception_to_map = 'c exception_to_mapinherit VisitorsRuntime.mapinherit ident_mapinherit Utils.Marked.pos_mapmethod visit_NotAnException : 'd -> exception_tomethod visit_UnlabeledException : 'd -> exception_tomethod visit_ExceptionToLabel : 'd ->
(ident, Utils.Pos.t) Utils.Marked.t ->
exception_tomethod visit_exception_to : 'd -> exception_to -> exception_to