From ddc2a19b6591dc254462d44aefa37bc25aaaf9bb Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Mon, 27 May 2024 00:01:46 -0500
Subject: Fix emit and read, add imports, fix makefile

---
 src/util.scm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'src/util.scm')

diff --git a/src/util.scm b/src/util.scm
index 7bf89ac..41da769 100644
--- a/src/util.scm
+++ b/src/util.scm
@@ -1,7 +1,8 @@
 (module (jimmy util) *
 
   (import scheme (chicken base)
-          (chicken condition))
+          (chicken condition)
+          (chicken string))
 
   (define-syntax define-public
     (syntax-rules ()
@@ -32,6 +33,7 @@
            ((list? (cdr kv))
             (apply alist-walk (cdr kv) (cdr keys)))))))
 
-  )
+  (define (string-join ss #!optional (sep " "))
+  (string-intersperse ss sep)))
 
 
-- 
cgit 1.4.1-21-gabe81