1 # frv testcase for slass $GRi,$GRj,$GRk
4 .include "../testutils.inc"
10 set_gr_immed 0,gr7 ; Shift by 0
17 set_gr_immed 1,gr7 ; Shift by 1
25 set_gr_immed 31,gr7 ; Shift 1 by 31
30 test_gr_limmed 0x7fff,0xffff,gr6
33 set_gr_immed 31,gr7 ; Shift -1 by 31
38 test_gr_limmed 0x8000,0x0000,gr6
41 set_gr_immed 14,gr7 ; Shift 0xffff0000 by 14
42 set_gr_limmed 0xffff,0x0000,gr8
44 test_gr_limmed 0xffff,0x0000,gr8
46 test_gr_limmed 0xc000,0x0000,gr6
49 set_gr_immed 15,gr7 ; Shift 0xffff0000 by 15
50 set_gr_limmed 0xffff,0x0000,gr8
52 test_gr_limmed 0xffff,0x0000,gr8
54 test_gr_limmed 0x8000,0x0000,gr6
57 set_gr_immed 20,gr7 ; Shift 0xffff0000 by 20
58 set_gr_limmed 0xffff,0x0000,gr8
60 test_gr_limmed 0xffff,0x0000,gr8
62 test_gr_limmed 0x8000,0x0000,gr6
65 set_gr_immed 14,gr7 ; Shift 0x0000ffff by 14
66 set_gr_limmed 0x0000,0xffff,gr8
68 test_gr_limmed 0x0000,0xffff,gr8
70 test_gr_limmed 0x3fff,0xc000,gr6
73 set_gr_immed 15,gr7 ; Shift 0x0000ffff by 15
74 set_gr_limmed 0x0000,0xffff,gr8
76 test_gr_limmed 0x0000,0xffff,gr8
78 test_gr_limmed 0x7fff,0x8000,gr6
81 set_gr_immed 20,gr7 ; Shift 0x0000ffff by 20
82 set_gr_limmed 0x0000,0xffff,gr8
84 test_gr_limmed 0x0000,0xffff,gr8
86 test_gr_limmed 0x7fff,0xffff,gr6
89 set_gr_immed 30,gr7 ; Shift 1 by 30
94 test_gr_limmed 0x4000,0x0000,gr6
97 set_gr_immed 30,gr7 ; Shift -1 by 30
102 test_gr_limmed 0xc000,0000,gr6