test4 = AST [
         Declare (Var "i") S32Int (ConstS32Int () 0),
         While (GetVar () (Var "i")) (AST [])
        ]
test4 = AST [
         Declare (Var "i") S32Int (ConstS32Int () 0),
         While (GetVar () (Var "i")) (AST [])
        ]