aboutsummaryrefslogtreecommitdiff
path: root/vernac
diff options
context:
space:
mode:
authorGaëtan Gilbert2020-01-27 17:09:12 +0100
committerGaëtan Gilbert2020-01-27 17:09:12 +0100
commit28baf4c999de8673b1dfcf7e79d454809c72444f (patch)
treeee39466dc207b1765d7eac38e77a8c1d334d6f0d /vernac
parent506b35913103c17e4d27663aa0f977452d5815b0 (diff)
cleanup: Lib.freeze doesn't use its [~marshallable] argument
Diffstat (limited to 'vernac')
-rw-r--r--vernac/metasyntax.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/vernac/metasyntax.ml b/vernac/metasyntax.ml
index 222e9eb825..05e23164b1 100644
--- a/vernac/metasyntax.ml
+++ b/vernac/metasyntax.ml
@@ -1346,7 +1346,7 @@ let inNotation : notation_obj -> obj =
(**********************************************************************)
let with_lib_stk_protection f x =
- let fs = Lib.freeze ~marshallable:false in
+ let fs = Lib.freeze () in
try let a = f x in Lib.unfreeze fs; a
with reraise ->
let reraise = CErrors.push reraise in