add Jsx

Author: mununki

jscomp/frontend/ppx_entry.ml

@@ -42,7 +42,7 @@ let rewrite_signature (ast : Parsetree.signature) : Parsetree.signature =
   else
     let result = unsafe_mapper.signature unsafe_mapper ast in
     (* Keep this check, since the check is not inexpensive*)
-    (* Bs_ast_invariant.emit_external_warnings_on_signature result; *)
+    Bs_ast_invariant.emit_external_warnings_on_signature result;
     result
 
 let rewrite_implementation (ast : Parsetree.structure) : Parsetree.structure =
@@ -62,5 +62,5 @@ let rewrite_implementation (ast : Parsetree.structure) : Parsetree.structure =
   else
     let result = unsafe_mapper.structure unsafe_mapper ast in
     (* Keep this check since it is not inexpensive*)
-    (* Bs_ast_invariant.emit_external_warnings_on_structure result; *)
+    Bs_ast_invariant.emit_external_warnings_on_structure result;
     result

jscomp/main/builtin_cmi_datasets.ml

@@ -0,0 +1,39 @@
+(* Copyright (C) 2015-2016 Bloomberg Finance L.P.
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Lesser General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * In addition to the permissions granted to you by the LGPL, you may combine
+ * or link a "work that uses the Library" with a publicly distributed version
+ * of this file to produce a combined library or application, then distribute
+ * that combined work under the terms of your choosing, with no requirement
+ * to comply with the obligations normally placed on you by section 4 of the
+ * LGPL version 3 (or the corresponding section of a later version of the LGPL
+ * should you choose to use a later version).
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *)
+
+type element
+type ref
+
+external null : element = "null" [@@bs.val]
+external float : float -> element = "%identity"
+external int : int -> element = "%identity"
+external string : string -> element = "%identity"
+external array : element array -> element = "%identity"
+
+type ('props, 'return) componentLike = 'props -> 'return
+type 'props component = ('props, element) componentLike
+
+(* this function exists to prepare for making `component` abstract *)
+external component : ('props, element) componentLike -> 'props component
+  = "%identity"