2007-04-20 Robert Dewar <dewar@adacore.com>

	* a-taster.adb, s-osinte-hpux.ads, s-osinte-solaris-posix.ads,
	s-osinte-irix.ads, s-interr-sigaction.adb, s-mastop-irix.adb,
	s-osinte-hpux-dce.ads, s-osinte-interix.ads, s-osinte-solaris.ads,
	s-taspri-solaris.ads, s-inmaop-vms.adb, s-interr-vms.adb,
	s-mastop-vms.adb, s-osinte-vms.ads, s-tpopde-vms.adb,
	s-osinte-mingw.ads, s-interr-vxworks.adb, i-cstrea-vms.adb,
	a-diocst.adb, a-direio.adb, a-interr.adb, a-sequio.adb, a-siocst.adb,
	a-ssicst.adb, a-storio.adb, a-ststio.adb, a-stwima.adb, a-tasatt.adb,
	a-taside.adb, a-tiocst.adb, a-witeio.adb, a-wtcstr.adb, g-crc32.adb,
	g-dirope.adb, g-dyntab.adb, g-memdum.adb, g-regexp.adb, g-spipat.adb,
	g-spitbo.adb, g-string.adb, g-string.ads, g-table.adb, g-thread.adb,
	i-cobol.adb, i-cpoint.adb, i-cstrea.adb, i-cstrin.adb, i-pacdec.adb,
	s-addima.adb, s-arit64.adb, s-auxdec.adb, s-auxdec.ads,
	s-auxdec-vms_64.ads, s-carsi8.adb, s-carun8.adb, s-casi16.adb,
	s-casi32.adb, s-casi64.adb, s-caun16.adb, s-caun32.adb, s-caun64.adb,
	s-direio.adb, s-fileio.adb, s-finimp.ads, s-geveop.adb, s-imgenu.adb,
	s-pack03.adb, s-pack05.adb, s-pack06.adb, s-pack07.adb, s-pack09.adb,
	s-pack10.adb, s-pack11.adb, s-pack12.adb, s-pack13.adb, s-pack14.adb,
 	s-pack15.adb, s-pack17.adb, s-pack18.adb, s-pack19.adb, s-pack20.adb,
	s-pack21.adb, s-pack22.adb, s-pack23.adb, s-pack24.adb, s-pack25.adb,
	s-pack26.adb, s-pack27.adb, s-pack28.adb, s-pack29.adb, s-pack30.adb,
	s-pack31.adb, s-pack33.adb, s-pack34.adb, s-pack35.adb, s-pack36.adb,
	s-pack37.adb, s-pack38.adb, s-pack39.adb, s-pack40.adb, s-pack41.adb,
	s-pack42.adb, s-pack43.adb, s-pack44.adb, s-pack45.adb, s-pack46.adb,
	s-pack47.adb, s-pack48.adb, s-pack49.adb, s-pack50.adb, s-pack51.adb,
	s-pack52.adb, s-pack53.adb, s-pack54.adb, s-pack55.adb, s-pack56.adb,
	s-pack57.adb, s-pack58.adb, s-pack59.adb, s-pack60.adb, s-pack61.adb,
	s-pack62.adb, s-pack63.adb, s-pooloc.adb, s-poosiz.adb, s-scaval.adb,
	s-sequio.adb, s-shasto.adb, s-stalib.ads, s-stratt.adb, s-strcom.adb,
	s-taasde.adb, s-tasdeb.adb, s-tasuti.ads, s-tataat.ads, s-tpoben.ads,
	s-valenu.adb, s-widenu.adb, s-wwdenu.adb, s-addope.adb, a-stzmap.adb,
	a-ztcstr.adb, a-ztexio.adb, s-osinte-linux-hppa.ads: Replace
	Unchecked_* by Ada.Unchecked_*



git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@125359 138bc75d-0d04-0410-961f-82ee72b054a4

1 files changed, 16 insertions, 16 deletions

diff --git a/gcc/ada/a-tasatt.adb b/gcc/ada/a-tasatt.adb
index fca7bd2bcce..3bace41794a 100644
--- a/gcc/ada/a-tasatt.adb
+++ b/gcc/ada/a-tasatt.adb
@@ -7,7 +7,7 @@
 --                                 B o d y                                  --
 --                                                                          --
 --             Copyright (C) 1991-1994, Florida State University            --
---                     Copyright (C) 1995-2006, AdaCore                     --
+--                     Copyright (C) 1995-2007, AdaCore                     --
 --                                                                          --
 -- GNARL is free software; you can  redistribute it  and/or modify it under --
 -- terms of the  GNU General Public License as published  by the Free Soft- --
@@ -102,8 +102,8 @@
 
 --  In the first approach the objects on the attribute list are all derived
 --  from one controlled type, say T, and are linked using an access type to
---  T'Class. The runtime system has an Unchecked_Deallocation for T'Class with
---  access type T'Class, and uses this to deallocate and finalize all the
+--  T'Class. The runtime system has an Ada.Unchecked_Deallocation for T'Class
+--  with access type T'Class, and uses this to deallocate and finalize all the
 --  items in the list. The limitation of this approach is that each
 --  instantiation of the package Ada.Task_Attributes derives a new record
 --  extension of T, and since T is controlled (RM 3.9.1 (3)), instantiation is
@@ -239,8 +239,8 @@ with System.Tasking;
 --           Direct_Index
 
 with System.Tasking.Initialization;
---  Used for Defer_Abortion
---           Undefer_Abortion
+--  Used for Defer_Abort
+--           Undefer_Abort
 --           Initialize_Attributes_Link
 --           Finalize_Attributes_Link
 
@@ -255,8 +255,8 @@ with System.Tasking.Task_Attributes;
 with Ada.Exceptions;
 --  Used for Raise_Exception
 
-with Unchecked_Conversion;
-with Unchecked_Deallocation;
+with Ada.Unchecked_Conversion;
+with Ada.Unchecked_Deallocation;
 
 pragma Elaborate_All (System.Tasking.Task_Attributes);
 --  To ensure the initialization of object Local (below) will work
@@ -290,16 +290,16 @@ package body Ada.Task_Attributes is
    --  the compiler will generate warnings for the occurrences in the large
    --  attribute case, even though they will not actually be used.
 
-   function To_Attribute_Handle is new Unchecked_Conversion
+   function To_Attribute_Handle is new Ada.Unchecked_Conversion
      (System.Address, Attribute_Handle);
-   function To_Direct_Attribute_Element is new Unchecked_Conversion
+   function To_Direct_Attribute_Element is new Ada.Unchecked_Conversion
      (System.Address, Direct_Attribute_Element);
    --  For reference to directly addressed task attributes
 
    type Access_Integer_Address is access all
      System.Storage_Elements.Integer_Address;
 
-   function To_Attribute_Handle is new Unchecked_Conversion
+   function To_Attribute_Handle is new Ada.Unchecked_Conversion
      (Access_Integer_Address, Attribute_Handle);
    --  For reference to directly addressed task attributes
 
@@ -307,12 +307,12 @@ package body Ada.Task_Attributes is
    --  End of warnings off region for directly addressed
    --  attribute conversion functions.
 
-   function To_Access_Address is new Unchecked_Conversion
+   function To_Access_Address is new Ada.Unchecked_Conversion
      (Access_Node, Access_Address);
    --  To store pointer to list of indirect attributes
 
    pragma Warnings (Off);
-   function To_Access_Wrapper is new Unchecked_Conversion
+   function To_Access_Wrapper is new Ada.Unchecked_Conversion
      (Access_Dummy_Wrapper, Access_Wrapper);
    pragma Warnings (On);
    --  To fetch pointer to actual wrapper of attribute node. We turn off
@@ -321,17 +321,17 @@ package body Ada.Task_Attributes is
    --  real wrapper type (we never actually allocate objects of type
    --  Dummy_Wrapper).
 
-   function To_Access_Dummy_Wrapper is new Unchecked_Conversion
+   function To_Access_Dummy_Wrapper is new Ada.Unchecked_Conversion
      (Access_Wrapper, Access_Dummy_Wrapper);
    --  To store pointer to actual wrapper of attribute node
 
-   function To_Task_Id is new Unchecked_Conversion
+   function To_Task_Id is new Ada.Unchecked_Conversion
      (Task_Identification.Task_Id, Task_Id);
    --  To access TCB of identified task
 
    type Local_Deallocator is access procedure (P : in out Access_Node);
 
-   function To_Lib_Level_Deallocator is new Unchecked_Conversion
+   function To_Lib_Level_Deallocator is new Ada.Unchecked_Conversion
      (Local_Deallocator, Deallocator);
    --  To defeat accessibility check
 
@@ -366,7 +366,7 @@ package body Ada.Task_Attributes is
    for Wrapper'Alignment use Standard'Maximum_Alignment;
 
    procedure Free is
-      new Unchecked_Deallocation (Wrapper, Access_Wrapper);
+      new Ada.Unchecked_Deallocation (Wrapper, Access_Wrapper);
 
    procedure Deallocate (P : in out Access_Node) is
       T : Access_Wrapper := To_Access_Wrapper (P.Wrapper);