In untyped backend, don’t emit function to check the type of the imported component.

Author: cristianoc

examples/untyped-react-example/src/ImportMyBanner.gen.js

@@ -6,10 +6,5 @@ import * as React from 'react';
 
 import * as ReasonReact from 'reason-react/src/ReasonReact.js';
 
-// In case of type error, check the type of 'make' in 'ImportMyBanner.re' and the props of './MyBanner'.
-export function MyBannerTypeChecked(props) {
-  return <MyBanner {...props}/>;
-}
-
 // Export 'make' early to allow circular import from the '.bs.js' file.
 export const make = function _(show, message, children) { return ReasonReact.wrapJsForReason(MyBanner, {show: show, message: (message == null ? message : {text:message[0]})}, children); };

src/EmitJs.re

@@ -402,33 +402,35 @@ let rec emitCodeItem =
         exportType,
       );
     let emitters =
-      "("
-      ++ (
-        "props"
-        |> EmitTyp.ofType(
+      config.language == Untyped ?
+        emitters :
+        "("
+        ++ (
+          "props"
+          |> EmitTyp.ofType(
+               ~config,
+               ~typeNameIsInterface,
+               ~typ=Ident(propsTypeName, []),
+             )
+        )
+        ++ ") {\n  return <"
+        ++ componentName
+        ++ " {...props}/>;\n}"
+        |> EmitTyp.emitExportFunction(
+             ~early=true,
+             ~emitters,
+             ~name=componentNameTypeChecked,
              ~config,
-             ~typeNameIsInterface,
-             ~typ=Ident(propsTypeName, []),
-           )
-      )
-      ++ ") {\n  return <"
-      ++ componentName
-      ++ " {...props}/>;\n}"
-      |> EmitTyp.emitExportFunction(
-           ~early=true,
-           ~emitters,
-           ~name=componentNameTypeChecked,
-           ~config,
-           ~comment=
-             "In case of type error, check the type of '"
-             ++ "make"
-             ++ "' in '"
-             ++ (fileName |> ModuleName.toString)
-             ++ ".re'"
-             ++ " and the props of '"
-             ++ (importPath |> ImportPath.toString)
-             ++ "'.",
-         );
+             ~comment=
+               "In case of type error, check the type of '"
+               ++ "make"
+               ++ "' in '"
+               ++ (fileName |> ModuleName.toString)
+               ++ ".re'"
+               ++ " and the props of '"
+               ++ (importPath |> ImportPath.toString)
+               ++ "'.",
+           );
 
     /* Wrap the component */
     let emitters =