promote tests

EmileTrotignon · EmileTrotignon · commit 638ad1ddb9d5 · 2025-06-06T17:27:37.000+02:00
diff --git a/test/passing/refs.ahrefs/exp_grouping-parens.ml.ref b/test/passing/refs.ahrefs/exp_grouping-parens.ml.ref
@@ -578,3 +578,9 @@ let () =
              $ y
            in
            fooooooooooo x)
+
+let f () =
+  f
+    (g a (fun () ->
+       let x = y in
+       z))
diff --git a/test/passing/refs.ahrefs/exp_grouping.ml.ref b/test/passing/refs.ahrefs/exp_grouping.ml.ref
@@ -662,3 +662,10 @@ let () =
            in
            fooooooooooo x
          end
+
+let f () =
+  f
+    (g a begin fun () ->
+      let x = y in
+      z
+    end)
diff --git a/test/passing/refs.default/exp_grouping-parens.ml.ref b/test/passing/refs.default/exp_grouping-parens.ml.ref
@@ -595,3 +595,9 @@ let () =
                $ y
              in
              fooooooooooo x)
+
+let f () =
+  f
+    (g a (fun () ->
+         let x = y in
+         z))
diff --git a/test/passing/refs.default/exp_grouping.ml.ref b/test/passing/refs.default/exp_grouping.ml.ref
@@ -680,3 +680,10 @@ let () =
              in
              fooooooooooo x
            end
+
+let f () =
+  f
+    (g a begin fun () ->
+        let x = y in
+        z
+      end)
diff --git a/test/passing/refs.janestreet/exp_grouping-parens.ml.ref b/test/passing/refs.janestreet/exp_grouping-parens.ml.ref
@@ -677,3 +677,10 @@ let () =
               in
               fooooooooooo x)
 ;;
+
+let f () =
+  f
+    (g a (fun () ->
+       let x = y in
+       z))
+;;
diff --git a/test/passing/refs.janestreet/exp_grouping.ml.ref b/test/passing/refs.janestreet/exp_grouping.ml.ref
@@ -765,3 +765,11 @@ let () =
              fooooooooooo x
            end
 ;;
+
+let f () =
+  f
+    (g a begin fun () ->
+        let x = y in
+        z
+      end)
+;;
diff --git a/test/passing/refs.ocamlformat/exp_grouping-parens.ml.ref b/test/passing/refs.ocamlformat/exp_grouping-parens.ml.ref
@@ -599,3 +599,9 @@ let () =
                $ y
              in
              fooooooooooo x )
+
+let f () =
+  f
+    (g a (fun () ->
+         let x = y in
+         z ) )
diff --git a/test/passing/refs.ocamlformat/exp_grouping.ml.ref b/test/passing/refs.ocamlformat/exp_grouping.ml.ref
@@ -686,3 +686,10 @@ let () =
              in
              fooooooooooo x
            end
+
+let f () =
+  f
+    (g a begin fun () ->
+        let x = y in
+        z
+      end )
