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

← Older editNewer edit →
Content deleted Content added
Hout (talk | contribs)
9,665 edits
→‎{{header|AppleScript}}: ( updated groupBy primitive – using a fold, rather than explicit recursion with span)
Line 265:
input string: gHHH5YY++///\
output string: g, HHH, 5, YY, ++, ///, \
</pre>
 
=={{header|zkl}}==
<lang zkl>fcn group(str){
C,out := str[0],Sink(C);
foreach c in (str[1,*]){ out.write(if(c==C) c else String(", ",C=c)) }
out.close();
}
group("gHHH5YY++///\\").println();</lang>
{{out}}
<pre>
g, HHH, 5, YY, ++, ///, \
</pre>
Retrieved from "https://rosettacode.org/wiki/Split_a_character_string_based_on_change_of_character"