Support tcl procedure calls in run_dump_test xfail
[external/binutils.git] / ld / testsuite / ld-elf / mbind1.s
1         .text
2         .global start   /* Used by SH targets.  */
3 start:
4         .global _start
5 _start:
6         .global __start
7 __start:
8         .global main    /* Used by HPPA targets.  */
9 main:
10         .dc.a 0
11         .section .mbind.data,"adw",%progbits
12         .byte 1
13
14         .section .mbind.data,"adw",%progbits,0x3
15         .byte 2
16
17         .section .mbind.text,"adx",%progbits
18         .byte 3
19
20         .section .mbind.text,"adx",%progbits,0x3
21         .byte 4
22
23         .section .mbind.bss,"adw",%nobits
24         .zero 5
25
26         .section .mbind.bss,"adw",%nobits,0x3
27         .zero 6
28
29         .section .mbind.rodata,"adG",%progbits,.foo_group,comdat,0x2
30         .byte 7
31
32         .section .mbind.data,"adGw",%progbits,.foo_group,comdat
33         .byte 8
34
35         .section .mbind.data,"adGw",%progbits,.foo_group,comdat,0x3
36         .byte 9
37
38         # Check that .pushsection works as well.
39         .pushsection .mbind.text,"adGx",%progbits,.foo_group,comdat,0x3
40         .byte 10
41
42         .popsection
43         .byte 11