10 lines
199 B
Text
10 lines
199 B
Text
(
|
|
:prompt =list
|
|
(list bool)
|
|
(list (' dup append) map prompt choose)
|
|
("") if
|
|
) :menu
|
|
|
|
("fee fie" "huff and puff" "mirror mirror" "tick tock")
|
|
"Enter an option" menu
|
|
"You chose: " print! puts!
|