[REBOL] Re: language shoot-out :-)

From: tomc:darkwing:uoregon at: 5-Nov-2002 10:16

woops! sorry bout that
those should all be either 'e or 'c
not a mixture (eval  OR call)

Rebol[]
c: 0
ack: func [ x[integer!] y[integer!] ][
    print c: c + 1
    either zero? x
        [y + 1]
        [either zero? y
            [ack (x - 1) 1]
            [ack (x - 1) ack x  (y - 1)]
        ]

]

On Tue, 5 Nov 2002, Tom Conlin wrote:

1 · 2 · 3 · 4 · 5 ... 30 · 31 · [32] · 33 · 34 · 35 · 36 · 37 · 38 · See whole thread