diff options
| author | coqbot-app[bot] | 2021-03-11 11:57:46 +0000 |
|---|---|---|
| committer | GitHub | 2021-03-11 11:57:46 +0000 |
| commit | d33266649d285b7d8ba5a7093319faa6132d6bc9 (patch) | |
| tree | a49c779eeddeb56909d3dd85f8423fde133a88fb /kernel/vconv.ml | |
| parent | a40631f9fbcd0ef8c1a716010be48e3f650e8955 (diff) | |
| parent | b31c4fa57eac8162ad6b6e03f75b13afd9b76db7 (diff) | |
Merge PR #13854: Normalize evars during bytecode compilation.
Reviewed-by: SkySkimmer
Ack-by: ppedrot
Ack-by: ejgallego
Diffstat (limited to 'kernel/vconv.ml')
| -rw-r--r-- | kernel/vconv.ml | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/kernel/vconv.ml b/kernel/vconv.ml index 1432fb9310..d31d7a03b6 100644 --- a/kernel/vconv.ml +++ b/kernel/vconv.ml @@ -196,8 +196,9 @@ let vm_conv_gen cv_pb env univs t1 t2 = TransparentState.full env univs t1 t2 else try - let v1 = val_of_constr env t1 in - let v2 = val_of_constr env t2 in + let sigma _ = assert false in + let v1 = val_of_constr env sigma t1 in + let v2 = val_of_constr env sigma t2 in fst (conv_val env cv_pb (nb_rel env) v1 v2 univs) with Not_found | Invalid_argument _ -> warn_bytecode_compiler_failed (); |
