19990502 sourceware import
[external/binutils.git] / gas / testsuite / gas / hppa / basic / fp_comp.s
1         .SPACE $PRIVATE$
2         .SUBSPA $DATA$,QUAD=1,ALIGN=8,ACCESS=31
3         .SUBSPA $BSS$,QUAD=1,ALIGN=8,ACCESS=31,ZERO,SORT=82
4         .SPACE $TEXT$
5         .SUBSPA $LIT$,QUAD=0,ALIGN=8,ACCESS=44
6         .SUBSPA $CODE$,QUAD=0,ALIGN=8,ACCESS=44,CODE_ONLY
7
8         .SPACE $TEXT$
9         .SUBSPA $CODE$
10
11         .align 4
12 ; Basic immediate instruction tests.  
13 ;
14 ; We could/should test some of the corner cases for register and 
15 ; immediate fields.  We should also check the assorted field
16 ; selectors to make sure they're handled correctly.
17         fcpy,sgl %fr5,%fr10
18         fcpy,dbl %fr5,%fr10
19         fcpy,quad %fr5,%fr10
20         fcpy,sgl %fr20,%fr24
21         fcpy,dbl %fr20,%fr24
22
23         fabs,sgl %fr5,%fr10
24         fabs,dbl %fr5,%fr10
25         fabs,quad %fr5,%fr10
26         fabs,sgl %fr20,%fr24
27         fabs,dbl %fr20,%fr24
28
29         fsqrt,sgl %fr5,%fr10
30         fsqrt,dbl %fr5,%fr10
31         fsqrt,quad %fr5,%fr10
32         fsqrt,sgl %fr20,%fr24
33         fsqrt,dbl %fr20,%fr24
34
35         frnd,sgl %fr5,%fr10
36         frnd,dbl %fr5,%fr10
37         frnd,quad %fr5,%fr10
38         frnd,sgl %fr20,%fr24
39         frnd,dbl %fr20,%fr24
40         
41         fadd,sgl %fr4,%fr8,%fr12
42         fadd,dbl %fr4,%fr8,%fr12
43         fadd,quad %fr4,%fr8,%fr12
44         fadd,sgl %fr20,%fr24,%fr28
45         fadd,dbl %fr20,%fr24,%fr28
46         fadd,quad %fr20,%fr24,%fr28
47
48         fsub,sgl %fr4,%fr8,%fr12
49         fsub,dbl %fr4,%fr8,%fr12
50         fsub,quad %fr4,%fr8,%fr12
51         fsub,sgl %fr20,%fr24,%fr28
52         fsub,dbl %fr20,%fr24,%fr28
53         fsub,quad %fr20,%fr24,%fr28
54
55         fmpy,sgl %fr4,%fr8,%fr12
56         fmpy,dbl %fr4,%fr8,%fr12
57         fmpy,quad %fr4,%fr8,%fr12
58         fmpy,sgl %fr20,%fr24,%fr28
59         fmpy,dbl %fr20,%fr24,%fr28
60         fmpy,quad %fr20,%fr24,%fr28
61
62         fdiv,sgl %fr4,%fr8,%fr12
63         fdiv,dbl %fr4,%fr8,%fr12
64         fdiv,quad %fr4,%fr8,%fr12
65         fdiv,sgl %fr20,%fr24,%fr28
66         fdiv,dbl %fr20,%fr24,%fr28
67         fdiv,quad %fr20,%fr24,%fr28
68
69         frem,sgl %fr4,%fr8,%fr12
70         frem,dbl %fr4,%fr8,%fr12
71         frem,quad %fr4,%fr8,%fr12
72         frem,sgl %fr20,%fr24,%fr28
73         frem,dbl %fr20,%fr24,%fr28
74         frem,quad %fr20,%fr24,%fr28
75
76         fmpyadd,sgl %fr16,%fr17,%fr18,%fr19,%fr20
77         fmpyadd,dbl %fr16,%fr17,%fr18,%fr19,%fr20
78         fmpysub,sgl %fr16,%fr17,%fr18,%fr19,%fr20
79         fmpysub,dbl %fr16,%fr17,%fr18,%fr19,%fr20
80
81         xmpyu %fr4,%fr5,%fr6