mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-14 14:49:14 +02:00
* 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:
parent
3a774ce66a
commit
e04198d96f
@ -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;
|
||||
|
Loading…
Reference in New Issue
Block a user