]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blob - gas/testsuite/gas/hppa/reloc/reduce.s
19990502 sourceware import
[thirdparty/binutils-gdb.git] / gas / testsuite / gas / hppa / reloc / reduce.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 .IMPORT $global$,DATA
8 .IMPORT $$dyncall,MILLICODE
9 ; gcc_compiled.:
10 .SPACE $TEXT$
11 .SUBSPA $CODE$
12
13 .align 4
14 .PARAM foo,RTNVAL=GR
15 foo:
16 .PROC
17 .CALLINFO FRAME=0,NO_CALLS
18 .ENTRY
19 bv,n %r0(%r2)
20 .EXIT
21 .PROCEND
22 .SPACE $TEXT$
23 .SUBSPA $CODE$
24
25 .align 4
26 LC$0000:
27 .word P%foo
28 .SPACE $TEXT$
29 .SUBSPA $CODE$
30
31 .align 4
32 .EXPORT bar,CODE
33 .EXPORT bar,ENTRY,PRIV_LEV=3,RTNVAL=GR
34 bar:
35 .PROC
36 .CALLINFO FRAME=128,CALLS,SAVE_RP
37 .ENTRY
38 ldil L'LC$0000,%r19
39 ldw R'LC$0000(%r19),%r26
40 stw %r2,-20(%r30)
41 .CALL ARGW0=GR
42 bl foo,%r2
43 ldo 128(%r30),%r30
44 ldw -148(%r30),%r2
45 bv %r0(%r2)
46 ldo -128(%r30),%r30
47 .EXIT
48 .PROCEND