Skip to content

Commit

Permalink
Remove the OverloadedRecordDot from the library
Browse files Browse the repository at this point in the history
  • Loading branch information
FPtje committed Jul 16, 2023
1 parent 31303d8 commit f33dcb2
Showing 1 changed file with 2 additions and 4 deletions.
6 changes: 2 additions & 4 deletions src/GLuaFixer/Interface.hs
Original file line number Diff line number Diff line change
@@ -1,5 +1,3 @@
{-# LANGUAGE OverloadedRecordDot #-}

module GLuaFixer.Interface where

import GLua.AG.AST (AST)
Expand Down Expand Up @@ -28,15 +26,15 @@ lex :: LintSettings -> FilePath -> String -> Either [LintMessage] [MToken]
lex lintSettings filepath contents =
case PSL.execParseTokens contents of
Left lexErr ->
Left [LintMessage LintError (PSL.sp2Rg $ errorPos lexErr) (IssueParseError lexErr) filepath | lintSettings.lint_syntaxErrors]
Left [LintMessage LintError (PSL.sp2Rg $ errorPos lexErr) (IssueParseError lexErr) filepath | lint_syntaxErrors lintSettings]
Right tokens -> Right $ fixedLexPositions tokens

-- | Use the (slower, but error-correcting) UU-parsinglib lexer to generate the lexicon
lexUU :: LintSettings -> String -> ([MToken], [Error LineColPos])
lexUU lintSettings contents = case UUL.execParseTokens contents of
(tokens, errors) ->
( fixedLexPositions tokens
, [err | lintSettings.lint_syntaxErrors, err <- errors]
, [err | lint_syntaxErrors lintSettings, err <- errors]
)

-- | Run the linting functions that inspect the lexicon
Expand Down

0 comments on commit f33dcb2

Please sign in to comment.