ci: Run hlint #69
Annotations
4 warnings
|
Run HLint:
xml-conduit/src/Text/XML/Stream/Parse.hs#L1154
Suggestion in module Text.XML.Stream.Parse: Use <=< ▫︎ Found: "\\ as -> (\\ (as', f') -> runAttrParser (g f') as') =<< (f as)" ▫︎ Perhaps: "((\\ (as', f') -> runAttrParser (g f') as') Control.Monad.<=< f)"
|
|
Run HLint:
xml-conduit/src/Text/XML/Stream/Parse.hs#L1155
Suggestion in module Text.XML.Stream.Parse: Redundant bracket ▫︎ Found: "(\\ (as', f') -> runAttrParser (g f') as') =<< (f as)" ▫︎ Perhaps: "(\\ (as', f') -> runAttrParser (g f') as') =<< f as"
|
|
Run HLint:
xml-conduit/src/Text/XML/Stream/Token.hs#L109
Suggestion in charUtf8XmlEscaped in module Text.XML.Stream.Token: Redundant $ ▫︎ Found: "escapeFor\n ECSingleArg\n (condB (== _sq) (fixed6 (_am, (_a, (_p, (_o, (_s, _sc)))))))\n $ (E.liftFixedToBounded E.word8)" ▫︎ Perhaps: "escapeFor\n ECSingleArg\n (condB (== _sq) (fixed6 (_am, (_a, (_p, (_o, (_s, _sc)))))))\n (E.liftFixedToBounded E.word8)"
|
|
Run HLint:
xml-conduit/src/Text/XML/Stream/Token.hs#L110
Suggestion in charUtf8XmlEscaped in module Text.XML.Stream.Token: Redundant bracket ▫︎ Found: "escapeFor\n ECSingleArg\n (condB (== _sq) (fixed6 (_am, (_a, (_p, (_o, (_s, _sc)))))))\n $ (E.liftFixedToBounded E.word8)" ▫︎ Perhaps: "escapeFor\n ECSingleArg\n (condB (== _sq) (fixed6 (_am, (_a, (_p, (_o, (_s, _sc)))))))\n $ E.liftFixedToBounded E.word8"
|
Loading