(let ((pos (gensym "POS-"))
(found (gensym "FOUND-"))
(key (kmrcl:ensure-keyword (concatenate 'string filename "^" fieldname))))
- `(locally (declare (optimize (speed 3) (size 0) (safety 0)))
+ `(locally (declare (optimize (speed 3) (safety 0)))
(multiple-value-bind (,pos ,found) (gethash ,key *vff-position-hash*)
+ (declare (ignore ,found))
(if ,pos
(locally (declare (type (integer 0 100000) ,pos))
(nth ,pos ,record))