reword comment
This commit is contained in:
parent
d830386ab2
commit
37d0f73e66
1 changed files with 1 additions and 1 deletions
|
@ -34,6 +34,6 @@ splitc c s = case break (== c) s of
|
||||||
replace :: Eq a => [a] -> [a] -> [a] -> [a]
|
replace :: Eq a => [a] -> [a] -> [a] -> [a]
|
||||||
replace old new = intercalate new . split old
|
replace old new = intercalate new . split old
|
||||||
|
|
||||||
-- | Only traverses the list once while dropping the last n characters.
|
-- | Only traverses the list once while dropping the last n items.
|
||||||
dropFromEnd :: Int -> [a] -> [a]
|
dropFromEnd :: Int -> [a] -> [a]
|
||||||
dropFromEnd n l = zipWith const l (drop n l)
|
dropFromEnd n l = zipWith const l (drop n l)
|
||||||
|
|
Loading…
Reference in a new issue