diff options
Diffstat (limited to 'contrib/correctness/pcic.ml')
| -rw-r--r-- | contrib/correctness/pcic.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/correctness/pcic.ml b/contrib/correctness/pcic.ml index 77d516a136..8fb0ca5171 100644 --- a/contrib/correctness/pcic.ml +++ b/contrib/correctness/pcic.ml @@ -56,7 +56,7 @@ let tuple_n n = (fun i -> let id = make_ident ("proj_" ^ string_of_int n ^ "_") (Some i) in let id' = make_ident "T" (Some i) in - (false, Vernacexpr.AssumExpr ((dummy_loc,id), mkIdentC id'))) + (false, Vernacexpr.AssumExpr ((dummy_loc,Name id), mkIdentC id'))) l1n in let cons = make_ident "Build_tuple_" (Some n) in |