Revert "fix fragment optional children"

This reverts commit 9b129d7.

Author: mununki

cli/reactjs_jsx_v4.ml

@@ -1368,22 +1368,24 @@ let expr ~config mapper expression =
           Exp.ident ~loc {loc; txt = Ldot (Lident "React", "fragment")}
       in
       let childrenExpr = transformChildrenIfList ~mapper listItems in
-      let recordOfChildren children =
-        Exp.record [(Location.mknoloc (Lident "children"), children)] None
-      in
       let args =
         [
           (nolabel, fragment);
           (match config.mode with
-          | "automatic" -> (
+          | "automatic" ->
             ( nolabel,
-              match childrenExpr with
-              | {pexp_desc = Pexp_array children} -> (
-                match children with
-                | [] -> emptyRecord ~loc:Location.none
-                | [child] -> recordOfChildren child
-                | _ -> recordOfChildren childrenExpr)
-              | _ -> recordOfChildren childrenExpr ))
+              Exp.record
+                [
+                  ( Location.mknoloc @@ Lident "children",
+                    match childrenExpr with
+                    | {pexp_desc = Pexp_array children} -> (
+                      match children with
+                      | [] -> emptyRecord ~loc:Location.none
+                      | [child] -> child
+                      | _ -> childrenExpr)
+                    | _ -> childrenExpr );
+                ]
+                None )
           | "classic" | _ -> (nolabel, childrenExpr));
         ]
       in

tests/ppx/react/expected/fragment.res.txt

@@ -10,9 +10,9 @@ let _ = ReactDOM.createDOMElementVariadic("div", [ReactDOM.createDOMElementVaria
 
 @@jsxConfig({version: 4, mode: "automatic"})
 
-let _ = React.jsx(React.jsxFragment, {})
+let _ = React.jsx(React.jsxFragment, {children: {}})
 let _ = React.jsx(React.jsxFragment, {children: ReactDOM.jsx("div", {})})
-let _ = React.jsx(React.jsxFragment, {children: React.jsx(React.jsxFragment, {})})
+let _ = React.jsx(React.jsxFragment, {children: React.jsx(React.jsxFragment, {children: {}})})
 let _ = React.jsx(Z.make, {})
 let _ = React.jsx(Z.make, {children: ReactDOM.jsx("div", {})})
 let _ = ReactDOM.jsx("div", {})