123456789101112131415161718192021222324252627282930313233 |
- # cr16 testcase for tbitw
- # mach: cr16
- .include "testutils.inc"
- start
- .global tbitw
- tbitw:
- movw $0, r1
- lpr r1, psr
- tbitw $0,_y
- spr psr, r1
- cmpb $0x20, r1
- beq ok1
- not_ok:
- fail
- ok1:
- movw $0, r1
- lpr r1, psr
- movd $_y, (r1,r0)
- tbitw $1,0(r1,r0)
- loadw _y, r1
- spr psr, r1
- cmpb $0x20, r1
- beq ok2
- br not_ok
- ok2:
- pass
- _y: .word 0xf7
|