Skip to content

Commit

Permalink
Windows absolute paths not necessary
Browse files Browse the repository at this point in the history
  • Loading branch information
JakuJ committed Aug 27, 2024
1 parent dc27ebc commit ff425fc
Showing 1 changed file with 1 addition and 2 deletions.
3 changes: 1 addition & 2 deletions src/Raise/DiagnosticParser.hs
Original file line number Diff line number Diff line change
Expand Up @@ -57,8 +57,7 @@ parseDiagnosticLine = T.pack <$> someTill asciiChar newline

parseDiagnostic :: Parser Diagnostic
parseDiagnostic = do
lookAhead $ (oneOf ("./" :: String) -- filepaths start with . (relative) or / (absolute)
<|> letterChar <* string ":\\") -- absolute Windows filepaths with disk letter
lookAhead $ (oneOf ("./" :: String)) -- filepaths start with . (relative) or / (absolute)
someTill asciiChar (string ".rsl:")
row <- max 0 . subtract 1 . read <$> someTill digitChar (char ':')
column <- read <$> someTill digitChar (char ':')
Expand Down

0 comments on commit ff425fc

Please sign in to comment.