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.


 
  ( oct
  =   
    .     !arg:<8
        & (!arg:~<0|ERROR)
      | str$(oct$(div$(!arg.8)) mod$(!arg.8))
  )
& -1:?n
& whl'(1+!n:?n&out$(!n oct$!n));
 