Handbook
Glossary
(process-md5-block-H) ( block state -- )
Vocabulary
checksums
.
md5
.
private
Inputs
block
an
object
state
an
object
Outputs
None
Definition
USING:
kernel.private
specialized-arrays.instances.alien.c-types.uint
;
IN:
checksums.md5.private
:
(process-md5-block-H)
( block state -- )
{
uint-array
uint-array
}
declare
{
[
a
b
c
d
5
S31
33
]
[
d
a
b
c
8
S32
34
]
[
c
d
a
b
11
S33
35
]
[
b
c
d
a
14
S34
36
]
[
a
b
c
d
1
S31
37
]
[
d
a
b
c
4
S32
38
]
[
c
d
a
b
7
S33
39
]
[
b
c
d
a
10
S34
40
]
[
a
b
c
d
13
S31
41
]
[
d
a
b
c
0
S32
42
]
[
c
d
a
b
3
S33
43
]
[
b
c
d
a
6
S34
44
]
[
a
b
c
d
9
S31
45
]
[
d
a
b
c
12
S32
46
]
[
c
d
a
b
15
S33
47
]
[
b
c
d
a
2
S34
48
]
}
[
H
]
with-md5-round
;