warnings

src/compiler/hxb/hxbAbstractReader.ml

@@ -1,4 +1,3 @@
-open Globals
 open HxbReaderApi
 open HxbReader
 
@@ -15,4 +14,4 @@ class virtual hxb_abstract_reader = object(self)
 				loop (cont (self :> hxb_reader_api) HEND)
 		in
 		loop result
-end
+end

src/core/tFunctions.ml

@@ -128,7 +128,7 @@ let class_module_type c =
 	{ (mk_typedef c.cl_module path c.cl_pos null_pos t) with t_private = true}
 
 let mk_class m path pos name_pos =
-	let rec c = {
+	let c = {
 		cl_path = path;
 		cl_module = m;
 		cl_pos = pos;
@@ -966,4 +966,4 @@ let class_field_of_enum_field ef = {
 	);
 	cf_doc = ef.ef_doc;
 	cf_params = ef.ef_params;
-}
+}