* prefetch next list elements while writing out assembler list, makes

that routine 15-20% faster on my Core 2

git-svn-id: trunk@14137 -
This commit is contained in:
Jonas Maebe 2009-11-10 19:32:49 +00:00
parent 3a774ce66a
commit e04198d96f

View File

@ -595,6 +595,7 @@ implementation
hp:=tai(p.first);
while assigned(hp) do
begin
prefetch(pointer(hp.next)^);
if not(hp.typ in SkipLineInfo) then
begin
hp1 := hp as tailineinfo;