From 884d35498653e35576bede052a8b27d5f4ad3ea3 Mon Sep 17 00:00:00 2001
From: Simon Cruanes <simon.cruanes.2007@m4x.org>
Date: Wed, 20 Dec 2023 14:41:43 -0500
Subject: [PATCH] fix test

---
 tests/core/t_list.ml | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/tests/core/t_list.ml b/tests/core/t_list.ml
index c195436a..ee0aac6a 100644
--- a/tests/core/t_list.ml
+++ b/tests/core/t_list.ml
@@ -124,6 +124,7 @@ eq
    fold_flat_map (fun acc x -> acc + x, [ pf "%d" x; pf "a%d" x ]) 0 [ 1; 2; 3 ])
 ;;
 
+[@@@ifge 4.12]
 t @@ fun () ->
 let r = Atomic.make 0 in
 let f x =
@@ -139,6 +140,8 @@ assert_equal
 true
 ;;
 
+[@@@endif]
+
 q
   Q.(list int)
   (fun l ->