aboutsummaryrefslogtreecommitdiff
path: root/interp/stdarg.ml
diff options
context:
space:
mode:
authorcoqbot-app[bot]2020-11-23 09:25:32 +0000
committerGitHub2020-11-23 09:25:32 +0000
commit0326d06211c49efb4018d65280cf26340f7344b4 (patch)
tree88e4ea74a1511402ce52c1619b78a1a86baf80cb /interp/stdarg.ml
parent9c841105fe2b51305abcba7bd8a574705dbd1adf (diff)
parente74d328b32634a44ab049f971ec33fe6cd24df72 (diff)
Merge PR #13417: Use nat_or_var in grammar where negative values don't make sense
Reviewed-by: Zimmi48
Diffstat (limited to 'interp/stdarg.ml')
-rw-r--r--interp/stdarg.ml3
1 files changed, 3 insertions, 0 deletions
diff --git a/interp/stdarg.ml b/interp/stdarg.ml
index 70be55f843..a953ca8898 100644
--- a/interp/stdarg.ml
+++ b/interp/stdarg.ml
@@ -37,6 +37,9 @@ let wit_pre_ident : string uniform_genarg_type =
let wit_int_or_var =
make0 ~dyn:(val_tag (topwit wit_int)) "int_or_var"
+let wit_nat_or_var =
+ make0 ~dyn:(val_tag (topwit wit_nat)) "nat_or_var"
+
let wit_ident =
make0 "ident"