소스 검색

Allow for EnumTools and EnumValueTools in separate files

Hugh Sanderson 12 년 전
부모
커밋
65a313d982
1개의 변경된 파일5개의 추가작업 그리고 0개의 파일을 삭제
  1. 5 0
      typer.ml

+ 5 - 0
typer.ml

@@ -3881,6 +3881,11 @@ let rec create com =
 	let m = Typeload.load_module ctx (["haxe"],"EnumTools") null_pos in
 	(match m.m_types with
 	| [TClassDecl c1;TClassDecl c2] -> ctx.g.global_using <- c1 :: c2 :: ctx.g.global_using
+	| [TClassDecl c1] ->
+		let m = Typeload.load_module ctx (["haxe"],"EnumValueTools") null_pos in
+		(match m.m_types with
+		| [TClassDecl c2 ] -> ctx.g.global_using <- c1 :: c2 :: ctx.g.global_using
+		| _ -> assert false);
 	| _ -> assert false);
 	ctx