5 lines
211 B
Text
5 lines
211 B
Text
[ tuck take swap join swap put ] is append ( [ s --> )
|
|
|
|
$ "L'homme qui attend de voir un canard roti voler " temp put
|
|
$ "dans sa bouche doit attendre tres, tres longtemps." temp append
|
|
temp take echo$
|