1# frv testcase for nfitos $FRj,$FRk
2# mach: fr500 fr550 frv
3
4	.include "testutils.inc"
5
6	float_constants
7	start
8	load_float_constants
9
10	.global nfitos
11nfitos:
12	set_fr_iimmed	0,0,fr1
13	nfitos		fr1,fr1
14	test_fr_fr	fr1,fr16
15	test_fr_fr	fr1,fr20
16	test_spr_immed	0,fner1
17	test_spr_immed	0,fner0
18
19	set_fr_iimmed	0x0000,0x0002,fr1
20	nfitos		fr1,fr1
21	test_fr_fr	fr1,fr32
22	test_spr_immed	0,fner1
23	test_spr_immed	0,fner0
24
25	set_fr_iimmed	0xdead,0xbeef,fr1
26	nfitos		fr1,fr1
27	test_fr_iimmed	0xce054904,fr1
28	test_spr_immed	0,fner1
29	test_spr_immed	0,fner0
30
31	; These were an attempt to cause overflow
32	set_fr_iimmed	0x7fff,0xffff,fr1
33	nfitos		fr1,fr1
34	test_fr_iimmed	0x4f000000,fr1
35	test_spr_immed	0,fner1
36	test_spr_immed	0,fner0
37
38	set_fr_iimmed	0x8000,0x0000,fr1
39	nfitos		fr1,fr1
40	test_fr_iimmed	0xcf000000,fr1
41	test_spr_immed	0,fner1
42	test_spr_immed	0,fner0
43
44	pass
45