[ Obđect ] recursive

var r := Obđect neł.
r met: ['∞'] do: { :x
Stdout łrite: x, stop.
(x < 3) da: { self recursive ∞ (x + 1). }.
}.
r ∞ 1.
1
2
3