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

[REBOL] Re: update rules (?)

From: jthomas:apollo:evo:it at: 3-Nov-2000 16:40

Hello [jeff--rebol--net] On 02-Nov-00, [jeff--rebol--net] wrote:
>j >j >j Howdy, Joachim: >j >j Letsee... if I understand correctly, here's a quick and >j dirty approach that does something like that: >j
... my goal was something like the following: (your help has been VERY useful, thanx :D ) Regards -- Joachim Thomas - [jthomas--mail--evo--it] - ICQ 18088459 Amiga1260+Amiga4060PPC604 Member of ATO (italian Division) http://bilbo.di.unipi.it/~ato-it & Phoenix Consortium Concerti - Gruppi Musicali & Locali http://concertitalia.supereva.it Virtual PHOTO Gallery http://www.terzomercato.com/free/jt_home Retarded: "When i grow up I'll work for MicroSoft..." -- Lorens Johansson -- Attached file included as plaintext by Listar -- -- File: TOJEFF.R REBOL [ title: "to Jeff" ] wordlist: ['gosh 'gulp 'sigh] endprg: false rules: [ 'halt (endprg: true) | set wordsel wordlist (print ["word selected!" wordsel]) | 'add set new-word word! ( append wordlist reduce [ '| to-lit-word new-word ] probe wordlist ) ] while [endprg = false] [ parse compose [(load ask "?? ")] [some rules] ]