(:arg-types * positive-fixnum complex-single-float)
(:results (result :scs (complex-single-reg)))
(:result-types complex-single-float)
(:temporary (:scs (non-descriptor-reg)) offset)
(:generator 5
(loadw offset object 0 instance-pointer-lowtag)
(:arg-types * positive-fixnum complex-single-float)
(:results (result :scs (complex-single-reg)))
(:result-types complex-single-float)
(:temporary (:scs (non-descriptor-reg)) offset)
(:generator 5
(loadw offset object 0 instance-pointer-lowtag)