<html><head><meta http-equiv="Content-Type" content="text/html; charset=us-ascii"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; line-break: after-white-space;" class=""><br class=""><div><br class=""><blockquote type="cite" class=""><div class="">On 25 Dec 2020, at 12:28, gettimothy via Squeak-dev <<a href="mailto:squeak-dev@lists.squeakfoundation.org" class="">squeak-dev@lists.squeakfoundation.org</a>> wrote:</div><br class="Apple-interchange-newline"><div class=""><span style="caret-color: rgb(0, 0, 0); font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 13.333333015441895px; font-style: normal; font-variant-caps: normal; font-weight: normal; letter-spacing: normal; text-align: start; text-indent: 0px; text-transform: none; white-space: normal; word-spacing: 0px; -webkit-text-stroke-width: 0px; background-color: rgb(245, 245, 245); text-decoration: none; float: none; display: inline !important;" class="">'Foo <nowiki>Bar</nowiki> Baz' removeAllBetween:'<nowiki>' and: '</nowiki>'.</span></div></blockquote><br class=""></div><div><div><span class="Apple-tab-span" style="white-space:pre"> </span>a := 'Foo <nowiki>Bar</nowiki> Baz'.</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>s:= Scanner new.</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>toks := s typedScanTokens: a.</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>sel := ''.</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>level := 0.</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>toks do: [:t|</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>t caseOf: {</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>[#<] -> [level:=1].</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>[#</] -> [level:=2].</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>[#>] -> [level =2 ifTrue:[sel:=sel, ' '. level:=0]].</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>}</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>otherwise: [</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>level = 0 ifTrue:[sel := sel, t]</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>].</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>].</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>sel</div><div class=""><br class=""></div></div><br class=""></body></html>