Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

[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