summaryrefslogtreecommitdiff
path: root/gcc/ada/s-casi16.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/s-casi16.adb')
-rw-r--r--gcc/ada/s-casi16.adb10
1 files changed, 5 insertions, 5 deletions
diff --git a/gcc/ada/s-casi16.adb b/gcc/ada/s-casi16.adb
index 645137e3a5b..7647f6beeb6 100644
--- a/gcc/ada/s-casi16.adb
+++ b/gcc/ada/s-casi16.adb
@@ -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 --