[Ada] Simplify helper units for formal hashed sets/maps
commit4c9a8183b3469f50c9418a2309e56b37cbac9f9f
authorYannick Moy <moy@adacore.com>
Thu, 24 Feb 2022 16:30:36 +0000 (24 17:30 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Fri, 13 May 2022 08:04:41 +0000 (13 08:04 +0000)
tree28c7c3b4bf906b1f675a91b4c935127ff6c0d99a
parentf8e12e78628238a9e3cf68ce9376aa2e28e0506f
[Ada] Simplify helper units for formal hashed sets/maps

As tampering checks do not exist in formal hashed sets and maps, remove
the machinery for such checks in the version of generic key and node
operations for formal sets/maps. Update comments as well.

gcc/ada/

* libgnat/a-chtgfk.adb (Checked_Equivalent_Keys, Checked_Index):
Remove useless functions.
(Delete_Key_Sans_Free, Find, Generic_Conditional_Insert): Adapt
to removal of wrapper functions.
* libgnat/a-chtgfk.ads (Checked_Equivalent_Keys, Checked_Index):
Remove useless functions.
* libgnat/a-chtgfo.adb (Checked_Index): Remove useless function.
(Clear): Delete code commented out regarding Busy and Lock
management.
(Delete_Node_At_Index): Delete unused procedure.
(Delete_Node_Sans_Free, Free, Generic_Read, Next): Adapt to
removal of wrapper functions.
* libgnat/a-chtgfo.ads (Checked_Index): Remove useless function.
(Delete_Node_At_Index): Delete unused procedure.
gcc/ada/libgnat/a-chtgfk.adb
gcc/ada/libgnat/a-chtgfk.ads
gcc/ada/libgnat/a-chtgfo.adb
gcc/ada/libgnat/a-chtgfo.ads