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.