aboutsummaryrefslogtreecommitdiffhomepage
path: root/parsing/g_constrnew.ml4
diff options
context:
space:
mode:
Diffstat (limited to 'parsing/g_constrnew.ml4')
-rw-r--r--parsing/g_constrnew.ml42
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/g_constrnew.ml4 b/parsing/g_constrnew.ml4
index ffc7d403c..a0bd0fb5e 100644
--- a/parsing/g_constrnew.ml4
+++ b/parsing/g_constrnew.ml4
@@ -179,7 +179,7 @@ GEXTEND Gram
| s=sort -> CSort(loc,s)
| n=INT -> CNumeral (loc,Bignat.POS (Bignat.of_string n))
| IDENT "_" -> CHole loc
- | "?"; n=Prim.natural -> CMeta(loc,n) ] ]
+ | "?"; n=Prim.natural -> CPatVar(loc,(false,Pattern.patvar_of_int n)) ] ]
;
fix_constr:
[ [ kw=fix_kw; dcl=fix_decl ->