2
0
Эх сурвалжийг харах

* fix for Z80 pointer comparisons

git-svn-id: branches/z80@44986 -
nickysn 5 жил өмнө
parent
commit
fe8b50fed3

+ 1 - 1
compiler/z80/nz80add.pas

@@ -634,7 +634,7 @@ interface
 
 
     procedure TZ80AddNode.second_cmpordinal;
     procedure TZ80AddNode.second_cmpordinal;
       begin
       begin
-        if is_32bit(left.resultdef) or is_16bit(left.resultdef) then
+        if left.resultdef.size>=2 then
           second_cmp16_32_64bit
           second_cmp16_32_64bit
         else
         else
           second_cmp;
           second_cmp;