aboutsummaryrefslogtreecommitdiffhomepage
path: root/lib/errors.mli
diff options
context:
space:
mode:
authorGravatar Thomas Sibut-Pinote <thomas.sibut-pinote@inria.fr>2015-06-23 14:49:01 +0200
committerGravatar Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr>2015-06-25 14:30:02 +0200
commit3d33b59d725760bee14668c744b057a75440012e (patch)
treed3e53b9406204a29845e2d0cc22c0ee2a40948bb /lib/errors.mli
parent42893bd092c4a63174c97995b4fb561daf4de273 (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 'lib/errors.mli')
-rw-r--r--lib/errors.mli5
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/errors.mli b/lib/errors.mli
index 8320ce409..e5dad93fd 100644
--- a/lib/errors.mli
+++ b/lib/errors.mli
@@ -92,3 +92,8 @@ val noncritical : exn -> bool
(** Check whether an exception is handled by some toplevel printer. The
[Anomaly] exception is never handled. *)
val handled : exn -> bool
+
+(** Prints info which is either an error or
+ an anomaly and then exits with the appropriate
+ error code *)
+val fatal_error : Pp.std_ppcmds -> bool -> 'a