mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-07-24 08:36:26 +02:00
* always get the real class definition before writing out a mangled name
git-svn-id: branches/jvmbackend@18731 -
This commit is contained in:
parent
441787672d
commit
c7f6ee94e6
@ -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;
|
||||
|
Loading…
Reference in New Issue
Block a user