Multisplit: Difference between revisions
m
→{{header|Haskell}}: (Pruned out a couple of redundant imports)
m (→{{header|Haskell}}: (Replaced one If with a `case ... of`)) |
m (→{{header|Haskell}}: (Pruned out a couple of redundant imports)) |
||
Line 676:
Or as a fold:
<lang haskell>
multiSplit :: [String] -> String -> [(String, String, Int)]
multiSplit ds s =
let lng = length s
|