From b6322d060425b3abfbf215901b1cb37bf7c49110 Mon Sep 17 00:00:00 2001
From: Simon Cruanes <simon.cruanes.2007@m4x.org>
Date: Fri, 9 Jun 2023 10:23:43 -0400
Subject: [PATCH] fix test: do not use feature not present in 4.08

---
 test/t1.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/test/t1.ml b/test/t1.ml
index 7bf599d..aabc361 100644
--- a/test/t1.ml
+++ b/test/t1.ml
@@ -1,6 +1,6 @@
 let run () =
   for _i = 1 to 50 do
-    Trace.with_span ~__FUNCTION__ ~__FILE__ ~__LINE__ "outer.loop" @@ fun _sp ->
+    Trace.with_span ~__FILE__ ~__LINE__ "outer.loop" @@ fun _sp ->
     for _j = 2 to 5 do
       Trace.with_span ~__FILE__ ~__LINE__ "inner.loop" @@ fun _sp ->
       Trace.messagef ~__FILE__ ~__LINE__ (fun k -> k "hello %d %d" _i _j)