yw05
/
ywatds
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix regression with table value not being returned

master
y5nw 2021-08-14 09:25:24 +02:00
parent ea0fa12dba
commit 4bfbf5ef61
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
serialize-lib.lisp
View File

@ -39,7 +39,8 @@
(let ((,kv (string-to-value ,key nil))
(,vt (string-to-value ,value t)))
(values ,kv (if (equal ,vt 'table)
(funcall ,gett-f ,stream)))))))
(funcall ,gett-f ,stream)
,vt))))))
(defmacro iterate-table-entries ((stream key val gett-f) &body body)
(alexandria:with-gensyms (line)