clrfr.cgs 599 B

123456789101112131415161718192021222324252627
  1. # frv testcase for clrfr $FRk
  2. # mach: frv
  3. .include "testutils.inc"
  4. start
  5. .global clrfr
  6. clrfr:
  7. nldfi @(sp,0),fr20 ; Activate fr20 with nesr.fr==1
  8. or_spr_immed 0x00100000,fner1
  9. nldi @(sp,0),gr20 ; Activate gr20 with nesr.fr==0
  10. or_spr_immed 0x00200000,fner1
  11. nldfi @(sp,0),fr52 ; Activate fr52 with nesr.fr==1
  12. or_spr_immed 0x00100000,fner0
  13. clrfr fr20
  14. test_spr_immed 0x00200000,fner1
  15. test_spr_immed 0x00100000,fner0
  16. test_spr_immed 0,nesr0
  17. test_spr_immed 0,neear0
  18. test_spr_immed 0x94800401,nesr1
  19. test_spr_gr neear1,sp
  20. test_spr_immed 0xf4800801,nesr2
  21. test_spr_gr neear2,sp
  22. pass