From c75caedf65f30f976bfce2f42a2212dd1355c268 Mon Sep 17 00:00:00 2001 From: joshvera Date: Mon, 21 Aug 2017 18:54:54 -0400 Subject: [PATCH] Add <*> to class assignment --- src/Language/TypeScript/Syntax.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Language/TypeScript/Syntax.hs b/src/Language/TypeScript/Syntax.hs index 906a07e3c..289b385d3 100644 --- a/src/Language/TypeScript/Syntax.hs +++ b/src/Language/TypeScript/Syntax.hs @@ -555,7 +555,7 @@ literal = <|> makeTerm <$> symbol Regex <*> (Literal.TextElement <$> source) class' :: Assignment -class' = makeTerm <$> symbol Class <*> children (Declaration.Class <$> expression <*> (many typeParameter' <|> pure []) (superclass <|> pure []) <*> classBodyStatements) +class' = makeTerm <$> symbol Class <*> children (Declaration.Class <$> expression <*> (many typeParameter' <|> pure []) <*> (superclass <|> pure []) <*> classBodyStatements) where superclass = pure <$ symbol Grammar.ClassHeritage <*> children expression object :: Assignment