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

From: tomc:darkwing:uoregon at: 5-Nov-2002 9:44

Hi Joel

I was just counting function calls

Rebol[]
e: c
ack: func [ x[integer!] y[integer!] ][
    print e: 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, Joel Neely wrote:

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