Handbook
Glossary
prev-identity ( i seq -- identity i seq )
Vocabulary
sequences
.
extras
Inputs
i
an
object
seq
an
object
Outputs
identity
an
object
i
an
object
seq
an
object
Definition
USING:
kernel
;
IN:
sequences.extras
:
prev-identity
( i seq -- identity i seq )
2dup
??prev
[
drop
0
]
unless
-rot
;
inline