diff options
| author | Robert Dewar <dewar@gnat.com> | 2004-10-27 15:39:44 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2004-10-27 15:39:44 +0200 |
| commit | 282c6a893499762fecad905c5ffdc4161af395f8 (patch) | |
| tree | c31d012da12b7855c6e2960f62cc5aebec811ca6 /gcc/ada/s-bitops.ads | |
| parent | 04b633a8c872b91fdb78a8adf30ba922bc4f4157 (diff) | |
| download | gcc-282c6a893499762fecad905c5ffdc4161af395f8.tar.gz | |
s-bitops.adb (Bit_Eq): Remove redundant check.
2004-10-26 Robert Dewar <dewar@gnat.com>
* s-bitops.adb (Bit_Eq): Remove redundant check.
* s-bitops.ads: Minor comment updates
Change some occurrences of Address to System.Address
* s-carsi8.ads: Fix minor cut-and-paste error in comments
From-SVN: r89664
Diffstat (limited to 'gcc/ada/s-bitops.ads')
| -rw-r--r-- | gcc/ada/s-bitops.ads | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/gcc/ada/s-bitops.ads b/gcc/ada/s-bitops.ads index 5f4ed397de2..f22a5d4b7ce 100644 --- a/gcc/ada/s-bitops.ads +++ b/gcc/ada/s-bitops.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992-1999, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2004, 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- -- @@ -45,11 +45,11 @@ package System.Bit_Ops is procedure Bit_And (Left : System.Address; Llen : Natural; - Right : Address; + Right : System.Address; Rlen : Natural; Result : System.Address); -- Bitwise "and" of given bit string with result being placed in Result. - -- The or operation is allowed to destroy unused bits in the last byte, + -- The and operation is allowed to destroy unused bits in the last byte, -- i.e. to leave them set in an undefined manner. Note that Left, Right -- and Result always have the same length in bits (Len). @@ -77,7 +77,7 @@ package System.Bit_Ops is procedure Bit_Or (Left : System.Address; Llen : Natural; - Right : Address; + Right : System.Address; Rlen : Natural; Result : System.Address); -- Bitwise "or" of given bit string with result being placed in Result. @@ -88,11 +88,11 @@ package System.Bit_Ops is procedure Bit_Xor (Left : System.Address; Llen : Natural; - Right : Address; + Right : System.Address; Rlen : Natural; Result : System.Address); -- Bitwise "xor" of given bit string with result being placed in Result. - -- The or operation is allowed to destroy unused bits in the last byte, + -- The xor operation is allowed to destroy unused bits in the last byte, -- i.e. to leave them set in an undefined manner. Note that Left, Right -- and Result always have the same length in bits (Len). |