diff options
| author |  Maxime Dénès <mail@maximedenes.fr> | 2018-02-12 10:57:39 +0100 |
|---|---|---|
| committer | Maxime Dénès <mail@maximedenes.fr> | 2018-02-12 10:57:39 +0100 |
| commit | 52d666a7a83e4023d9f5cd7324ed81c7f7926156 (patch) | |
| tree | 8b5254efb09a55260cd3de9bea9ae07bf4a10a02 /checker | |
| parent | 67b6583a2cc430c9584e259a00ff6b28347d5b55 (diff) | |
| parent | 33789b2d1706194d478a25098bd1991d2c845223 (diff) | |
Merge PR #6262: [error] Replace msg_error by a proper exception.
Diffstat (limited to 'checker')
| -rw-r--r-- | checker/checker.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/checker/checker.ml b/checker/checker.ml index b8b4d5dc2..e8eff889c 100644 --- a/checker/checker.ml +++ b/checker/checker.ml @@ -18,7 +18,7 @@ let () = at_exit flush_all let chk_pp = Pp.pp_with Format.std_formatter let fatal_error info anomaly = - flush_all (); Feedback.msg_error info; flush_all (); + flush_all (); Format.eprintf "@[Fatal Error: @[%a@]@]%!@\n" Pp.pp_with info; flush_all (); exit (if anomaly then 129 else 1) let coq_root = Id.of_string "Coq" |