dead-code-detection 0.4.0.1 → 0.5
raw patch · 3 files changed
+11/−2 lines, 3 files
Files
- dead-code-detection.cabal +1/−1
- src/Ast.hs +1/−1
- test/AstSpec.hs +9/−0
dead-code-detection.cabal view
@@ -3,7 +3,7 @@ -- see: https://github.com/sol/hpack name: dead-code-detection-version: 0.4.0.1+version: 0.5 synopsis: detect dead code in haskell projects description: detect dead code in haskell projects category: Development
src/Ast.hs view
@@ -137,7 +137,7 @@ instance NameGraph (HsGroup Name) where nameGraph = \ case- HsGroup valBinds [] tyclds _instances [] [] [] foreign_decls [] [] [] [] [] ->+ HsGroup valBinds [] tyclds _instances _standaloneInstances [] [] foreign_decls [] [] [] [] [] -> nameGraph valBinds ++ nameGraph tyclds ++ nameGraph foreign_decls
test/AstSpec.hs view
@@ -166,6 +166,15 @@ |] $ do (usageGraph <$> parseStringGraph ["Foo.hs"]) `shouldReturn` [] + it "ignores standalone deriving instances" $ do+ withFoo [i|+ {-# LANGUAGE StandaloneDeriving #-}+ module Foo where+ data Foo = Foo+ deriving instance Show Foo+ |] $ do+ (usageGraph <$> parseStringGraph ["Foo.hs"]) `shouldReturn` [("Foo.Foo", [])]+ context "PatBind" $ do it "can parse pattern binding" $ do withFooHeader [i|