Actually we don't care about start of doc, only line.
All checks were successful
Haskell CI / build (pull_request) Successful in 2m34s
Haskell CI / test (pull_request) Successful in 2m32s
Haskell CI / fourmolu (pull_request) Successful in 6s
Haskell CI / hlint (pull_request) Successful in 6s

This commit is contained in:
Igor Ranieri 2025-09-28 22:01:03 +02:00
parent f5a9dec3d6
commit 5beb321241

View file

@ -176,7 +176,7 @@ eol = void "\n" <|> void "\r\n" <|> Parsec.eof
sol :: Parser () sol :: Parser ()
sol = do sol = do
p <- getPosition p <- getPosition
if sourceLine p == 1 && sourceColumn p == 1 if sourceColumn p == 1
then pure () then pure ()
else fail "Not at start of line/document" else fail "Not at start of line/document"