From 34d94104686fdb6e3bc2573315291770cab37cf3 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Thu, 22 Feb 2024 00:29:23 -0600
Subject: Change types to lowercase; add todos

---
 eval.lua | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'eval.lua')

diff --git a/eval.lua b/eval.lua
index cdf4612..185268f 100644
--- a/eval.lua
+++ b/eval.lua
@@ -10,7 +10,7 @@ local types = require("types")
 if not table.unpack then table.unpack = unpack end
 
 local function Env(inner, outer)
-	return setmetatable(inner, { __type = "Environment", __index = outer, })
+	return setmetatable(inner, { __type = "environment", __index = outer, })
 end
 
 local function Proc(params, body, env)
@@ -20,7 +20,7 @@ local function Proc(params, body, env)
 		env = env,
 	}
 	local mt = {
-		__type = "Procedure",
+		__type = "procedure",
 		__call =
 			function (self, ...)
 				local inner = {}
@@ -37,7 +37,7 @@ end
 
 function eval.eval (x, e)
 	e = e or global
-	if types.lamtype(x) == "Symbol" then
+	if types.lamtype(x) == "symbol" then
 		return e[x]
 	elseif types.luatype(x) ~= "table" then
 		return x
-- 
cgit 1.4.1-21-gabe81