Explorar el Código

* set expectloc correctly for small CPUs for implicit pointer object types in the first pass of the add nodes

git-svn-id: branches/z80@45041 -
nickysn hace 5 años
padre
commit
2ee28809d8
Se han modificado 1 ficheros con 4 adiciones y 1 borrados
  1. 4 1
      compiler/nadd.pas

+ 4 - 1
compiler/nadd.pas

@@ -4162,7 +4162,10 @@ implementation
 
          else if is_implicit_pointer_object_type(ld) then
             begin
-              expectloc:=LOC_FLAGS;
+              if ld.size>sizeof(aint) then
+                expectloc:=LOC_JUMP
+              else
+                expectloc:=LOC_FLAGS;
             end
 
          else if (ld.typ=classrefdef) then