Hi Ladislav,

> It really doesn't work. See this:
>
> f: tail-func [first second] [
>     print [first second]
>     either second = 1 [first] [
>         f 1 - first second - 1
>     ]
> ]
> f 1 400

I didn't work (i think) because I inverted true and false: here it is the
working version, i changed the name of loop in stop to reflect new meaning and
to save a 'not or two:

stop: false
...
   either stop [
    stop: false
   ] [
    until [
     stop: true
     error? set/any 'result do (does body)
     stop
    ]
    stop: false
    return get/any 'result
   ]


> The set-word skip is in accordance with the way how Help (from RT) is
> written, that is all (future compatibility?).

You forget it in highfun.r.

---
Ciao
Romano


-- 
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the 
subject, without the quotes.

Reply via email to