From 6bb7ccb654b6990bb78b9aca80308f64017ddabe Mon Sep 17 00:00:00 2001 From: Julien Dessaux Date: Sun, 19 Mar 2023 14:49:16 +0100 Subject: small style fixes --- 2020/05-Binary_Boarding/first.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to '2020/05-Binary_Boarding/first.hs') 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 -- cgit v1.2.3