refactor: avoid Bwd
in within
and brackets(Worker)
#62
Annotations
10 warnings
ubuntu-latest pipelines will use ubuntu-24.04 soon. For more details, see https://github.com/actions/runner-images/issues/10636
|
Run HLint:
brat/Brat/Parser.hs#L570
Suggestion in expr' in module Brat.Parser: Avoid lambda using `infix` ▫︎ Found: "(\\ fc -> spanFC fc juxtFC)" ▫︎ Perhaps: "(`spanFC` juxtFC)"
|
Run HLint:
brat/Brat/Checker/Helpers.hs#L120
Suggestion in pullPorts in module Brat.Checker.Helpers: Use uncurry ▫︎ Found: "\\ (pulled, rest) -> pulled ++ rest" ▫︎ Perhaps: "uncurry (++)" ▫︎ Note: increases laziness
|
Run HLint:
brat/Brat/Lexer/Bracketed.hs#L54
Suggestion in module Brat.Lexer.Bracketed: Redundant bracket ▫︎ Found: "let\n Pos closeLine closeCol = (end fc)\n closeFC\n = FC (Pos closeLine (closeCol - 1)) (Pos closeLine closeCol)\nin\n skipChars\n (i - 1) (bts ++ [FlatTok (Token closeFC (closeTok b))] ++ rest)" ▫︎ Perhaps: "let\n Pos closeLine closeCol = end fc\n closeFC\n = FC (Pos closeLine (closeCol - 1)) (Pos closeLine closeCol)\nin\n skipChars\n (i - 1) (bts ++ [FlatTok (Token closeFC (closeTok b))] ++ rest)"
|
Run HLint:
brat/Brat/Lexer/Bracketed.hs#L94
Suggestion in within in module Brat.Lexer.Bracketed: Redundant bracket ▫︎ Found: "(second3 ((Bracketed fc' b' xs) :)) <$> within ctx ts" ▫︎ Perhaps: "second3 ((Bracketed fc' b' xs) :) <$> within ctx ts"
|
Run HLint:
brat/Brat/Lexer/Bracketed.hs#L94
Suggestion in within in module Brat.Lexer.Bracketed: Redundant bracket ▫︎ Found: "((Bracketed fc' b' xs) :)" ▫︎ Perhaps: "(Bracketed fc' b' xs :)"
|
Run HLint:
brat/Brat/Lexer/Bracketed.hs#L95
Suggestion in within in module Brat.Lexer.Bracketed: Redundant bracket ▫︎ Found: "(second3 ((FlatTok t) :)) <$> within ctx ts" ▫︎ Perhaps: "second3 ((FlatTok t) :) <$> within ctx ts"
|
Run HLint:
brat/Brat/Lexer/Bracketed.hs#L95
Suggestion in within in module Brat.Lexer.Bracketed: Redundant bracket ▫︎ Found: "((FlatTok t) :)" ▫︎ Perhaps: "(FlatTok t :)"
|
Run HLint:
brat/Brat/Lexer/Bracketed.hs#L103
Suggestion in brackets in module Brat.Lexer.Bracketed: Redundant bracket ▫︎ Found: "((Bracketed enclosingFC b xs) :)" ▫︎ Perhaps: "(Bracketed enclosingFC b xs :)"
|
Run HLint:
brat/Brat/Lexer/Bracketed.hs#L105
Suggestion in brackets in module Brat.Lexer.Bracketed: Redundant bracket ▫︎ Found: "((FlatTok t) :)" ▫︎ Perhaps: "(FlatTok t :)"
|
Loading