[ Obxecto ] recursivo

var r := Obxecto novo.
r en: ['∞'] facer: { :x
Stdout escribir: x, parar.
(x < 3) certo: { self recursivo ∞ (x + 1). }.
}.
r ∞ 1.
1
2
3