Hello Ladislav!

On 03-Feb-01, you wrote:

 LM> Any trials?

I don't think it's really hard, but I'm sure I'm missing
something.

>> arg1: func [x] [return make error! x]
>> arg2: ["some error"]               
>> hard: func [x y] [return x first y]  
>> print mold disarm hard :arg1 arg2  

make object! [
    code: 800
    type: 'user
    id: 'message
    arg1: "some error"
    arg2: none
    arg3: none
    near: [return make error! x]
    where: none
]
>> hard :print ["something"]
something

Regards,
    Gabriele.
-- 
Gabriele Santilli <[EMAIL PROTECTED]> - Amigan - REBOL programmer
Amiga Group Italia sez. L'Aquila -- http://www.amyresource.it/AGI/

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

Reply via email to