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

[REBOL] Re: newlines

From: lmecir:mbox:vol:cz at: 8-Nov-2001 11:38

Hi myself, how about: while [s: find/tail s "..."] [ parse s [any #"." t:] s: remove/part back s t ] b) Some algorithms are complicated, that is why a different approach (not using REPLACE) should be considered too: while [s: find s #"."] [ parse next s [any #"." t:] s: either (index? s) + 2 < (index? t) [ remove/part skip s 2 t ] [t] ]