aboutsummaryrefslogtreecommitdiff
path: root/checker/type_errors.ml
diff options
context:
space:
mode:
Diffstat (limited to 'checker/type_errors.ml')
-rw-r--r--checker/type_errors.ml3
1 files changed, 0 insertions, 3 deletions
diff --git a/checker/type_errors.ml b/checker/type_errors.ml
index 2963b3ba3d..1260983254 100644
--- a/checker/type_errors.ml
+++ b/checker/type_errors.ml
@@ -92,9 +92,6 @@ let error_ill_formed_branch env c i actty expty =
raise (TypeError (env,
IllFormedBranch (c,i,nf_betaiota actty, nf_betaiota expty)))
-let error_generalization env nvar c =
- raise (TypeError (env, Generalization (nvar,c)))
-
let error_actual_type env j expty =
raise (TypeError (env, ActualType (j,expty)))