[java] read abstract property in JAR loader

src/codegen/java.ml

@@ -237,7 +237,7 @@ let convert_java_enum ctx p pe =
 		d_data = List.rev !data;
 	}
 
-	let convert_java_field ctx p jc field =
+	let convert_java_field ctx p jc is_interface field =
 		let p = { p with pfile =	p.pfile ^" (" ^field.jf_name ^")" } in
 		let cff_doc = None in
 		let cff_pos = p in
@@ -275,6 +275,8 @@ let convert_java_enum ctx p pe =
 			| JVolatile -> cff_meta := (Meta.Volatile, [], p) :: !cff_meta
 			| JTransient -> cff_meta := (Meta.Transient, [], p) :: !cff_meta
 			(* | JVarArgs -> cff_meta := (Meta.VarArgs, [], p) :: !cff_meta *)
+			| JAbstract when not is_interface ->
+				cff_access := (AAbstract, p) :: !cff_access
 			| _ -> ()
 		) field.jf_flags;
 
@@ -442,16 +444,20 @@ let convert_java_enum ctx p pe =
 				meta := (Meta.LibType,[],p) :: !meta;
 
 			let is_interface = ref false in
+			let is_abstract =  ref false in
 			List.iter (fun f -> match f with
 				| JFinal -> flags := HFinal :: !flags
 				| JInterface ->
 						is_interface := true;
 						flags := HInterface :: !flags
-				| JAbstract -> meta := (Meta.Abstract, [], p) :: !meta
+				| JAbstract ->
+					meta := (Meta.Abstract, [], p) :: !meta;
+					is_abstract := true;
 				| JAnnotation -> meta := (Meta.Annotation, [], p) :: !meta
 				| _ -> ()
 			) jc.cflags;
 
+			if !is_abstract && not !is_interface then flags := HAbstract :: !flags;
 			(match jc.csuper with
 				| TObject( (["java";"lang"], "Object"), _ ) -> ()
 				| TObject( (["haxe";"lang"], "HxObject"), _ ) -> meta := (Meta.HxGen,[],p) :: !meta
@@ -477,7 +483,7 @@ let convert_java_enum ctx p pe =
 						if !is_interface && List.mem JStatic f.jf_flags then
 							()
 						else begin
-							fields := convert_java_field ctx p jc f :: !fields;
+							fields := convert_java_field ctx p jc !is_interface f :: !fields;
 							jfields := f :: !jfields
 						end
 					with

src/codegen/javaModern.ml

@@ -758,7 +758,7 @@ module Converter = struct
 			PMap.add s (ct_type_param s) acc
 		) acc params
 
-	let convert_field ctx is_method (jc : jclass) (jf : jfield) p =
+	let convert_field ctx is_method (jc : jclass) (is_interface : bool) (jf : jfield) p =
 		let ctx = {
 			type_params = type_param_lut ctx.type_params jf.jf_types;
 		} in
@@ -798,6 +798,7 @@ module Converter = struct
 		in
 		if is_method then add_meta (Meta.Overload,[],p);
 		if AccessFlags.has_flag jf.jf_flags MFinal then add_access (AFinal,p);
+		if not is_interface && AccessFlags.has_flag jf.jf_flags MAbstract then add_access (AAbstract,p);
 		let extract_local_names () =
 			let default i =
 				"param" ^ string_of_int i
@@ -881,7 +882,8 @@ module Converter = struct
 		let add_meta m = meta := m :: !meta in
 		add_meta (Meta.LibType,[],p);
 		let is_interface = AccessFlags.has_flag jc.jc_flags MInterface in
-		if is_interface then add_flag HInterface;
+		if is_interface then add_flag HInterface
+		else if AccessFlags.has_flag jc.jc_flags MAbstract then add_flag HAbstract;
 		begin match jc.jc_super with
 			| TObject(([],""),_)
 			| TObject((["java";"lang"],"Object"),_) ->
@@ -913,7 +915,7 @@ module Converter = struct
 					let key = (jf.jf_name,sig_key) in
 					if not (Hashtbl.mem known_sigs key) then begin
 						Hashtbl.add known_sigs key jf;
-						DynArray.add fields (convert_field ctx true jc jf p)
+						DynArray.add fields (convert_field ctx true jc is_interface jf p)
 					end
 				end
 			) jc.jc_methods;
@@ -921,7 +923,7 @@ module Converter = struct
 				if should_generate jf then begin
 					if not (Hashtbl.mem known_names jf.jf_name) then begin
 						Hashtbl.add known_names jf.jf_name jf;
-						DynArray.add fields (convert_field ctx false jc jf p)
+						DynArray.add fields (convert_field ctx false jc is_interface jf p)
 					end
 				end
 			) jc.jc_fields;

std/java/lang/Boolean.hx

@@ -51,4 +51,9 @@ package java.lang;
 	@:native("toString") @:overload static function _toString(param1:Bool):String;
 	@:overload static function valueOf(param1:Bool):Boolean;
 	@:overload static function valueOf(param1:String):Boolean;
+
+	function doubleValue():Float;
+	function floatValue():Single;
+	function intValue():Int;
+	function longValue():haxe.Int64;
 }

std/java/lang/Byte.hx

@@ -53,6 +53,11 @@ package java.lang;
 	@:overload static function valueOf(param1:java.types.Int8):Byte;
 	@:overload @:throws("java.lang.NumberFormatException") static function valueOf(param1:String):Byte;
 	@:overload @:throws("java.lang.NumberFormatException") static function valueOf(param1:String, param2:Int):Byte;
+
+	function doubleValue():Float;
+	function floatValue():Single;
+	function intValue():Int;
+	function longValue():haxe.Int64;
 }
 
 @:realPath("java.lang.Byte_ByteCache") @:javaNative @:native("java.lang.Byte$ByteCache") @:javaCanonical("java.lang",

std/java/lang/Double.hx

@@ -64,4 +64,9 @@ package java.lang;
 	@:native("toString") @:overload static function _toString(param1:Float):String;
 	@:overload static function valueOf(param1:Float):Double;
 	@:overload @:throws("java.lang.NumberFormatException") static function valueOf(param1:String):Double;
+
+	function doubleValue():Float;
+	function floatValue():Single;
+	function intValue():Int;
+	function longValue():haxe.Int64;
 }

std/java/lang/Float.hx

@@ -65,4 +65,9 @@ package java.lang;
 	@:native("toString") @:overload static function _toString(param1:Single):String;
 	@:overload static function valueOf(param1:Single):Float;
 	@:overload @:throws("java.lang.NumberFormatException") static function valueOf(param1:String):Float;
+
+	function doubleValue():Float;
+	function floatValue():Single;
+	function intValue():Int;
+	function longValue():haxe.Int64;
 }

std/java/lang/Integer.hx

@@ -70,6 +70,11 @@ package java.lang;
 	@:overload static function valueOf(param1:Int):Integer;
 	@:overload @:throws("java.lang.NumberFormatException") static function valueOf(param1:String, param2:Int):Integer;
 	@:overload @:throws("java.lang.NumberFormatException") static function valueOf(param1:String):Integer;
+
+	function doubleValue():Float;
+	function floatValue():Single;
+	function intValue():Int;
+	function longValue():haxe.Int64;
 }
 
 @:realPath("java.lang.Integer_IntegerCache") @:javaNative @:native("java.lang.Integer$IntegerCache") @:javaCanonical("java.lang",

std/java/lang/Long.hx

@@ -70,6 +70,11 @@ package java.lang;
 	@:overload static function valueOf(param1:haxe.Int64):Long;
 	@:overload @:throws("java.lang.NumberFormatException") static function valueOf(param1:String, param2:Int):Long;
 	@:overload @:throws("java.lang.NumberFormatException") static function valueOf(param1:String):Long;
+
+	function doubleValue():Float;
+	function floatValue():Single;
+	function intValue():Int;
+	function longValue():haxe.Int64;
 }
 
 @:realPath("java.lang.Long_LongCache") @:javaNative @:native("java.lang.Long$LongCache") @:javaCanonical("java.lang",

std/java/lang/Short.hx

@@ -54,6 +54,11 @@ package java.lang;
 	@:overload static function valueOf(param1:java.types.Int16):Short;
 	@:overload @:throws("java.lang.NumberFormatException") static function valueOf(param1:String, param2:Int):Short;
 	@:overload @:throws("java.lang.NumberFormatException") static function valueOf(param1:String):Short;
+
+	function doubleValue():Float;
+	function floatValue():Single;
+	function intValue():Int;
+	function longValue():haxe.Int64;
 }
 
 @:realPath("java.lang.Short_ShortCache") @:javaNative @:native("java.lang.Short$ShortCache") @:javaCanonical("java.lang",