diff options
Diffstat (limited to 'checker/checker.ml')
-rw-r--r-- | checker/checker.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/checker/checker.ml b/checker/checker.ml index b9009da82..f3c583b83 100644 --- a/checker/checker.ml +++ b/checker/checker.ml @@ -297,7 +297,8 @@ let rec explain_exn = function str("\nCantApplyBadType at argument " ^ string_of_int n) | CantApplyNonFunctional _ -> str"CantApplyNonFunctional" | IllFormedRecBody _ -> str"IllFormedRecBody" - | IllTypedRecBody _ -> str"IllTypedRecBody")) + | IllTypedRecBody _ -> str"IllTypedRecBody" + | UnsatisfiedConstraints _ -> str"UnsatisfiedConstraints")) | Indtypes.InductiveError e -> hov 0 (str "Error related to inductive types") |