diff --git a/src/Language/Java/Assignment.hs b/src/Language/Java/Assignment.hs index 36972e33c..2e721d2e6 100644 --- a/src/Language/Java/Assignment.hs +++ b/src/Language/Java/Assignment.hs @@ -253,7 +253,7 @@ variableDeclaratorList = symbol VariableDeclaratorList *> children (makeDecl <$> arrayCreationExpression :: Assignment Term arrayCreationExpression = makeTerm <$> symbol Grammar.ArrayCreationExpression <*> children (Java.Syntax.ArrayCreationExpression <$> (new *> type') <*> many dimsExpr) - where new = token AnonNew *> pure Java.Syntax.NewKeyword + where new = token AnonNew $> pure Java.Syntax.NewKeyword localVariableDeclarationStatement :: Assignment Term localVariableDeclarationStatement = symbol LocalVariableDeclarationStatement *> children localVariableDeclaration @@ -285,7 +285,7 @@ char = makeTerm <$> symbol CharacterLiteral <*> (Literal.TextElement <$> source) -- Identifiers identifier :: Assignment Term -identifier = makeTerm <$> (symbol Identifier) <*> (Syntax.Identifier . name <$> source) +identifier = makeTerm <$> symbol Identifier <*> (Syntax.Identifier . name <$> source) typeIdentifier :: Assignment Term typeIdentifier = makeTerm <$> symbol TypeIdentifier <*> (Syntax.Identifier . name <$> source) diff --git a/test/Integration/Spec.hs b/test/Integration/Spec.hs index 463f75f8e..6e804f6a5 100644 --- a/test/Integration/Spec.hs +++ b/test/Integration/Spec.hs @@ -9,7 +9,7 @@ import System.FilePath.Posix import SpecHelpers languages :: [FilePath] -languages = ["go", "javascript", "json", "python", "ruby", "typescript"] +languages = ["go", "javascript", "json", "python", "ruby", "typescript", "java"] spec :: TaskConfig -> Spec spec config = parallel $ do