[ Objekt ] ponavljajući

var r := Objekt novi.
r na: ['∞'] to: { :x
Stdout pisati: x, stop.
(x < 3) da: { self ponavljajući ∞ (x + 1). }.
}.
r ∞ 1.
1
2
3