OSDN Git Service

* common.opt (Wmudflap): New option.
[pf3gnuchains/gcc-fork.git] / gcc / ada / s-casi16.adb
index 645137e..7647f6b 100644 (file)
@@ -6,7 +6,7 @@
 --                                                                          --
 --                                 B o d y                                  --
 --                                                                          --
---          Copyright (C) 2002-2005 Free Software Foundation, Inc.          --
+--          Copyright (C) 2002-2007, Free Software Foundation, Inc.         --
 --                                                                          --
 -- GNAT 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- --
@@ -33,7 +33,7 @@
 
 with System.Address_Operations; use System.Address_Operations;
 
-with Unchecked_Conversion;
+with Ada.Unchecked_Conversion;
 
 package body System.Compare_Array_Signed_16 is
 
@@ -55,9 +55,9 @@ package body System.Compare_Array_Signed_16 is
    type HP is access Half;
    type UP is access Uhalf;
 
-   function W is new Unchecked_Conversion (Address, WP);
-   function H is new Unchecked_Conversion (Address, HP);
-   function U is new Unchecked_Conversion (Address, UP);
+   function W is new Ada.Unchecked_Conversion (Address, WP);
+   function H is new Ada.Unchecked_Conversion (Address, HP);
+   function U is new Ada.Unchecked_Conversion (Address, UP);
 
    -----------------------
    -- Compare_Array_S16 --