-- --
-- B o d y --
-- --
--- Copyright (C) 2002-2006 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- --
with System.Address_Operations; use System.Address_Operations;
-with Unchecked_Conversion;
+with Ada.Unchecked_Conversion;
package body System.Compare_Array_Unsigned_8 is
-- Array type used to access by bytes
function To_Big_Words is new
- Unchecked_Conversion (System.Address, Big_Words_Ptr);
+ Ada.Unchecked_Conversion (System.Address, Big_Words_Ptr);
function To_Big_Bytes is new
- Unchecked_Conversion (System.Address, Big_Bytes_Ptr);
+ Ada.Unchecked_Conversion (System.Address, Big_Bytes_Ptr);
----------------------
-- Compare_Array_U8 --