Home | History | Annotate | Line # | Download | only in cr16 
      1 # cr16 testcase for tbitw
      2 # mach:	 cr16
      3 
      4 	.include "testutils.inc"
      5 
      6 	start
      7 
      8 	.global tbitw
      9 tbitw:
     10 	movw $0, r1
     11 	lpr     r1, psr
     12 	tbitw	$0,_y
     13 	spr  psr, r1
     14 	cmpb    $0x20, r1
     15 	beq ok1
     16 not_ok:
     17 	fail
     18 
     19 ok1:
     20 	movw $0, r1
     21 	lpr     r1, psr
     22 	movd   $_y, (r1,r0)
     23 	tbitw	$1,0(r1,r0)
     24 	loadw   _y, r1
     25 	spr  psr, r1
     26 	cmpb    $0x20, r1
     27 	beq ok2
     28 	br not_ok
     29 ok2:
     30 
     31 	pass
     32 
     33 _y:	.word	0xf7
     34