Explain/document a few functions
This commit is contained in:
parent
3fa8b3be2b
commit
7672bd5919
2 changed files with 30 additions and 8 deletions
|
|
@ -10,6 +10,7 @@ instance Show StrSymbol where
|
|||
instance Eq StrSymbol where
|
||||
(StrSymbol a) == (StrSymbol b) = a == b
|
||||
|
||||
-- process a string line by line instead of all at once
|
||||
linewise :: (String -> String) -> String -> String
|
||||
linewise f = unlines . map f . lines
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue