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

* call first_addpointer and first_cmppointer in pass_1 for pchars as well. Fixes
huge pointer arithmetic/comparison on huge pchars.

git-svn-id: trunk@28159 -

nickysn 11 жил өмнө
parent
commit
2b2224494b

+ 2 - 2
compiler/nadd.pas

@@ -3011,9 +3011,9 @@ implementation
          else if is_pchar(ld) then
          else if is_pchar(ld) then
            begin
            begin
              if nodetype in [addn,subn,muln,andn,orn,xorn] then
              if nodetype in [addn,subn,muln,andn,orn,xorn] then
-               expectloc:=LOC_REGISTER
+               result:=first_addpointer
              else
              else
-               expectloc:=LOC_FLAGS;
+               result:=first_cmppointer;
            end
            end
 
 
          { is one of the operands a string }
          { is one of the operands a string }