Sort an outline at every level: Difference between revisions
m
→{{header|Haskell}}: Moved an argument flip upstream
(Added Go) |
m (→{{header|Haskell}}: Moved an argument flip upstream) |
||
Line 557:
consistentIndentUnit :: [T.Text] -> Either T.Text T.Text
consistentIndentUnit prefixes = minimumIndent prefixes >>=
where
checked
| all ((0 ==) . (`rem` unitLength) . T.length) xs = Right indentUnit
| otherwise =
Line 584:
| x <- textLines
, s <- [T.takeWhile isSpace x]
, 0 /= T.length s ]</lang>
{{Out}}
<pre>Four-spaced (A -> Z):
| |||