[hs] Clean up 2020_06
This commit is contained in:
parent
dddc5ec451
commit
81819a26c3
1 changed files with 1 additions and 1 deletions
|
|
@ -10,7 +10,7 @@ import Aoc.Parse
|
|||
type Group = [String]
|
||||
|
||||
parser :: Parser [Group]
|
||||
parser = sepBy (endBy1 (some lowerChar) newline) newline
|
||||
parser = (some lowerChar `endBy1` newline) `sepBy` newline
|
||||
|
||||
solver :: [Group] -> IO ()
|
||||
solver groups = do
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue