Procházet zdrojové kódy

* fixed (harmless) class cast error when checking whether an aggregate
has the same size as one of its members to determine whether we can
exchange two temps rather than copying one to the other

git-svn-id: trunk@21259 -

Jonas Maebe před 13 roky
rodič
revize
41d86f2b26
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  1. 1 1
      compiler/ncgld.pas

+ 1 - 1
compiler/ncgld.pas

@@ -145,7 +145,7 @@ implementation
                { make sure we don't try to call resultdef.size for types that
                  don't have a compile-time size such as open arrays }
                is_special_array(tunarynode(n).left.resultdef) or
-               (tsubscriptnode(n).left.resultdef.size <> tunarynode(n).resultdef.size) then
+               (tunarynode(n).left.resultdef.size<>tunarynode(n).resultdef.size) then
               result := fen_norecurse_false;
 
           { optimize the searching a bit }