diff --git a/sledge/bin/sledge_cli.ml b/sledge/bin/sledge_cli.ml
index 2465e68d1..8effdf035 100644
--- a/sledge/bin/sledge_cli.ml
+++ b/sledge/bin/sledge_cli.ml
@@ -62,8 +62,7 @@ let command ~summary ?readme param =
   Command.basic ~summary ?readme (trace *> param >>| wrap)
 
 let marshal program file =
-  Out_channel.with_file file ~f:(fun oc ->
-      Marshal.to_channel oc program [Marshal.Closures] )
+  Out_channel.with_file file ~f:(fun oc -> Marshal.to_channel oc program [])
 
 let unmarshal file () =
   In_channel.with_file