6 lines
100 B
Text
6 lines
100 B
Text
|
~~~
|
||
|
'Push_and_discard_a_value_1,000,000_times s:put nl
|
||
|
#1000 [ #1000 [ #1 drop ] times ] times
|
||
|
~~~
|
||
|
|