Declare CSV projected fields ignorable in the generated code to be compiled.

This commit is contained in:
Dimitri Fontaine 2013-10-20 23:40:42 +02:00
parent 9fd0bbabe2
commit 73de5b7186

View File

@ -108,6 +108,7 @@
`(lambda (row)
(declare (optimize speed) (type list row))
(destructuring-bind (,@args) row
(declare (ignorable ,@args))
(list ,@newrow))))))))
;; allow for some debugging
(if compile (compile nil projection) projection))))