ARM: Fix testing for zero.
* module/mescc/armv4/as.scm (armv4:r-zero?): Modify. (armv4:xor-zf): Modify.
This commit is contained in:
parent
c4c94d68fe
commit
c72d349f53
|
@ -65,7 +65,7 @@
|
||||||
|
|
||||||
(define (armv4:r-zero? info)
|
(define (armv4:r-zero? info)
|
||||||
(let ((r (get-r info)))
|
(let ((r (get-r info)))
|
||||||
`((,(string-append "test___%" r "," "%" r)))))
|
`(((#:immediate1 #x00) ,(string-append "cmp____$i8,%" r)))))
|
||||||
|
|
||||||
(define (armv4:local->r info n)
|
(define (armv4:local->r info n)
|
||||||
(let ((r (get-r info))
|
(let ((r (get-r info))
|
||||||
|
@ -109,7 +109,7 @@
|
||||||
(define (armv4:xor-zf info)
|
(define (armv4:xor-zf info)
|
||||||
'(((#:immediate1 #x00) "mov____$i8,%r0")
|
'(((#:immediate1 #x00) "mov____$i8,%r0")
|
||||||
((#:immediate1 #x01) "moveq__%r0,$i8")
|
((#:immediate1 #x01) "moveq__%r0,$i8")
|
||||||
("test__%r0,%r0")))
|
((#:immediate1 #x00) "cmp____$i8,%r0")))
|
||||||
|
|
||||||
(define (armv4:r->local+n info id n)
|
(define (armv4:r->local+n info id n)
|
||||||
(let ((n (+ (- 0 (* 4 id)) n))
|
(let ((n (+ (- 0 (* 4 id)) n))
|
||||||
|
|
Loading…
Reference in New Issue