Commit | Line | Data |
---|---|---|
6bf5210a JL |
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 | fldwx %r4(%sr0,%r5),%fr6 | |
18 | fldwx,s %r4(%sr0,%r5),%fr6 | |
19 | fldwx,m %r4(%sr0,%r5),%fr6 | |
20 | fldwx,sm %r4(%sr0,%r5),%fr6 | |
21 | flddx %r4(%sr0,%r5),%fr6 | |
22 | flddx,s %r4(%sr0,%r5),%fr6 | |
23 | flddx,m %r4(%sr0,%r5),%fr6 | |
24 | flddx,sm %r4(%sr0,%r5),%fr6 | |
25 | fstwx %fr6,%r4(%sr0,%r5) | |
26 | fstwx,s %fr6,%r4(%sr0,%r5) | |
27 | fstwx,m %fr6,%r4(%sr0,%r5) | |
28 | fstwx,sm %fr6,%r4(%sr0,%r5) | |
29 | fstdx %fr6,%r4(%sr0,%r5) | |
30 | fstdx,s %fr6,%r4(%sr0,%r5) | |
31 | fstdx,m %fr6,%r4(%sr0,%r5) | |
32 | fstdx,sm %fr6,%r4(%sr0,%r5) | |
33 | ||
34 | fldws 0(%sr0,%r5),%fr6 | |
35 | fldws,mb 0(%sr0,%r5),%fr6 | |
36 | fldws,ma 0(%sr0,%r5),%fr6 | |
37 | fldds 0(%sr0,%r5),%fr6 | |
38 | fldds,mb 0(%sr0,%r5),%fr6 | |
39 | fldds,ma 0(%sr0,%r5),%fr6 | |
40 | fstws %fr6,0(%sr0,%r5) | |
41 | fstws,mb %fr6,0(%sr0,%r5) | |
42 | fstws,ma %fr6,0(%sr0,%r5) | |
43 | fstds %fr6,0(%sr0,%r5) | |
44 | fstds,mb %fr6,0(%sr0,%r5) | |
45 | fstds,ma %fr6,0(%sr0,%r5) |