Handbook
Glossary
print-menu ( seq -- )
Vocabulary
rosetta-code.menu
Inputs
seq
an
object
Outputs
None
Definition
USING:
formatting
io
kernel
math
sequences
;
IN:
rosetta-code.menu
:
print-menu
( seq -- )
[
1
+
swap
"%d - %s\n"
printf
]
each-index
"Your choice? "
write
flush
;