From ea160e993a7196d0f5aa6749b1ea046f16cf0546 Mon Sep 17 00:00:00 2001
From: Jan Tuomi <jans.tuomi@gmail.com>
Date: Thu, 8 Dec 2022 00:29:48 +0200
Subject: Add "let memo" syntax for automatic memoization

---
 src/Builtins.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'src/Builtins.hs')

diff --git a/src/Builtins.hs b/src/Builtins.hs
index 3b92926..079195f 100644
--- a/src/Builtins.hs
+++ b/src/Builtins.hs
@@ -5,11 +5,12 @@ import qualified Data.Map as M
 import qualified Data.Text as T
 import qualified Text.Read as TR
 import qualified Data.List as L
+import qualified Data.Bifunctor as B
 import Control.Monad.Except
 import Utils
 
 builtinEnv :: Env
-builtinEnv = M.fromList [
+builtinEnv = M.fromList $ map (B.second Regular) [
     -- arithmetic
     builtinAdd2,
     builtinSubtract2,
-- 
cgit v1.3