Преглед изворни кода

* fixes ttypeconvnode.docompare hopefully finally (nobody has seen my last attempt ;))

git-svn-id: trunk@14755 -
florian пре 15 година
родитељ
комит
f12ba2ed23
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      compiler/ncnv.pas

+ 1 - 1
compiler/ncnv.pas

@@ -3019,7 +3019,7 @@ implementation
         docompare :=
           inherited docompare(p) and
           (convtype = ttypeconvnode(p).convtype) and
-          equal_defs(resultdef,left.resultdef);
+          equal_defs(totypedef,ttypeconvnode(p).totypedef);
       end;