Rebol3 Code Examplex

Integer sequence

Create a program that, when run, would display all integers from 1 to ∞ (or any relevant implementation limit).

Rebol [
    title: "Rosetta code: Integer sequence"
    file:  %Integer_sequence.r3
    url:   https://rosettacode.org/wiki/Integer_sequence
]

i: 0
try/with [
    forever [
        print i: i + 1
    ]
][
    print ["Maximum integer" i "reached!"]
]

Output:

1
2
3
...
9223372036854775805
9223372036854775806
9223372036854775807
Maximum integer 9223372036854775807 reached!