Moved the various AST convenience functions to a separate module.

This commit is contained in:
Vidar Holen
2015-08-16 12:53:23 -07:00
parent 07747b30fb
commit 0dd61b65d8
4 changed files with 302 additions and 241 deletions

View File

@@ -357,10 +357,3 @@ doAnalysis f = analyze f blank id
doStackAnalysis startToken endToken = analyze startToken endToken id
doTransform i = runIdentity . analyze blank blank i
isLoop t = case t of
T_WhileExpression {} -> True
T_UntilExpression {} -> True
T_ForIn {} -> True
T_ForArithmetic {} -> True
T_SelectIn {} -> True
_ -> False