From 2c67ae5a703eb19479c131b5488d846a9c84a550 Mon Sep 17 00:00:00 2001
From: Jan Tuomi <jan.tuomi@valuemotive.com>
Date: Fri, 23 Sep 2022 16:32:33 +0300
Subject: Implement function evaluation and symbol lookup

---
 src/Types.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Types.hs')

diff --git a/src/Types.hs b/src/Types.hs
index be9002a..4ade835 100644
--- a/src/Types.hs
+++ b/src/Types.hs
@@ -25,7 +25,7 @@ data AST
     | ASTVector [AST]
     | ASTFunctionCall [AST]
     | ASTHashMap (M.Map AST AST)
-    | ASTFunction (AST -> AST)
+    | ASTFunction (AST -> LContext AST)
 
 instance (Show AST) where
     show (ASTInteger n) = show n
-- 
cgit v1.3