Merge pull request #1037 from talex5/fix-deprecation

http: fix compiler warning
mirage · Jun 20, 2024 · 935db5f · 935db5f
2 parents 1d9e14b + b7d5cac
commit 935db5f
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 6 deletions.
diff --git a/cohttp/src/s.ml b/cohttp/src/s.ml
@@ -144,8 +144,8 @@ module type Response = sig
   val version : t -> Code.version
   val status : t -> Code.status_code
 
-  val flush :
-    (t -> bool[@deprecated "this field will be removed in the future"])
+  val flush : (t -> bool)
+  [@@deprecated "this field will be removed in the future"]
 
   val compare : t -> t -> int
 

diff --git a/http/src/http.mli b/http/src/http.mli
@@ -465,10 +465,10 @@ module Response : sig
   val status : t -> Status.t
 
   val flush :
-    (t -> bool
-    [@deprecated
-      "this field will be removed in the future. Provide flush in the \
-       [respond_*] function instead."])
+    (t -> bool)
+  [@@deprecated
+    "this field will be removed in the future. Provide flush in the \
+     [respond_*] function instead."]
 
   val compare : t -> t -> int