checksums.md5: minor thing.

char-rename
John Benediktsson 2016-07-11 14:02:33 -07:00
parent f0d47b7329
commit de4495875f
1 changed files with 2 additions and 2 deletions

View File

@ -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 ;