+ set expectloc in the first pass of the addnode for small CPUs for procvardef comparisons

git-svn-id: branches/z80@45044 -

compiler/nadd.pas

@@ -4206,7 +4206,10 @@ implementation
                   (ld.typ=procvardef) and
                   equal_defs(rd,ld) then
            begin
-             expectloc:=LOC_FLAGS;
+             if tprocvardef(ld).size>sizeof(aint) then
+               expectloc:=LOC_JUMP
+             else
+               expectloc:=LOC_FLAGS;
            end
 
          else if (ld.typ=enumdef) then