From a05c735731030286736305b5e06e93c665d37c82 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Tue, 25 Feb 2014 15:59:43 -0800
Subject: [PATCH] checksums.md5: remove extra "32 bits".

---
 basis/checksums/md5/md5.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/basis/checksums/md5/md5.factor b/basis/checksums/md5/md5.factor
index b881ddf475..d58e3504c4 100644
--- a/basis/checksums/md5/md5.factor
+++ b/basis/checksums/md5/md5.factor
@@ -83,7 +83,7 @@ CONSTANT: d 3
         k x nth-unsafe w+
         i T nth-unsafe w+
         s bitroll-32
-        b state nth-unsafe w+ 32 bits
+        b state nth-unsafe w+
     ] change-nth-unsafe ; inline
 
 MACRO: with-md5-round ( ops quot -- )