RosettaCodeData/Task/Integer-sequence/Joy/integer-sequence.joy

2 lines
34 B
Plaintext

1 [0 >] [dup put succ] while pop.