paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2026-02-04 07:34:51 +01:00
Code Issues Packages Projects Releases Wiki Activity

* TDOMNodeList.GetCount speed up from alexx, fixes #6891

Browse Source 
git-svn-id: trunk@3568 -
This commit is contained in:
florian 2006-05-18 20:20:55 +00:00
parent 5e4776f4ce
commit 1e3352a350
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
fcl/xml/dom.pp
View File

@ -959,6 +959,11 @@ function TDOMNodeList.GetCount: LongWord;
var
child: TDOMNode;
begin
if not UseFilter then
begin
Result := Count;
exit;
end;
Result := 0;
child := node.FirstChild;
while Assigned(child) do