aboutsummaryrefslogtreecommitdiffhomepage
path: root/contrib/correctness/pcic.ml
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/correctness/pcic.ml')
-rw-r--r--contrib/correctness/pcic.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/correctness/pcic.ml b/contrib/correctness/pcic.ml
index e3852504a..66ac7b97e 100644
--- a/contrib/correctness/pcic.ml
+++ b/contrib/correctness/pcic.ml
@@ -133,7 +133,7 @@ let tuple_ref dep n =
(* Binders. *)
let trad_binder avoid nenv id = function
- | CC_untyped_binder -> RHole (dummy_loc,AbstractionType (Name id))
+ | CC_untyped_binder -> RHole (dummy_loc,BinderType (Name id))
| CC_typed_binder ty -> Detyping.detype (Global.env()) avoid nenv ty
let rec push_vars avoid nenv = function