Sfoglia il codice sorgente

* reduce initial size of movelist, 16 is enough for most cases

git-svn-id: trunk@36324 -
florian 8 anni fa
parent
commit
4b17ad80d0
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  1. 1 1
      compiler/rgobj.pas

+ 1 - 1
compiler/rgobj.pas

@@ -720,7 +720,7 @@ unit rgobj;
             begin
               { don't use sizeof(tmovelistheader), because that ignores alignment }
               getmem(movelist,ptruint(@movelist^.data)-ptruint(movelist)+60*sizeof(pointer));
-              movelist^.header.maxcount:=60;
+              movelist^.header.maxcount:=16;
               movelist^.header.count:=0;
               movelist^.header.sorted_until:=0;
             end