Prevent unpack overflow, use map+join instead

Author: Olical

fnl/conjure/client/common-lisp/swank.fnl

@@ -184,8 +184,7 @@
           (set opened-quote false)
           (table.insert
             vals
-            (string.char
-              (unpack stack)))
+            (str.join (a.map string.char stack)))
           (set stack []))
         (when escaped
           ;; if we've escaped this quote, put it in.

lua/conjure/client/common-lisp/swank.lua

@@ -170,7 +170,7 @@ local function parse_separated_list(string_to_parse)
     if opened_quote then
       if not escaped then
         opened_quote = false
-        table.insert(vals, string.char(unpack(stack)))
+        table.insert(vals, str.join(a.map(string.char, stack)))
         stack = {}
       else
       end