diff options
| author | Pierre Roux | 2020-09-12 09:15:06 +0200 |
|---|---|---|
| committer | Pierre Roux | 2020-10-30 14:18:21 +0100 |
| commit | da72fafac3b5b4b21330cd097f5728cbc127aea4 (patch) | |
| tree | 294df4923e6bdca5d66d8c10fbb1c8a20d994148 /vernac | |
| parent | 3a25b967a944fe37e1ad54e54a904d90311ef381 (diff) | |
Renaming Numeral into Number
Diffstat (limited to 'vernac')
| -rw-r--r-- | vernac/egramcoq.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/vernac/egramcoq.ml b/vernac/egramcoq.ml index 123ea2c24e..efe4e17d0b 100644 --- a/vernac/egramcoq.ml +++ b/vernac/egramcoq.ml @@ -408,8 +408,8 @@ match e with | TTClosedBinderList _ -> { subst with binderlists = List.flatten v :: subst.binderlists } | TTBigint -> begin match forpat with - | ForConstr -> push_constr subst (CAst.make @@ CPrim (Numeral (NumTok.Signed.of_int_string v))) - | ForPattern -> push_constr subst (CAst.make @@ CPatPrim (Numeral (NumTok.Signed.of_int_string v))) + | ForConstr -> push_constr subst (CAst.make @@ CPrim (Number (NumTok.Signed.of_int_string v))) + | ForPattern -> push_constr subst (CAst.make @@ CPatPrim (Number (NumTok.Signed.of_int_string v))) end | TTReference -> begin match forpat with |