Browse Source

* always get the real class definition before writing out a mangled name

git-svn-id: branches/jvmbackend@18731 -
Jonas Maebe 14 năm trước cách đây
mục cha
commit
c7f6ee94e6
1 tập tin đã thay đổi với 4 bổ sung1 xóa
  1. 4 1
      compiler/jvmdef.pas

+ 4 - 1
compiler/jvmdef.pas

@@ -346,7 +346,10 @@ implementation
             case tobjectdef(def).objecttype of
               odt_javaclass,
               odt_interfacejava:
-                encodedstr:=encodedstr+'L'+tobjectdef(def).jvm_full_typename(true)+';'
+                begin
+                  def:=maybe_find_real_class_definition(def,false);
+                  encodedstr:=encodedstr+'L'+tobjectdef(def).jvm_full_typename(true)+';'
+                end
               else
                 result:=false;
             end;