diff options
| author | Pierre-Marie Pédrot | 2018-09-11 13:41:19 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2018-09-11 13:41:19 +0200 |
| commit | ac25077cfcc1b9bf8c1dbe49b7d72569854326a6 (patch) | |
| tree | 0e519174dd137dcec8e201989d77a057f0fea332 /proofs/redexpr.ml | |
| parent | 2d8616d98226518558c5bd1d2cb75746f4e46fb0 (diff) | |
| parent | e8ccf6120f3765e04c527bca8b2b1fffc6df08ca (diff) | |
Merge PR #8285: Fixing #8270: cbn was applying zeta even when not asked for.
Diffstat (limited to 'proofs/redexpr.ml')
| -rw-r--r-- | proofs/redexpr.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/proofs/redexpr.ml b/proofs/redexpr.ml index 629b77be2a..44685d2bbd 100644 --- a/proofs/redexpr.ml +++ b/proofs/redexpr.ml @@ -52,7 +52,7 @@ let whd_cbn flags env sigma t = Reductionops.Stack.zip ~refold:true sigma state let strong_cbn flags = - strong (whd_cbn flags) + strong_with_flags whd_cbn flags let simplIsCbn = ref (false) let _ = Goptions.declare_bool_option { |