Add testcase for #2468

ocaml-ppx · Oct 26, 2023 · 8f3d799 · 8f3d799
1 parent 418f8c3
commit 8f3d799
Show file tree

Hide file tree

Showing 3 changed files with 13 additions and 0 deletions.
diff --git a/test/passing/tests/js_source.ml b/test/passing/tests/js_source.ml
@@ -8179,3 +8179,12 @@ module type M = sig
     : Simple_value_approx.function_declarations option
         Set_of_closures_id.Tbl.fooooooooooooooooooooooooo
 end
+
+(*$
+  let _ =
+    [ x (*
+      *)
+    ; y
+    ]
+  ;;
+*)
diff --git a/test/passing/tests/js_source.ml.ocp b/test/passing/tests/js_source.ml.ocp
@@ -10440,3 +10440,5 @@ module type M = sig
     : Simple_value_approx.function_declarations option
         Set_of_closures_id.Tbl.fooooooooooooooooooooooooo
 end
+
+(*$ let _ = [ x (* *); y ] *)
diff --git a/test/passing/tests/js_source.ml.ref b/test/passing/tests/js_source.ml.ref
@@ -10440,3 +10440,5 @@ module type M = sig
     : Simple_value_approx.function_declarations option
         Set_of_closures_id.Tbl.fooooooooooooooooooooooooo
 end
+
+(*$ let _ = [ x (* *); y ] *)
-Original file line number
+Diff line change
@@ Expand Up / @@ -8179,3 +8179,12 @@ module type M = sig @@
         : Simple_value_approx.function_declarations option
             Set_of_closures_id.Tbl.fooooooooooooooooooooooooo
     end
+    (*$
+      let _ =
+        [ x (*
+          *)
+        ; y
+        ]
+      ;;
+    *)