diff options
| author | coqbot-app[bot] | 2020-12-11 16:03:25 +0000 |
|---|---|---|
| committer | GitHub | 2020-12-11 16:03:25 +0000 |
| commit | 5a77078718c18b05e7ffb1366d6dd9e439ecfc91 (patch) | |
| tree | db386127e6c2295b8e7281133f73ae89e34c8f80 /engine/evd.ml | |
| parent | c8d2248cbbe2c713605e0c61d7342fad948072da (diff) | |
| parent | 0d1da885cc8ccfb9f995e5dcb0ed79e71e6020db (diff) | |
Merge PR #13519: Better primitive type support in custom string and numeral notations.
Reviewed-by: jfehrle
Reviewed-by: proux01
Ack-by: Zimmi48
Ack-by: SkySkimmer
Diffstat (limited to 'engine/evd.ml')
| -rw-r--r-- | engine/evd.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/engine/evd.ml b/engine/evd.ml index 59eea97ce9..706e51d4b3 100644 --- a/engine/evd.ml +++ b/engine/evd.ml @@ -983,6 +983,9 @@ let fresh_inductive_instance ?loc ?(rigid=univ_flexible) env evd i = let fresh_constructor_instance ?loc ?(rigid=univ_flexible) env evd c = with_context_set ?loc rigid evd (UnivGen.fresh_constructor_instance env c) +let fresh_array_instance ?loc ?(rigid=univ_flexible) env evd = + with_context_set ?loc rigid evd (UnivGen.fresh_array_instance env) + let fresh_global ?loc ?(rigid=univ_flexible) ?names env evd gr = with_context_set ?loc rigid evd (UnivGen.fresh_global_instance ?loc ?names env gr) |