* ld-elf/comm-data.exp: Run for *-*-gnu*.
[binutils.git] / ld / testsuite / ld-s390 / tlsbin.s
blob4da50e79cd87e88ee211f03251d91cb890006383
1 .section ".tbss", "awT", @nobits
2 .globl bg1, bg2, bg3, bg4, bg5, bg6, bg7, bg8
3 bg1: .space 4
4 bg2: .space 4
5 bg3: .space 4
6 bg4: .space 4
7 bg5: .space 4
8 bg6: .space 4
9 bg7: .space 4
10 bg8: .space 4
11 bl1: .space 4
12 bl2: .space 4
13 bl3: .space 4
14 bl4: .space 4
15 bl5: .space 4
16 bl6: .space 4
17 bl7: .space 4
18 bl8: .space 4
19 .text
20 .globl _start
21 .type _start,@function
22 _start:
23 /* Function prolog */
24 stm %r6,%r14,24(%r15)
25 bras %r13,.LTN1
26 /* Literal pool */
27 .LT1:
28 .LC0:
29 .long sG6@indntpoff
30 .LC1:
31 .long bg6@indntpoff
32 .LC2:
33 .long bl6@indntpoff
34 .LC3:
35 .long sh6@indntpoff
36 .LC4:
37 .long sg3@indntpoff
38 .LTN1:
39 /* Function prolog */
40 lr %r14,%r15
41 ahi %r15,-96
42 st %r14,0(%r14)
44 /* Extract TCB */
45 ear %r9,%a0
47 /* IE against global var */
48 l %r3,.LC0-.LT1(%r13)
49 l %r3,0(%r3,%r12):tls_load:sG6
50 la %r3,0(%r3,%r9)
52 /* IE -> LE against global var defined in exec */
53 l %r3,.LC1-.LT1(%r13)
54 l %r4,0(%r3,%r12):tls_load:bg6
55 la %r5,0(%r4,%r9)
57 /* IE -> LE against local var */
58 l %r3,.LC2-.LT1(%r13)
59 l %r4,0(%r3,%r12):tls_load:bl6
60 la %r5,0(%r4,%r9)
62 /* IE -> LE against hidden but not local var */
63 l %r3,.LC3-.LT1(%r13)
64 l %r4,0(%r3,%r12):tls_load:sh6
65 la %r5,0(%r4,%r9)
67 /* LE, global var defined in exec */
68 l %r4,.LC4-.LT1(%r13)
69 la %r5,0(%r4,%r9)
71 /* Function epilog */
72 lm %r6,%r14,120(%r15)
73 br %r14