# HG changeset patch
# User Jim Meyering <meyering@redhat.com>
# Date 1211812102 -7200
# Node ID fc6baf7d0ac06484e165705532e6a4712804ec92
# Parent  66d52359961ef50586072a7aaf1004e1ebda4dab
sha512.c: fix typo in comment

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

diff -r 66d52359961e -r fc6baf7d0ac0 ChangeLog
--- a/ChangeLog	Sun May 25 13:44:20 2008 +0200
+++ b/ChangeLog	Mon May 26 16:28:22 2008 +0200
@@ -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 -r 66d52359961e -r fc6baf7d0ac0 lib/sha512.c
--- a/lib/sha512.c	Sun May 25 13:44:20 2008 +0200
+++ b/lib/sha512.c	Mon May 26 16:28:22 2008 +0200
@@ -141,7 +141,7 @@
   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));