From: Jim Meyering <meyering@redhat.com>
Date: Mon, 26 May 2008 14:28:22 +0000 (+0200)
Subject: sha512.c: fix typo in comment
X-Git-Tag: v0.1~7343
X-Git-Url: https://gitweb.git.savannah.gnu.org/gitweb/?a=commitdiff_plain;h=49c2c800d98967210cdae5122c15f03891964da7;p=gnulib.git

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 bce4d1204d..32655cb6b5 100644
--- 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 4a41cb0613..66cfaa9bfc 100644
--- 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));