sha512.c: fix typo in comment

* lib/sha512.c (sha512_conclude_ctx): Length is 128-bit, not 64-bit.

diff --git a/ChangeLog b/ChangeLog
index bce4d12..32655cb 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2008-05-26  Jim Meyering  <meyering@redhat.com>
+
+       sha512.c: fix typo in comment
+       * lib/sha512.c (sha512_conclude_ctx): Length is 128-bit, not 64-bit.
+
 2008-05-25  Bruno Haible  <bruno@clisp.org>
 
        * lib/set-mode-acl.c: Renamed from lib/acl.c.

diff --git a/lib/sha512.c b/lib/sha512.c
index 4a41cb0..66cfaa9 100644 (file)
--- a/lib/sha512.c
+++ b/lib/sha512.c
@@ -141,7 +141,7 @@ sha512_conclude_ctx (struct sha512_ctx *ctx)
   if (u64lt (ctx->total[0], u64lo (bytes)))
     ctx->total[1] = u64plus (ctx->total[1], u64lo (1));
 
-  /* Put the 64-bit file length in *bits* at the end of the buffer.  */
+  /* Put the 128-bit file length in *bits* at the end of the buffer.  */
   ctx->buffer[size - 2] = SWAP (u64or (u64shl (ctx->total[1], 3),
                                       u64shr (ctx->total[0], 61)));
   ctx->buffer[size - 1] = SWAP (u64shl (ctx->total[0], 3));