,@(if (eql 1 1-or-2-class)
`((eq wrapper wrapper-0))
`((or (eq wrapper wrapper-0)
,@(if (eql 1 1-or-2-class)
`((eq wrapper wrapper-0))
`((or (eq wrapper wrapper-0)
(declare (fixnum wrapper-cache-no))
(when (zerop wrapper-cache-no) (go ,miss-label))
,(let ((form `(logand mask wrapper-cache-no)))
(declare (fixnum wrapper-cache-no))
(when (zerop wrapper-cache-no) (go ,miss-label))
,(let ((form `(logand mask wrapper-cache-no)))
,@(let ((adds 0) (len (length wrappers)))
(declare (fixnum adds len))
(mapcar (lambda (wrapper)
,@(let ((adds 0) (len (length wrappers)))
(declare (fixnum adds len))
(mapcar (lambda (wrapper)
(declare (fixnum wrapper-cache-no))
(when (zerop wrapper-cache-no) (go ,miss-label))
(setq primary (the fixnum (+ primary wrapper-cache-no)))
(declare (fixnum wrapper-cache-no))
(when (zerop wrapper-cache-no) (go ,miss-label))
(setq primary (the fixnum (+ primary wrapper-cache-no)))