diff options
Diffstat (limited to 'gcc/ada/g-md5.ads')
| -rw-r--r-- | gcc/ada/g-md5.ads | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/ada/g-md5.ads b/gcc/ada/g-md5.ads index f41e7b7219c..2fff917efba 100644 --- a/gcc/ada/g-md5.ads +++ b/gcc/ada/g-md5.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 2002-2004 Ada Core Technologies, Inc. -- +-- Copyright (C) 2002-2005, AdaCore -- -- -- -- 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- -- @@ -70,7 +70,7 @@ package GNAT.MD5 is -- the same final context as a call with the concatenation of the inputs. subtype Message_Digest is String (1 .. 32); - -- The string type returned by function Digest. + -- The string type returned by function Digest function Digest (C : Context) return Message_Digest; -- Extracts the Message-Digest from a context. This function should be @@ -88,6 +88,7 @@ package GNAT.MD5 is private -- Magic numbers + Initial_A : constant := 16#67452301#; Initial_B : constant := 16#EFCDAB89#; Initial_C : constant := 16#98BADCFE#; |