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

Content added Content deleted
(Undo revision 240798 by Hout (talk))
Line 24:
<br><br>
 
=={{header|HaskellAppleScript}}==
{{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}}