let default_failure_fun_expr (_loc: Ast.Loc.t): Ast.expr =
  <:expr< failwith >>