1 files changed, 1 insertions, 1 deletions
diff --git a/test/TestUtils.hs b/test/TestUtils.hs
index 672f801..86b3db5 100644
--- a/test/TestUtils.hs
+++ b/test/TestUtils.hs
@@ -36,7 +36,7 @@ expectErrorL env lc =
             Right (val, _) -> error $ "unexpected success: " ++ show val
 
 ast :: ASTNode -> AST
-ast node = AST { astNode = node }
+ast node = AST { an = node }
 
 astInteger a = ast $ ASTInteger a
 astDouble a = ast $ ASTDouble a