diff options
| author | Thomas Quinot <quinot@adacore.com> | 2009-11-30 15:51:15 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-11-30 16:51:15 +0100 |
| commit | 36e764085d947eecbced61ee6f37790afe9ee625 (patch) | |
| tree | d0457e027e7f82244c002b36d77c8f88120b88b8 /gcc/ada/g-sha256.ads | |
| parent | 9dd7d977e60c8d6788a67f80f316ef12b8ff4562 (diff) | |
| download | gcc-36e764085d947eecbced61ee6f37790afe9ee625.zip gcc-36e764085d947eecbced61ee6f37790afe9ee625.tar.gz gcc-36e764085d947eecbced61ee6f37790afe9ee625.tar.bz2 | |
s-sechas.adb, [...]: Rename System.Secure_Hashes to GNAT.Secure_Hashes.
2009-11-30 Thomas Quinot <quinot@adacore.com>
* s-sechas.adb, s-sechas.ads, s-shshco.adb, s-shshco.ads, s-shsh64.adb,
s-shsh64.ads, s-sehamd.adb, s-sehamd.ads, s-shsh32.adb, s-shsh32.ads,
s-sehash.adb, s-sehash.ads, g-sechas.adb, g-sechas.ads, g-shshco.adb,
g-shshco.ads, g-md5.ads, g-sha256.ads, g-shsh64.adb, g-shsh64.ads,
g-sehamd.adb, g-sehamd.ads, g-sha512.ads, g-sha1.ads, Makefile.rtl,
g-sha224.ads, g-shsh32.adb, g-shsh32.ads, g-sha384.ads, g-sehash.adb,
g-sehash.ads: Rename System.Secure_Hashes to GNAT.Secure_Hashes.
From-SVN: r154822
Diffstat (limited to 'gcc/ada/g-sha256.ads')
| -rw-r--r-- | gcc/ada/g-sha256.ads | 17 |
1 files changed, 9 insertions, 8 deletions
diff --git a/gcc/ada/g-sha256.ads b/gcc/ada/g-sha256.ads index a45e057..164f662 100644 --- a/gcc/ada/g-sha256.ads +++ b/gcc/ada/g-sha256.ads @@ -33,17 +33,18 @@ -- FIPS PUB 180-3. The complete text of FIPS PUB 180-3 can be found at: -- http://csrc.nist.gov/publications/fips/fips180-3/fips180-3_final.pdf --- See the declaration of System.Secure_Hashes.H in s-sechas.ads for complete +-- See the declaration of GNAT.Secure_Hashes.H in g-sechas.ads for complete -- documentation. -with System.Secure_Hashes.SHA2_Common; -with System.Secure_Hashes.SHA2_32; +with GNAT.Secure_Hashes.SHA2_Common; +with GNAT.Secure_Hashes.SHA2_32; +with System; -package GNAT.SHA256 is new System.Secure_Hashes.H - (Block_Words => System.Secure_Hashes.SHA2_Common.Block_Words, +package GNAT.SHA256 is new GNAT.Secure_Hashes.H + (Block_Words => GNAT.Secure_Hashes.SHA2_Common.Block_Words, State_Words => 8, Hash_Words => 8, Hash_Bit_Order => System.High_Order_First, - Hash_State => System.Secure_Hashes.SHA2_32.Hash_State, - Initial_State => System.Secure_Hashes.SHA2_32.SHA256_Init_State, - Transform => System.Secure_Hashes.SHA2_32.Transform); + Hash_State => GNAT.Secure_Hashes.SHA2_32.Hash_State, + Initial_State => GNAT.Secure_Hashes.SHA2_32.SHA256_Init_State, + Transform => GNAT.Secure_Hashes.SHA2_32.Transform); |