diff options
Diffstat (limited to 'toplevel/coqinit.ml')
| -rw-r--r-- | toplevel/coqinit.ml | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/toplevel/coqinit.ml b/toplevel/coqinit.ml index 046bf7812..dfe576a69 100644 --- a/toplevel/coqinit.ml +++ b/toplevel/coqinit.ml @@ -50,10 +50,10 @@ let load_rcfile() = mSGNL (str ("No coqrc or coqrc."^Coq_config.version^ " found. Skipping rcfile loading.")) *) - with e -> - let e = Errors.push e in + with reraise -> + let reraise = Errors.push reraise in let () = msg_info (str"Load of rcfile failed.") in - raise e + raise reraise else Flags.if_verbose msg_info (str"Skipping rcfile loading.") |