Comment 6 for bug 1523149

These are not failing anymore, a new failing test case:
(defun foo ()
  (declare (optimize (debug 1) speed))
  (let ((z (block nil
             (labels ((f (x)
                        (return x)))
               (declare (inline f))
               (funcall (the function #'f) t)
               (funcall (the function #'f) t)))))

    (and z
         1)))