From 855006a1aa70921cd1767292a34f4b38a782ee2d Mon Sep 17 00:00:00 2001 From: joshvera Date: Mon, 21 Aug 2017 18:55:27 -0400 Subject: [PATCH] Remove conditional assignment --- src/Language/TypeScript/Syntax.hs | 3 --- 1 file changed, 3 deletions(-) diff --git a/src/Language/TypeScript/Syntax.hs b/src/Language/TypeScript/Syntax.hs index 09729a2d2..d3020e5f9 100644 --- a/src/Language/TypeScript/Syntax.hs +++ b/src/Language/TypeScript/Syntax.hs @@ -937,9 +937,6 @@ binary = symbol Binary >>= \ loc -> children $ expression >>= \ lexpression -> g where mk s constr = makeTerm loc <$> (symbol s *> (constr lexpression <$> expression)) mkNot s constr = makeTerm loc <$ symbol s <*> (Expression.Not <$> (makeTerm <$> location <*> (constr lexpression <$> expression))) -conditional :: Assignment -conditional = makeTerm <$> symbol Conditional <*> children (Statement.If <$> expression <*> expression <*> expression) - emptyStatement :: Assignment emptyStatement = makeTerm <$> symbol EmptyStatement <*> (Syntax.Empty <$ source <|> pure Syntax.Empty)