sbitb.cgs 411 B

1234567891011121314151617181920212223242526272829303132333435
  1. # cr16 testcase for sbitb $count, reg/regp/mem
  2. # mach: cr16
  3. .include "testutils.inc"
  4. start
  5. .global sbitb
  6. sbitb:
  7. sbitb $0,_y
  8. loadw _y, r1
  9. cmpb $0xf1, r1
  10. beq ok1
  11. not_ok:
  12. fail
  13. ok1:
  14. movd $_y, (r1,r0)
  15. sbitb $1,0(r1,r0)
  16. loadw _y, r1
  17. cmpb $0xf3, r1
  18. beq ok2
  19. br not_ok
  20. ok2:
  21. movw $_y, r1
  22. sbitb $2,0(r1)
  23. loadw _y, r1
  24. cmpb $0xf7, r1
  25. beq ok3
  26. br not_ok
  27. ok3:
  28. pass
  29. _y: .word 0xf0