RosettaCodeData/Task/Integer-sequence/ArkScript/integer-sequence-1.ark

5 lines
57 B
Plaintext

(mut i 0)
(while true {
(print i)
(set i (+ 1 i)) })