Browse Source

[java-lib] Ignore java.lang.String on --gen-hx-classes

Cauê Waneck 10 years ago
parent
commit
e99a795b23
2 changed files with 4 additions and 1 deletions
  1. 3 0
      genjava.ml
  2. 1 1
      main.ml

+ 3 - 0
genjava.ml

@@ -2604,8 +2604,11 @@ let mk_type_path ctx path params =
 		| [], ("Bool" as c)
 		| [], ("Bool" as c)
 		| [], ("Dynamic" as c)
 		| [], ("Dynamic" as c)
 		| [], ("Iterator" as c)
 		| [], ("Iterator" as c)
+		| [], ("ArrayAccess" as c)
 		| [], ("Iterable" as c) ->
 		| [], ("Iterable" as c) ->
 			[], Some c, "StdTypes"
 			[], Some c, "StdTypes"
+		| [], ("String" as c) ->
+			["std"], None, c
 		| _ ->
 		| _ ->
 			pack, sub, name
 			pack, sub, name
 	in
 	in

+ 1 - 1
main.ml

@@ -1198,7 +1198,7 @@ try
 				) com.swf_libs;
 				) com.swf_libs;
 				List.iter (fun (_,std,_,all_files,_) ->
 				List.iter (fun (_,std,_,all_files,_) ->
 					if not std then
 					if not std then
-						List.iter (fun path -> classes := path :: !classes) (all_files())
+						List.iter (fun path -> if path <> (["java";"lang"],"String") then classes := path :: !classes) (all_files())
 				) com.java_libs;
 				) com.java_libs;
 				List.iter (fun (_,std,all_files,_) ->
 				List.iter (fun (_,std,all_files,_) ->
 					if not std then
 					if not std then