Explorar el Código

* load implementedinterfaces for odt_javaclass

git-svn-id: branches/jvmbackend@18531 -
Jonas Maebe hace 14 años
padre
commit
cd42bdc42f
Se han modificado 1 ficheros con 1 adiciones y 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;