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

[REBOL] Re: Core 2.6 - Last minute requests - take your chance!

From: rotenca:telvia:it at: 10-Apr-2002 1:04

Hi Petr, I don't remember my number :-( ##) Support for native continue function (or continue refinement for break) in loop functions, or something like this example for forall (but i think this is slow): continue: does [throw/name none 'continue] forall: func [ "Evaluates a block for every value in a series." [throw] 'word [word!] {Word set to each position in series and changed as a result} body [block!] "Block to evaluate each time" ][ while [not tail? get word] [ catch/name body 'continue set word next get word ] ] a: [1 2 3 4 1 2 3 4] forall a [if 2 < first a [continue] print first a] --- Ciao Romano