schemify: fix quoted box in interpret mode

This commit is contained in:
Matthew Flatt 2019-01-01 09:19:18 -07:00
parent 7e83a6038a
commit 5cec8d52c2

View File

@ -243,7 +243,8 @@
(if (or (vector? v)
(pair? v)
(symbol? v)
(number? v))
(number? v)
(box? v))
(vector 'quote v)
v))]
[`(set! ,id ,rhs)