From 28baf4c999de8673b1dfcf7e79d454809c72444f Mon Sep 17 00:00:00 2001
From: Gaëtan Gilbert
Date: Mon, 27 Jan 2020 17:09:12 +0100
Subject: cleanup: Lib.freeze doesn't use its [~marshallable] argument

---
 library/lib.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'library/lib.ml')

diff --git a/library/lib.ml b/library/lib.ml
index 9cce9b92ad..7f96adeecf 100644
--- a/library/lib.ml
+++ b/library/lib.ml
@@ -500,7 +500,7 @@ let close_section () =
 
 type frozen = lib_state
 
-let freeze ~marshallable = !lib_state
+let freeze () = !lib_state
 
 let unfreeze st = lib_state := st
 
-- 
cgit v1.2.3