RosettaCodeData/Task/Integer-sequence/Oforth/integer-sequence.oforth

2 lines
43 B
Text
Raw Permalink Normal View History

2016-12-05 23:44:36 +01:00
: integers 1 while( true ) [ dup . 1+ ] ;