prim-convert - do not stop on first ref

This commit is contained in:
Justin Ethier 2017-04-04 08:54:06 +00:00
parent 1a28889caf
commit a4319fd48d

View file

@ -1223,7 +1223,7 @@
(cond
((ref? (car ast))
`( ,(prim:func->prim (car ast) (- (length ast) 1))
,@(cdr ast)))
,@(map conv (cdr ast))))
(else
(map conv ast))))
(else