Fixed: Exists implementation failed for different keys with the same hash value
This commit is contained in:
parent
72f1763ea1
commit
011897142c
@ -415,8 +415,11 @@ begin
|
||||
end;
|
||||
|
||||
function TX2CustomHash.Exists;
|
||||
var
|
||||
pNode: PX2BTreeNode;
|
||||
|
||||
begin
|
||||
Result := inherited Exists(Hash(AKey), ASetCursor);
|
||||
Result := Assigned(LookupItem(AKey, pNode, False, ASetCursor));
|
||||
end;
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user