Parcourir la source

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

git-svn-id: trunk@36324 -
florian il y a 8 ans
Parent
commit
4b17ad80d0
1 fichiers modifiés avec 1 ajouts et 1 suppressions
  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