aboutsummaryrefslogtreecommitdiffhomepage
path: root/interp/constrintern.ml
diff options
context:
space:
mode:
Diffstat (limited to 'interp/constrintern.ml')
-rw-r--r--interp/constrintern.ml1
1 files changed, 0 insertions, 1 deletions
diff --git a/interp/constrintern.ml b/interp/constrintern.ml
index f36d56b83..12376eb89 100644
--- a/interp/constrintern.ml
+++ b/interp/constrintern.ml
@@ -1217,7 +1217,6 @@ let internalize sigma globalenv env allow_patvar lvar c =
| CRef ref as x ->
let (c,imp,subscopes,l),_ =
intern_applied_reference intern env (Environ.named_context globalenv) lvar [] ref in
- assert (l=[]);
(match intern_impargs c env imp subscopes l with
| [] -> c
| l -> GApp (constr_loc x, c, l))