Преглед на файлове

Merge pull request #2457 from stroncium/development

fixed js syntax error with extern @:initPackage classes with empty package
Bruno Garcia преди 11 години
родител
ревизия
0cef84b293
променени са 1 файла, в които са добавени 5 реда и са изтрити 3 реда
  1. 5 3
      genjs.ml

+ 5 - 3
genjs.ml

@@ -1073,7 +1073,9 @@ let generate_type ctx = function
 		if not c.cl_extern then
 			generate_class ctx c
 		else if not ctx.js_flatten && Meta.has Meta.InitPackage c.cl_meta then
-			generate_package_create ctx c.cl_path
+			(match c.cl_path with
+			| ([],_) -> ()
+			| _ -> generate_package_create ctx c.cl_path)
 	| TEnumDecl e when e.e_extern ->
 		()
 	| TEnumDecl e -> generate_enum ctx e
@@ -1112,10 +1114,10 @@ let alloc_ctx com =
 		separator = false;
 		found_expose = false;
 	} in
-	ctx.type_accessor <- (fun t -> 
+	ctx.type_accessor <- (fun t ->
 		let p = t_path t in
 		match t with
-		| TClassDecl { cl_extern = true } 
+		| TClassDecl { cl_extern = true }
 		| TEnumDecl { e_extern = true }
 			-> dot_path p
 		| _ -> s_path ctx p);