[REBOL] Re: Help me, Obi Reb Kenobi, you're my only hope!
From: g:santilli:tiscalinet:it at: 31-Aug-2002 15:56
Hi Ladislav,
On Saturday, August 31, 2002, 10:58:41 AM, you wrote:
LM> Meanwhile I use my DEFAULT function:
BTW Ladislav, do you think there could be any problems with this
alternative version?
default: func [
[throw]
code [block!]
fault [block!]
/good pass [block!]
/local result
] [
either error? set/any 'result try code [
fault: func [[throw] error [error!]] fault
fault result
] [
do any [pass [get/any 'result]]
]
]
Regards,
Gabriele.
--
Gabriele Santilli <[g--santilli--tiscalinet--it]> -- REBOL Programmer
Amigan -- AGI L'Aquila -- REB: http://web.tiscali.it/rebol/index.r