diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-11-30 15:51:15 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-11-30 15:51:15 +0000 |
| commit | 12c8864cbbc7b650812120f4eb5702a0d78e2b50 (patch) | |
| tree | d0457e027e7f82244c002b36d77c8f88120b88b8 /gcc/ada/g-sha1.ads | |
| parent | 48deb1a5591bda1400873c2c2db92912da8491e4 (diff) | |
| download | gcc-12c8864cbbc7b650812120f4eb5702a0d78e2b50.tar.gz | |
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.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@154822 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/g-sha1.ads')
| -rw-r--r-- | gcc/ada/g-sha1.ads | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/gcc/ada/g-sha1.ads b/gcc/ada/g-sha1.ads index 8570923b109..39132054ddf 100644 --- a/gcc/ada/g-sha1.ads +++ b/gcc/ada/g-sha1.ads @@ -35,16 +35,17 @@ -- 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.SHA1; +with GNAT.Secure_Hashes.SHA1; +with System; -package GNAT.SHA1 is new System.Secure_Hashes.H - (Block_Words => System.Secure_Hashes.SHA1.Block_Words, +package GNAT.SHA1 is new GNAT.Secure_Hashes.H + (Block_Words => GNAT.Secure_Hashes.SHA1.Block_Words, State_Words => 5, Hash_Words => 5, Hash_Bit_Order => System.High_Order_First, - Hash_State => System.Secure_Hashes.SHA1.Hash_State, - Initial_State => System.Secure_Hashes.SHA1.Initial_State, - Transform => System.Secure_Hashes.SHA1.Transform); + Hash_State => GNAT.Secure_Hashes.SHA1.Hash_State, + Initial_State => GNAT.Secure_Hashes.SHA1.Initial_State, + Transform => GNAT.Secure_Hashes.SHA1.Transform); |