From fd3db5c3899daaaefba64479cdf73fcf9c8dbdf3 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Sat, 13 Apr 2024 18:02:05 -0500
Subject: Trim util

---
 core.lua | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

(limited to 'core.lua')

diff --git a/core.lua b/core.lua
index 556866c..3e4773a 100644
--- a/core.lua
+++ b/core.lua
@@ -2,11 +2,9 @@
 
 local dump = require("dump")
 local type = require("type")
-local utf8 = require("utf8")
-local null = type.null
 local assert_arity, assert_type = type.assert_arity, type.assert_type
-local util = require("util")
-local error = util.error
+local null = type.null
+local error = require("util").error
 
 local function fold (kons, knil, r)
 	if r == null then
@@ -111,7 +109,7 @@ end
 env["integer->char"] = function (r)
 	assert_arity(r,1,1)
 	assert_type(r[1], "number") -- todo: check integer
-	return type.character(utf8.char(r[1]))
+	return type.character(r[1])
 end
 
 env["string->list"] = function (r)
-- 
cgit 1.4.1-21-gabe81