From de4495875fe96c87836df0f51098726884e4c2f5 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Mon, 11 Jul 2016 14:02:33 -0700
Subject: [PATCH] checksums.md5: minor thing.
---
basis/checksums/md5/md5.factor | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/basis/checksums/md5/md5.factor b/basis/checksums/md5/md5.factor
index 0bebd0ab23..e8c890ddb0 100644
--- a/basis/checksums/md5/md5.factor
+++ b/basis/checksums/md5/md5.factor
@@ -185,8 +185,8 @@ M: md5-state checksum-block
[ (process-md5-block-I) ]
} 2cleave
] [
- nip update-md5
- ] 2bi ;
+ update-md5
+ ] bi ;
: md5>checksum ( md5 -- bytes )
state>> underlying>> byte-array>le ;