Explorar o código

Merge pull request #2326 from nadako/2132_dont_flatten_extern

[js-flatten] Always use dot path for extern classes and enums (closes #2132)
Bruno Garcia %!s(int64=11) %!d(string=hai) anos
pai
achega
92cb71fce8
Modificáronse 1 ficheiros con 7 adicións e 1 borrados
  1. 7 1
      genjs.ml

+ 7 - 1
genjs.ml

@@ -1105,7 +1105,13 @@ let alloc_ctx com =
 		separator = false;
 		found_expose = false;
 	} in
-	ctx.type_accessor <- (fun t -> s_path ctx (t_path t));
+	ctx.type_accessor <- (fun t -> 
+		let p = t_path t in
+		match t with
+		| TClassDecl { cl_extern = true } 
+		| TEnumDecl { e_extern = true }
+			-> dot_path p
+		| _ -> s_path ctx p);
 	ctx
 
 let gen_single_expr ctx e expr =