Browse Source

[jvm] little boxes on the haxeside

Simon Krajewski 5 năm trước cách đây
mục cha
commit
df312ed199
1 tập tin đã thay đổi với 3 bổ sung1 xóa
  1. 3 1
      src/generators/genjvm.ml

+ 3 - 1
src/generators/genjvm.ml

@@ -159,7 +159,9 @@ let rec jsignature_of_type gctx stack t =
 	| TLazy f -> jsignature_of_type (lazy_type f)
 	| TLazy f -> jsignature_of_type (lazy_type f)
 
 
 and jtype_argument_of_type gctx stack t =
 and jtype_argument_of_type gctx stack t =
-	TType(WNone,jsignature_of_type gctx stack t)
+	let jsig = jsignature_of_type gctx stack t in
+	let jsig = get_boxed_type jsig in
+	TType(WNone,jsig)
 
 
 and return_of_type gctx stack t =
 and return_of_type gctx stack t =
 	if ExtType.is_void (follow t) then None else Some (jsignature_of_type gctx stack t)
 	if ExtType.is_void (follow t) then None else Some (jsignature_of_type gctx stack t)