Handbook
Glossary
fix-shuffle ( content word -- content' word )
Vocabulary
help.private
Inputs
content
an
object
word
an
object
Outputs
content'
an
object
word
an
object
Definition
USING:
arrays
effects
help.markup
kernel
sequences
;
IN:
help.private
:
fix-shuffle
( content word -- content' word )
over
[
{
$shuffle
$complex-shuffle
}
member?
]
find
drop
[
[
cut
unclip
]
curry
dip
[
stack-effect
2array
1array
glue
]
keep
]
when*
;