diff options
| author | Gaëtan Gilbert | 2018-09-03 14:37:12 +0200 |
|---|---|---|
| committer | Gaëtan Gilbert | 2018-09-03 14:37:12 +0200 |
| commit | c880e9e01d57eb4beca561e209839caa66d38742 (patch) | |
| tree | 87752aad1c8aab7afece5d83f4d38175d0f2768c /engine/evd.ml | |
| parent | bb5c4eee0807cd988d236d4538a2fa2f05ef0daf (diff) | |
| parent | 6d998b5a0e6090b5c7d87d575016adc127b666d9 (diff) | |
Merge PR #891: Check universes are declared
Diffstat (limited to 'engine/evd.ml')
| -rw-r--r-- | engine/evd.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/engine/evd.ml b/engine/evd.ml index d1c7fef738..9f976b57dd 100644 --- a/engine/evd.ml +++ b/engine/evd.ml @@ -774,7 +774,7 @@ let universe_subst evd = UState.subst evd.universes let merge_context_set ?loc ?(sideff=false) rigid evd ctx' = - {evd with universes = UState.merge ?loc sideff rigid evd.universes ctx'} + {evd with universes = UState.merge ?loc ~sideff ~extend:true rigid evd.universes ctx'} let merge_universe_subst evd subst = {evd with universes = UState.merge_subst evd.universes subst } |