diff options
Diffstat (limited to 'gcc/ada/a-tasatt.adb')
| -rw-r--r-- | gcc/ada/a-tasatt.adb | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/gcc/ada/a-tasatt.adb b/gcc/ada/a-tasatt.adb index b1a6b2d..69c4b9b 100644 --- a/gcc/ada/a-tasatt.adb +++ b/gcc/ada/a-tasatt.adb @@ -276,8 +276,7 @@ package body Ada.Task_Attributes is -- For reference to directly addressed task attributes pragma Warnings (On); - -- End of warnings off region for directly addressed - -- attribute conversion functions. + -- End warnings off region for directly addressed attribute conversions function To_Access_Address is new Ada.Unchecked_Conversion (Access_Node, Access_Address); @@ -307,8 +306,6 @@ package body Ada.Task_Attributes is (Local_Deallocator, Deallocator); -- To defeat accessibility check - pragma Warnings (On); - ------------------------ -- Storage Management -- ------------------------ |