lints

src/Language/Go/Assignment.hs

@@ -12,7 +12,6 @@ import Prologue
 import           Assigning.Assignment hiding (Assignment, Error)
 import qualified Assigning.Assignment as Assignment
 import qualified Data.Abstract.ScopeGraph as ScopeGraph (AccessControl(..))
-import           Data.Abstract.Name (Name, name)
 import           Data.Syntax
     (contextualize, emptyTerm, handleError, infixContext, makeTerm, makeTerm', makeTerm'', makeTerm1, parseError)
 import qualified Data.Syntax as Syntax

src/Language/Java/Assignment.hs

@@ -309,9 +309,6 @@ identifier = makeTerm <$> symbol Identifier <*> (Syntax.Identifier . name <$> so
 typeIdentifier :: Assignment Term
 typeIdentifier = makeTerm <$> symbol TypeIdentifier <*> (Syntax.Identifier . name <$> source)
 
-identifier' :: Assignment Name
-identifier' = (symbol Identifier <|> symbol TypeIdentifier <|> symbol Identifier') *> (name <$> source)
-
 scopedIdentifier :: Assignment Term
 scopedIdentifier = makeTerm <$> symbol ScopedIdentifier <*> children (Expression.MemberAccess <$> term expression <*> identifier)
 

src/Language/PHP/Assignment.hs

@@ -488,9 +488,6 @@ newVariable = makeTerm <$> symbol NewVariable <*> children (Syntax.NewVariable <
 memberName :: Assignment Term
 memberName = name <|> simpleVariable' <|> expression
 
-memberName' :: Assignment Name.Name
-memberName' = name' <|> simpleVariable''
-
 relativeScope :: Assignment Term
 relativeScope = makeTerm <$> symbol RelativeScope <*> (Syntax.RelativeScope <$> source)
 
@@ -752,9 +749,6 @@ simpleVariable = makeTerm <$> symbol SimpleVariable <*> children (Syntax.SimpleV
 simpleVariable' :: Assignment Term
 simpleVariable' = choice [simpleVariable, variableName]
 
-simpleVariable'' :: Assignment Name.Name
-simpleVariable'' = variableName'
-
 
 yieldExpression :: Assignment Term
 yieldExpression = makeTerm <$> symbol YieldExpression <*> children (Statement.Yield <$> term (arrayElementInitializer <|> expression))
@@ -779,15 +773,6 @@ requireOnceExpression = makeTerm <$> symbol RequireOnceExpression <*> children (
 variableName :: Assignment Term
 variableName = makeTerm <$> symbol VariableName <*> children (Syntax.VariableName <$> term name)
 
-variableName' :: Assignment Name.Name
-variableName' = symbol VariableName *> children name'
-
-name :: Assignment Term
-name = makeTerm <$> (symbol Name <|> symbol Name') <*> (Syntax.Identifier . Name.name <$> source)
-
-name' :: Assignment Name.Name
-name' = (symbol Name <|> symbol Name') *> (Name.name <$> source)
-
 functionStaticDeclaration :: Assignment Term
 functionStaticDeclaration = makeTerm <$> symbol FunctionStaticDeclaration <*> children (Declaration.VariableDeclaration <$> manyTerm staticVariableDeclaration)
 

src/Language/Python/Assignment.hs

@@ -9,7 +9,6 @@ module Language.Python.Assignment
 
 import           Assigning.Assignment hiding (Assignment, Error)
 import qualified Assigning.Assignment as Assignment
-import           Data.Abstract.Name (Name, name)
 import qualified Data.Diff as Diff
 import qualified Data.List.NonEmpty as NonEmpty
 import           Data.Sum

src/Language/TypeScript/Assignment.hs

@@ -468,9 +468,6 @@ jsxAttribute = makeTerm <$> symbol Grammar.JsxAttribute <*> children (TypeScript
 propertyIdentifier :: Assignment Term
 propertyIdentifier = makeTerm <$> symbol PropertyIdentifier <*> (Syntax.Identifier . name <$> source)
 
-propertyIdentifier' :: Assignment Name
-propertyIdentifier' = symbol PropertyIdentifier *> (name <$> source)
-
 sequenceExpression :: Assignment Term
 sequenceExpression = makeTerm <$> symbol Grammar.SequenceExpression <*> children (Expression.SequenceExpression <$> term expression <*> term expressions)
 

src/Tags/Tagging.hs

@@ -12,7 +12,6 @@ import           Control.Effect as Eff
 import           Control.Effect.Error as Error
 import qualified Control.Effect.State as State
 import           Control.Monad.Trans
-import           Data.Aeson
 import           Data.Blob
 import           Data.Location
 import           Data.Machine as Machine