From 989c012f77a0e446d6a59627695f7436315958f7 Mon Sep 17 00:00:00 2001
From: Simon Cruanes <simon.cruanes.2007@m4x.org>
Date: Tue, 7 Nov 2023 20:48:04 -0500
Subject: [PATCH] fix warnings

---
 test/t_fib_rec.ml | 2 +-
 test/t_props.ml   | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/test/t_fib_rec.ml b/test/t_fib_rec.ml
index 94e206b7..3495fcae 100644
--- a/test/t_fib_rec.ml
+++ b/test/t_fib_rec.ml
@@ -16,7 +16,7 @@ let rec fib ~on x : int Fut.t =
         Atomic.incr n_calls_fib_direct;
         fib_direct x)
   else
-    let open Fut.Infix_local in
+    let open Fut.Infix in
     let+ t1 = fib ~on (x - 1) and+ t2 = fib ~on (x - 2) in
     t1 + t2
 
diff --git a/test/t_props.ml b/test/t_props.ml
index 698650fd..fe187073 100644
--- a/test/t_props.ml
+++ b/test/t_props.ml
@@ -27,7 +27,7 @@ let () =
     Q.(small_list small_int)
     (fun l ->
       let@ pool = with_pool ~kind () in
-      let open Fut.Infix_local in
+      let open Fut.Infix in
       let l' =
         l
         |> List.map (fun x ->