Use makeTerm'' instead of mk.

Author: robrix

src/Language/Python/Assignment.hs

@@ -240,10 +240,8 @@ argumentList :: Assignment Term
 argumentList = symbol ArgumentList *> children expressions
 
 withStatement :: Assignment Term
-withStatement = mk <$> symbol WithStatement <*> children (someTerm with)
+withStatement = makeTerm'' <$> symbol WithStatement <*> children (someTerm with)
   where
-    mk _ [child] = child
-    mk l children = makeTerm l children
     with = makeTerm <$> location <*> (withItem <*> term (makeTerm <$> location <*> manyTermsTill expression (void (symbol WithItem) <|> eof)))
     withItem = symbol WithItem *> children (flip Statement.Let <$> term expression <*> term (expression <|> emptyTerm))
             <|> flip Statement.Let <$> term expression <*> emptyTerm