diff options
| author | Thomas Sibut-Pinote | 2015-06-23 14:49:01 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2015-06-25 14:30:02 +0200 |
| commit | 3d33b59d725760bee14668c744b057a75440012e (patch) | |
| tree | d3e53b9406204a29845e2d0cc22c0ee2a40948bb /toplevel | |
| parent | 42893bd092c4a63174c97995b4fb561daf4de273 (diff) | |
Moved fatal_error from Coqtop to Errors and corrected dependencies accordingly.
This allows fatal_error to be used for printing anomalies at loading time.
Diffstat (limited to 'toplevel')
| -rw-r--r-- | toplevel/coqtop.ml | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/toplevel/coqtop.ml b/toplevel/coqtop.ml index d88ba23ea9..5b330cd252 100644 --- a/toplevel/coqtop.ml +++ b/toplevel/coqtop.ml @@ -20,12 +20,6 @@ let () = at_exit flush_all let ( / ) = Filename.concat -let fatal_error info anomaly = - let msg = info ++ fnl () in - pp_with ~pp_tag:Ppstyle.pp_tag !Pp_control.err_ft msg; - flush_all (); - exit (if anomaly then 129 else 1) - let get_version_date () = try let ch = open_in (Envars.coqlib () / "revision") in |