Adding a test with g with some space.

ocsigen · Dec 15, 2023 · 0a98a80 · 0a98a80
1 parent 244b428
commit 0a98a80
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 0 deletions.
diff --git a/test/test_jsx.re b/test/test_jsx.re
@@ -262,6 +262,10 @@ let svg = (
         [<stop offset="50.1%" />],
         [stop(~a=[a_offset(`Percentage(50.1))], [])],
       ),
+      ( "g with space",
+        [<g> </g>],
+        [g(~a=[], [])],
+      ),
       ( "text x, y",
         [<text x="1 2" y="3 4" />],
         [

diff --git a/test/test_ppx.ml b/test/test_ppx.ml
@@ -374,6 +374,10 @@ let svg = "svg", SvgTests.make Svg.[
   [[%svg "<stop offset='50.1%'/>"]],
   [stop ~a:[a_offset (`Percentage 50.1)] []] ;
 
+  "g with space",
+  [[%svg "<g> </g>"]],
+  [g ~a:[] []] ;
+
   "text x, y",
   [[%svg "<text x='1 2' y='3 4'/>"]],
   [text ~a:[a_x_list [1., None; 2., None]; a_y_list [3., None; 4., None]] []] ;