[REBOL] Re: newlines
From: brett:codeconscious at: 8-Nov-2001 22:47
Hi Ladislav,
> == "..a...bcd.s.f.g.k.l.m.n.o.p.."
Well that was a bit of a blow. Thanks for picking it up. I had forgotten
that I had made parse's index into the string
out of whack when I did the remove.
Here is the fixed (and no doubt slightly slower) versions:
method1: [ any [ ".." mark1: any #"." mark2: (remove/part mark1 mark2)
:mark1 | skip] ]
parse/all s method1
other-char: complement charset {.}
method2: [any [some other-char | ".." mark1: any #"." mark2: (remove/part
mark1 mark2) :mark1 | skip ] ]
parse/all s method2
Regards,
Brett