Sfoglia il codice sorgente

* Fixed r46801 for the case of int64 params with a single paralocation.

git-svn-id: trunk@46802 -
yury 4 anni fa
parent
commit
d34168742e
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  1. 1 1
      compiler/ncgutil.pas

+ 1 - 1
compiler/ncgutil.pas

@@ -633,7 +633,7 @@ implementation
                 
                 Spilling of sub registers is supported for x86.
               }
-              if regsize>tcgsize2size[paraloc^.Size] then
+              if (paraloc<>nil) and (regsize>tcgsize2size[paraloc^.Size]) then
                 break;
 {$endif x86}
               cg.rg[regtype].set_reg_initial_location(reg,loc.reference);