diff options
| author | Gaëtan Gilbert | 2020-01-27 17:09:12 +0100 |
|---|---|---|
| committer | Gaëtan Gilbert | 2020-01-27 17:09:12 +0100 |
| commit | 28baf4c999de8673b1dfcf7e79d454809c72444f (patch) | |
| tree | ee39466dc207b1765d7eac38e77a8c1d334d6f0d /stm | |
| parent | 506b35913103c17e4d27663aa0f977452d5815b0 (diff) | |
cleanup: Lib.freeze doesn't use its [~marshallable] argument
Diffstat (limited to 'stm')
| -rw-r--r-- | stm/stm.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/stm/stm.ml b/stm/stm.ml index eff2403eca..4c539684e3 100644 --- a/stm/stm.ml +++ b/stm/stm.ml @@ -2362,7 +2362,7 @@ let known_state ~doc ?(redefine_qed=false) ~cache id = let st = Summary.remove_from_summary st Util.(pi1 summary_pstate) in let st = Summary.remove_from_summary st Util.(pi2 summary_pstate) in let st = Summary.remove_from_summary st Util.(pi3 summary_pstate) in - st, Lib.freeze ~marshallable:false in + st, Lib.freeze () in let inject_non_pstate (s,l) = Summary.unfreeze_summaries ~partial:true s; Lib.unfreeze l; update_global_env () |