]>
Commit | Line | Data |
---|---|---|
0eb8ace8 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 | .IMPORT $global$,DATA | |
8 | .IMPORT $$dyncall,MILLICODE | |
9 | ; gcc_compiled.: | |
10 | .SPACE $TEXT$ | |
11 | .SUBSPA $CODE$ | |
12 | ||
13 | .align 4 | |
14 | .EXPORT foobar,ENTRY,PRIV_LEV=3,ARGW0=FR,ARGW1=FU,ARGW2=FR,ARGW3=FU,RTNVAL=FR | |
15 | foobar | |
16 | .PROC | |
17 | .CALLINFO FRAME=0,NO_CALLS | |
18 | .ENTRY | |
19 | ldo -64(%r30),%r20 | |
20 | addil LR'x-$global$,%r27 | |
21 | fldds 8(0,%r20),%fr4 | |
22 | fldds 0(0,%r20),%fr22 | |
23 | ldo RR'x-$global$(%r1),%r19 | |
24 | fmpysub,sgl %fr5L,%fr7L,%fr5L,%fr22L,%fr4L | |
25 | bv 0(%r2) | |
26 | fstds %fr5,0(0,%r19) | |
27 | .EXIT | |
28 | .PROCEND | |
29 | .SPACE $PRIVATE$ | |
30 | .SUBSPA $BSS$ | |
31 | ||
32 | x .comm 8 | |
33 | y .comm 8 |