From 11b43ed4935ee434a25e8e66c35f6efd5b0f5c52 Mon Sep 17 00:00:00 2001
From: Simon Cruanes <simon.cruanes.2007@m4x.org>
Date: Fri, 5 Apr 2024 13:45:42 -0400
Subject: [PATCH] make `Framing.config` use zlib by default

---
 src/core/framing.ml  | 2 +-
 src/core/framing.mli | 3 ++-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/core/framing.ml b/src/core/framing.ml
index 337e7444..7d90d709 100644
--- a/src/core/framing.ml
+++ b/src/core/framing.ml
@@ -39,7 +39,7 @@ open struct
 end
 
 type config = {
-  use_zlib: bool;
+  use_zlib: bool; [@default true]
   zlib_compression_threshold_B: int; [@default 2 * 1024]
   buf_pool: Buf_pool.t;
 }
diff --git a/src/core/framing.mli b/src/core/framing.mli
index ff9d2264..10317c6a 100644
--- a/src/core/framing.mli
+++ b/src/core/framing.mli
@@ -17,7 +17,8 @@
 open Common_
 
 type config = {
-  use_zlib: bool;  (** Use zlib compression on large messages? *)
+  use_zlib: bool; [@default true]
+      (** Use zlib compression on large messages? *)
   zlib_compression_threshold_B: int; [@default 2 * 1024]
       (** Size of body above which we apply zlib compression. *)
   buf_pool: Buf_pool.t;