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