mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-13 12:49:20 +02:00
* Do not raise an error when an attempt is made to delete a non-existing key
git-svn-id: trunk@12326 -
This commit is contained in:
parent
e357cd02ac
commit
977e033932
@ -2112,7 +2112,6 @@ begin
|
|||||||
exit;
|
exit;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
raise EKeyNotFound.CreateFmt(KeyNotFoundMsg, ['Delete', aKey]);
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TFPCustomHashTable.IsEmpty: boolean;
|
function TFPCustomHashTable.IsEmpty: boolean;
|
||||||
|
Loading…
Reference in New Issue
Block a user