Split a character string based on change of character: Difference between revisions

(Brought the three BASIC dialects under BASIC heading)
Line 550:
=={{header|Factor}}==
<lang factor>USE: splitting.monotonic
"gHHH5YY++///\\" splitc print
 
:"aaabbccccdeeff" splitc ( str -- str' )[ [ = ] monotonic-split ", " join ;print ] bi@</lang>
 
"gHHH5YY++///\\" splitc print
"aaabbccccdeeff" splitc print</lang>
{{out}}
<pre>
1,827

edits