(src (make-random-tn :kind :normal
:sc (sc-or-lose 'single-reg)
:offset (+ i (tn-offset src)))))
(src (make-random-tn :kind :normal
:sc (sc-or-lose 'single-reg)
:offset (+ i (tn-offset src)))))
;; The desired FP mode data is in the least significant 32
;; bits, which is stored at the next higher word in memory.
(loadw res nfp (+ offset 4))
;; The desired FP mode data is in the least significant 32
;; bits, which is stored at the next higher word in memory.
(loadw res nfp (+ offset 4))