Part1: remove ocaml style OO, prepare JS style OO

Author: bobzhang

jscomp/frontend/bs_ast_invariant.ml

@@ -130,12 +130,20 @@ let emit_external_warnings : iterator=
         when !Config.syntax_kind = `rescript ->        
           Location.raise_errorf ~loc:str_item.pstr_loc 
           "GADT has to be recursive types, please try `type rec'" 
+       | Pstr_class _ -> 
+         Location.raise_errorf ~loc:str_item.pstr_loc 
+           "OCaml style classes are not supported"   
       | _ -> super.structure_item self str_item  
     );
     expr = (fun self a -> 
         match a.pexp_desc with  
         | Pexp_constant(const) -> check_constant a.pexp_loc `expr const
-        | _ -> super.expr self a 
+        | Pexp_object _ 
+        | Pexp_new _  -> 
+          Location.raise_errorf ~loc:a.pexp_loc
+            "OCaml style objects are not supported"
+        (* | Pexp_send  *)
+        | _ -> super.expr self a         
       );
     label_declaration = (fun self lbl ->     
 

jscomp/test/build.ninja

@@ -111,17 +111,9 @@ o test/caml_format_test.cmi test/caml_format_test.cmj : cc test/caml_format_test
 o test/caml_sys_poly_fill_test.cmi test/caml_sys_poly_fill_test.cmj : cc test/caml_sys_poly_fill_test.ml | test/mt.cmj $stdlib
 o test/chain_code_test.cmi test/chain_code_test.cmj : cc test/chain_code_test.ml | test/mt.cmj $stdlib
 o test/chn_test.cmi test/chn_test.cmj : cc test/chn_test.ml | test/mt.cmj $stdlib
-o test/class3_test.cmi test/class3_test.cmj : cc test/class3_test.ml | test/mt.cmj $stdlib
-o test/class4_test.cmi test/class4_test.cmj : cc test/class4_test.ml | test/mt.cmj $stdlib
-o test/class5_test.cmi test/class5_test.cmj : cc test/class5_test.ml | test/mt.cmj $stdlib
-o test/class6_test.cmi test/class6_test.cmj : cc test/class6_test.ml | test/mt.cmj $stdlib
-o test/class7_test.cmi test/class7_test.cmj : cc test/class7_test.ml | test/mt.cmj $stdlib
-o test/class8_test.cmi test/class8_test.cmj : cc test/class8_test.ml | test/mt.cmj $stdlib
-o test/class_fib_open_recursion_test.cmi test/class_fib_open_recursion_test.cmj : cc test/class_fib_open_recursion_test.ml | test/mt.cmj $stdlib
 o test/class_repr.cmi test/class_repr.cmj : cc test/class_repr.ml | $stdlib
 o test/class_setter_getter.cmj : cc_cmi test/class_setter_getter.ml | test/class_setter_getter.cmi $stdlib
 o test/class_setter_getter.cmi : cc test/class_setter_getter.mli | $stdlib
-o test/class_test.cmi test/class_test.cmj : cc test/class_test.ml | test/mt.cmj $stdlib
 o test/class_type_ffi_test.cmi test/class_type_ffi_test.cmj : cc test/class_type_ffi_test.ml | $stdlib
 o test/compare_test.cmi test/compare_test.cmj : cc test/compare_test.ml | $stdlib
 o test/complete_parmatch_test.cmi test/complete_parmatch_test.cmj : cc test/complete_parmatch_test.ml | $stdlib
@@ -241,7 +233,6 @@ o test/gpr_1170.cmi test/gpr_1170.cmj : cc test/gpr_1170.ml | $stdlib
 o test/gpr_1240_missing_unbox.cmi test/gpr_1240_missing_unbox.cmj : cc test/gpr_1240_missing_unbox.ml | $stdlib
 o test/gpr_1245_test.cmi test/gpr_1245_test.cmj : cc test/gpr_1245_test.ml | $stdlib
 o test/gpr_1268.cmi test/gpr_1268.cmj : cc test/gpr_1268.ml | $stdlib
-o test/gpr_1285_test.cmi test/gpr_1285_test.cmj : cc test/gpr_1285_test.ml | test/mt.cmj $stdlib
 o test/gpr_1409_test.cmi test/gpr_1409_test.cmj : cc test/gpr_1409_test.ml | test/mt.cmj test/string_set.cmj $stdlib
 o test/gpr_1423_app_test.cmi test/gpr_1423_app_test.cmj : cc test/gpr_1423_app_test.ml | test/gpr_1423_nav.cmj test/mt.cmj $stdlib
 o test/gpr_1423_nav.cmi test/gpr_1423_nav.cmj : cc test/gpr_1423_nav.ml | $stdlib
@@ -269,7 +260,6 @@ o test/gpr_1822_test.cmi test/gpr_1822_test.cmj : cc test/gpr_1822_test.ml | tes
 o test/gpr_1891_test.cmi test/gpr_1891_test.cmj : cc test/gpr_1891_test.ml | $stdlib
 o test/gpr_1943_test.cmi test/gpr_1943_test.cmj : cc test/gpr_1943_test.ml | test/mt.cmj $stdlib
 o test/gpr_1946_test.cmi test/gpr_1946_test.cmj : cc test/gpr_1946_test.ml | test/mt.cmj $stdlib
-o test/gpr_2250_test.cmi test/gpr_2250_test.cmj : cc test/gpr_2250_test.ml | test/mt.cmj $stdlib
 o test/gpr_2316_test.cmi test/gpr_2316_test.cmj : cc test/gpr_2316_test.ml | test/mt.cmj $stdlib
 o test/gpr_2352_test.cmi test/gpr_2352_test.cmj : cc test/gpr_2352_test.ml | $stdlib
 o test/gpr_2413_test.cmi test/gpr_2413_test.cmj : cc test/gpr_2413_test.ml | $stdlib
@@ -474,7 +464,6 @@ o test/obj_literal_ppx.cmi test/obj_literal_ppx.cmj : cc test/obj_literal_ppx.ml
 o test/obj_literal_ppx_test.cmi test/obj_literal_ppx_test.cmj : cc test/obj_literal_ppx_test.ml | $stdlib
 o test/obj_magic_test.cmi test/obj_magic_test.cmj : cc test/obj_magic_test.ml | test/mt.cmj $stdlib
 o test/obj_repr_test.cmi test/obj_repr_test.cmj : cc test/obj_repr_test.ml | $stdlib
-o test/obj_test.cmi test/obj_test.cmj : cc test/obj_test.ml | test/mt.cmj $stdlib
 o test/obj_type_test.cmi test/obj_type_test.cmj : cc test/obj_type_test.ml | $stdlib
 o test/ocaml_parsetree_test.cmj : cc_cmi test/ocaml_parsetree_test.ml | test/nativeint.cmj test/ocaml_parsetree_test.cmi $stdlib
 o test/ocaml_parsetree_test.cmi : cc test/ocaml_parsetree_test.mli | $stdlib
@@ -486,8 +475,6 @@ o test/ocaml_typedtree_test.cmi : cc test/ocaml_typedtree_test.mli | $stdlib
 o test/of_string_test.cmi test/of_string_test.cmj : cc test/of_string_test.ml | test/mt.cmj $stdlib
 o test/offset.cmi test/offset.cmj : cc test/offset.ml | $stdlib
 o test/oo_js_test_date.cmi test/oo_js_test_date.cmj : cc test/oo_js_test_date.ml | test/mt.cmj $stdlib
-o test/opr_3576_test.cmi test/opr_3576_test.cmj : cc test/opr_3576_test.ml | test/mt.cmj $stdlib
-o test/opr_4560_test.cmi test/opr_4560_test.cmj : cc test/opr_4560_test.ml | test/mt.cmj $stdlib
 o test/option_repr_test.cmi test/option_repr_test.cmj : cc test/option_repr_test.ml | test/mt.cmj $stdlib
 o test/optional_ffi_test.cmi test/optional_ffi_test.cmj : cc test/optional_ffi_test.ml | test/mt.cmj $stdlib
 o test/optional_regression_test.cmi test/optional_regression_test.cmj : cc test/optional_regression_test.ml | test/mt.cmj $stdlib