소스 검색

* 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 13 년 전
부모
커밋
41d86f2b26
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  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 }