diff options
| author | Maxime Dénès | 2020-01-28 10:19:15 +0100 |
|---|---|---|
| committer | Maxime Dénès | 2020-01-28 10:19:15 +0100 |
| commit | 2b4ebc5cd24f131567052d64889b2d24d5cc5ee8 (patch) | |
| tree | 1ab3f569641640b18d0fefea20f928dc3b716e37 /vernac | |
| parent | 614643e6fb1b5029d1c2bf50cd51f95d621010cf (diff) | |
| parent | 28baf4c999de8673b1dfcf7e79d454809c72444f (diff) | |
Merge PR #11459: cleanup: Lib.freeze doesn't use its [~marshallable] argument
Reviewed-by: ejgallego
Reviewed-by: gares
Reviewed-by: maximedenes
Diffstat (limited to 'vernac')
| -rw-r--r-- | vernac/metasyntax.ml | 2 |
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 |