Hello [EMAIL PROTECTED],

On 03-Jul-00 You wrote:

[...] 
> Your approach should preferrably be:

>    append spec reduce ['func third :f second :f]
[...]                          ^^^^^

This one will suit my needs, I think. 
third :f is even better than first :f, of course!
Thank You very much!

But now I'm wondering if there's a way to universally create
objects by assembling a spec block as I did, appending any-function!s
AND taking care of contexts. 

Finally, another question, closely related, arised in this process:

I never understood why

-- start of console session --
>> source func
*func*: *func* [
    "Defines a user function with given spec and body." [catch] 
    spec [block!] {Help string (opt) followed by arg words (and opt type and string)} 
    body [block!] "The body block of the function"
][
    throw-on-error [make function! spec body]
]
>> source throw-on-error
throw-on-error: *func* [blk][
    if error? blk: try blk [throw blk] 
    :blk
]
-- end of console session --

doesn't leed to endless recursion. 

Thanks again,
Regards

   Christian
   [EMAIL PROTECTED]

Reply via email to