(make-ea :qword :disp (make-fixup ',name :assembly-routine)))
(inst call temp-reg-tn)
(note-this-location ,vop :single-value-return)
(make-ea :qword :disp (make-fixup ',name :assembly-routine)))
(inst call temp-reg-tn)
(note-this-location ,vop :single-value-return)