block))
(unless (member (if-consequent last) succ)
(barf "The CONSEQUENT for ~S isn't in SUCC for ~S." last block))
block))
(unless (member (if-consequent last) succ)
(barf "The CONSEQUENT for ~S isn't in SUCC for ~S." last block))
(template-more-results-type info) "results")
(check-tn-refs (vop-temps vop) vop t 0 t "temps")
(unless (= (length (vop-codegen-info vop))
(template-more-results-type info) "results")
(check-tn-refs (vop-temps vop) vop t 0 t "temps")
(unless (= (length (vop-codegen-info vop))