1 # frv testcase for cfsqrts $FRj,$FRk,$CCi,$cond
2 # mach: fr500 fr550 frv
4 .include "testutils.inc"
12 set_spr_immed 0x1b1b,cccr
14 cfsqrts fr44,fr1,cc0,1 ; 9.0
15 test_fr_fr fr1,fr36 ; 3.0
17 set_fr_iimmed 0x4049,0x0fdb,fr10 ; 3.141592654
18 cfsqrts fr10,fr10,cc4,1
19 test_fr_iimmed 0x3fe2dfc5,fr10 ; 1.7724539
21 cfsqrts fr44,fr1,cc1,0 ; 9.0
22 test_fr_fr fr1,fr36 ; 3.0
24 set_fr_iimmed 0x4049,0x0fdb,fr10 ; 3.141592654
25 cfsqrts fr10,fr10,cc5,0
26 test_fr_iimmed 0x3fe2dfc5,fr10 ; 1.7724539
29 cfsqrts fr44,fr1,cc0,0 ; 9.0
32 set_fr_iimmed 0x4049,0x0fdb,fr10 ; 3.141592654
33 cfsqrts fr10,fr10,cc4,0
34 test_fr_iimmed 0x40490fdb,fr10
37 cfsqrts fr44,fr1,cc1,1 ; 9.0
40 set_fr_iimmed 0x4049,0x0fdb,fr10 ; 3.141592654
41 cfsqrts fr10,fr10,cc5,1
42 test_fr_iimmed 0x40490fdb,fr10
45 cfsqrts fr44,fr1,cc2,0 ; 9.0
48 set_fr_iimmed 0x4049,0x0fdb,fr10 ; 3.141592654
49 cfsqrts fr10,fr10,cc6,1
50 test_fr_iimmed 0x40490fdb,fr10
53 cfsqrts fr44,fr1,cc3,1 ; 9.0
56 set_fr_iimmed 0x4049,0x0fdb,fr10 ; 3.141592654
57 cfsqrts fr10,fr10,cc7,0
58 test_fr_iimmed 0x40490fdb,fr10