Task

Produce a sequential count in octal,   starting at zero,   and using an increment of a one for each consecutive number.

Each number should appear on a single line,   and the program should count until terminated,   or until the maximum value of the numeric type in use is reached.



Related task

   Integer sequence   is a similar task without the use of octal numbers.


(
  (dup 0 ==) (pop () 0 shorten)
  (((8 mod) (8 div)) cleave) 'cons linrec
  reverse 'print! foreach newline
) :octal
 
0 (dup octal succ)
9.223e18 int times ; close to max int value