Hello [EMAIL PROTECTED]!

On 20-Feb-00, you wrote:

 s> So It's a bug IMHO.

You can fix it by yourself. Just add the THROW attribute:

>> forall: func [
[        "Evaluates a block for every value in a series." [throw] 
[        'word [word!] {Word set to each position in series and changed as a result} 
[        body [block!] "Block to evaluate each time"
[    ][
[        while [not tail? get word] [
[                do body 
[                set word next get word
[            ]
[    ]
>> test [ 1 2 3 "a" 5 6]                                                       
== "Not integer!"

Regards,
    Gabriele.
-- 
o--------------------) .-^-. (----------------------------------o
| Gabriele Santilli / /_/_\_\ \ Amiga Group Italia --- L'Aquila |
| GIESSE on IRC     \ \-\_/-/ /  http://www.amyresource.it/AGI/ |
o--------------------) `-v-' (----------------------------------o

Reply via email to