mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-22 06:49:27 +02:00
* prefetch next items in TLinkedList.clear, removes most l2 cache misses
git-svn-id: trunk@13706 -
This commit is contained in:
parent
abda06eb20
commit
dac2903107
@ -2014,6 +2014,7 @@ end;
|
||||
while assigned(NewNode) do
|
||||
begin
|
||||
Next:=NewNode.Next;
|
||||
prefetch(next.next);
|
||||
NewNode.Free;
|
||||
NewNode:=Next;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user