Procházet zdrojové kódy

* check implementedinterfaces also when going from a Java class to
a Java interface

git-svn-id: branches/jvmbackend@18532 -

Jonas Maebe před 14 roky
rodič
revize
6614f3220c
1 změnil soubory, kde provedl 3 přidání a 1 odebrání
  1. 3 1
      compiler/defcmp.pas

+ 3 - 1
compiler/defcmp.pas

@@ -1328,7 +1328,9 @@ implementation
                    else if ((is_interface(def_to) and
                              is_class(def_from)) or
                             (is_objcprotocol(def_to) and
-                             is_objcclass(def_from))) and
+                             is_objcclass(def_from)) or
+                            (is_javainterface(def_to) and
+                             is_javaclass(def_from))) and
                            assigned(tobjectdef(def_from).ImplementedInterfaces) then
                      begin
                         { we've to search in parent classes as well }