diff options
Diffstat (limited to 'toplevel/errors.ml')
| -rw-r--r-- | toplevel/errors.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/errors.ml b/toplevel/errors.ml index 3c18bf619e..11e7c38ccd 100644 --- a/toplevel/errors.ml +++ b/toplevel/errors.ml @@ -67,7 +67,7 @@ let rec explain_exn_default = function hOV 0 [< 'sTR "Error: Universe Inconsistency." >] | TypeError(k,ctx,te) -> hOV 0 [< 'sTR "Error:"; 'sPC; Himsg.explain_type_error k ctx te >] - | PretypeError(ctx,te) -> + | PretypeError(ctx,te) -> hOV 0 [< 'sTR "Error:"; 'sPC; Himsg.explain_pretype_error ctx te >] | InductiveError e -> hOV 0 [< 'sTR "Error:"; 'sPC; Himsg.explain_inductive_error e >] |
