Source file msupport_parsing.ml

(* Filled in from Msupport. *)
let msupport_raise_error : (exn -> unit) ref =
  ref raise

let raise_error exn =
  !msupport_raise_error exn