mirror of
https://github.com/github/semantic.git
synced 2024-12-18 04:11:48 +03:00
34 lines
1002 B
Haskell
34 lines
1002 B
Haskell
import "hint" HLint.Default
|
|
import "hint" HLint.Dollar
|
|
import "hint" HLint.Generalise
|
|
|
|
ignore "Use mappend"
|
|
ignore "Redundant do"
|
|
error "generalize ++" = (++) ==> (<>)
|
|
-- AMP fallout
|
|
error "generalize mapM" = mapM ==> traverse
|
|
error "generalize mapM_" = mapM_ ==> traverse_
|
|
error "generalize forM" = forM ==> for
|
|
error "generalize forM_" = forM_ ==> for_
|
|
error "Avoid return" =
|
|
return ==> pure
|
|
where note = "return is obsolete as of GHC 7.10"
|
|
|
|
error "use pure" = free . Pure ==> pure
|
|
error "use wrap" = free . Free ==> wrap
|
|
|
|
error "use extract" = termAnnotation . unTerm ==> extract
|
|
error "use unwrap" = tailF . unTerm ==> unwrap
|
|
|
|
error "avoid head" = head
|
|
where note = "head is partial; consider using Data.Maybe.listToMaybe"
|
|
|
|
error "avoid tail" = tail
|
|
where note = "tail is partial; consider pattern-matching"
|
|
|
|
error "avoid init" = init
|
|
where note = "init is partial; consider pattern-matching"
|
|
|
|
error "avoid last" = last
|
|
where note = "last is partial; consider pattern-matching"
|