GitHub-Mirror/x2utils
1
0
Fork 0
mirror of synced 2024-12-22 17:23:07 +01:00
Code Issues Projects Releases Wiki Activity

Fixed: Exists implementation failed for different keys with the same hash value

Browse Source
This commit is contained in:
Mark van Renswoude 2004-09-05 13:48:19 +00:00
parent 72f1763ea1
commit 011897142c
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
X2UtHashes.pas
View File

@ -415,8 +415,11 @@ begin
end; end;
function TX2CustomHash.Exists; function TX2CustomHash.Exists;
var
pNode: PX2BTreeNode;
begin begin
Result := inherited Exists(Hash(AKey), ASetCursor); Result := Assigned(LookupItem(AKey, pNode, False, ASetCursor));
end; end;