aboutsummaryrefslogtreecommitdiff
path: root/2020/05-Binary_Boarding
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--2020/05-Binary_Boarding/first.hs2
-rw-r--r--2020/05-Binary_Boarding/second.hs2
2 files changed, 2 insertions, 2 deletions
diff --git a/2020/05-Binary_Boarding/first.hs b/2020/05-Binary_Boarding/first.hs
index 2f3ad7b..42fb9f0 100644
--- a/2020/05-Binary_Boarding/first.hs
+++ b/2020/05-Binary_Boarding/first.hs
@@ -34,7 +34,7 @@ parseBP = do
return $ BoardingPass { row=row, column=column }
parseBPs :: Parser [BoardingPass]
-parseBPs = some (parseBP) <* eof
+parseBPs = some parseBP <* eof
parseInput :: String -> IO [BoardingPass]
parseInput filename = do
diff --git a/2020/05-Binary_Boarding/second.hs b/2020/05-Binary_Boarding/second.hs
index 9f85b7e..fca6873 100644
--- a/2020/05-Binary_Boarding/second.hs
+++ b/2020/05-Binary_Boarding/second.hs
@@ -30,7 +30,7 @@ parseBP = do
return $ row * 8 + column
parseBPs :: Parser [BoardingPass]
-parseBPs = some (parseBP) <* eof
+parseBPs = some parseBP <* eof
parseInput :: String -> IO [BoardingPass]
parseInput filename = do