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

git-svn-id: branches/jvmbackend@18731 -
This commit is contained in:
Jonas Maebe 2011-08-20 08:28:57 +00:00
parent 441787672d
commit c7f6ee94e6

View File

@ -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;