소스 검색

[jvm] actually we need the dynamic access generation for anons

Simon Krajewski 5 년 전
부모
커밋
8ef14c252b
1개의 변경된 파일2개의 추가작업 그리고 1개의 파일을 삭제
  1. 2 1
      src/generators/genjvm.ml

+ 2 - 1
src/generators/genjvm.ml

@@ -2743,7 +2743,8 @@ let generate_anons gctx =
 			load();
 			jm_fields#return
 		end;
-		if gctx.dynamic_level > 0 then generate_dynamic_access gctx jc (List.map (fun (name,jsig) -> name,jsig,Var {v_write = AccNormal;v_read = AccNormal}) fields) true;
+		(* This has to run even with dynamic_level = 0 because the entire DynamicObject logic depends on it. *)
+		generate_dynamic_access gctx jc (List.map (fun (name,jsig) -> name,jsig,Var {v_write = AccNormal;v_read = AccNormal}) fields) true;
 		begin match gctx.typedef_interfaces#get_interface_class path with
 		| None ->
 			()