sim/testsuite/cr16/cbitb.cgs

   1 # cr16 testcase for cbitb $bit_pos, ABS/REGP/REG
   2 # mach:  cr16
   3
   4         .include "testutils.inc"
   5
   6         start
   7
   8         .global cbitb
   9 cbitb:
  10         cbitb   $0,_y
  11         loadw   _y, r1
  12         cmpb    $0xfe, r1
  13         beq ok1
  14 not_ok:
  15         fail
  16
  17 ok1:
  18         movd   $_y, (r1,r0)
  19         cbitb   $1,0(r1,r0)
  20         loadw   _y, r1
  21         cmpb    $0xfc, r1
  22         beq ok2
  23         br not_ok
  24 ok2:
  25
  26         movw   $_y, r1
  27         cbitb   $2,0(r1)
  28         loadw   _y, r1
  29         cmpb    $0xf8, r1
  30         beq ok3
  31         br not_ok
  32 ok3:
  33         pass
  34
  35 _y:     .word   0xff