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

[REBOL] Re: [refactoring s-c?]

From: g:santilli:tiscalinet:it at: 17-Mar-2002 15:38

Hi Ladislav, On Friday, March 15, 2002, 7:15:31 PM, you wrote: Reading your later posts, and thinking about it... LM> nonsame: func [ LM> { LM> create a word equal to the given word LM> but not the same as the given word LM> } LM> word [word!] {the given word} LM> ] [ LM> first use reduce [word] reduce [ LM> reduce [word] LM> ] LM> ] what about: nonsame: func [ { create a word equal to the given word but not the same as the given word } word [word!] {the given word} ] [ use reduce [word] reduce [ to-lit-word word ] ] It seems to work correctly for me. (Not that is much clearer, or better in any way --- just a different approach.) Regards, Gabriele. -- Gabriele Santilli <[g--santilli--tiscalinet--it]> -- REBOL Programmer Amigan -- AGI L'Aquila -- REB: http://web.tiscali.it/rebol/index.r