Explorar o código

* load implementedinterfaces for odt_javaclass

git-svn-id: branches/jvmbackend@18531 -
Jonas Maebe %!s(int64=14) %!d(string=hai) anos
pai
achega
cd42bdc42f
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/symdef.pas

+ 1 - 1
compiler/symdef.pas

@@ -4773,7 +4773,7 @@ implementation
            end;
 
          { load implemented interfaces }
-         if objecttype in [odt_class,odt_objcclass,odt_objcprotocol,odt_interfacejava] then
+         if objecttype in [odt_class,odt_objcclass,odt_objcprotocol,odt_javaclass,odt_interfacejava] then
            begin
              ImplementedInterfaces:=TFPObjectList.Create(true);
              implintfcount:=ppufile.getlongint;