summaryrefslogtreecommitdiff
path: root/gcc/ada/s-casi32.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/s-casi32.adb')
-rw-r--r--gcc/ada/s-casi32.adb8
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/s-casi32.adb b/gcc/ada/s-casi32.adb
index 4fc8d679c5b..7ce89da47d7 100644
--- a/gcc/ada/s-casi32.adb
+++ b/gcc/ada/s-casi32.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_32 is
@@ -51,8 +51,8 @@ package body System.Compare_Array_Signed_32 is
type WP is access Word;
type UP is access Uword;
- function W is new Unchecked_Conversion (Address, WP);
- function U is new Unchecked_Conversion (Address, UP);
+ function W is new Ada.Unchecked_Conversion (Address, WP);
+ function U is new Ada.Unchecked_Conversion (Address, UP);
-----------------------
-- Compare_Array_S32 --