Split a character string based on change of character: Difference between revisions
Content added Content deleted
Line 24:
<br><br>
=={{header|
{{Trans|JavaScript}}
<lang AppleScript>on run
Line 151:
end if
end tail</lang>
{{Out}}
<pre>g, HHH, 5, YY, ++, ///, \</pre>
=={{header|Haskell}}==
<lang Haskell>import Data.List (group, intercalate)
main :: IO ()
main = putStrLn $ intercalate ", " (group "gHHH5YY++///\\")</lang>
{{Out}}
|