URL https://opencores.org/ocsvn/open8_urisc/open8_urisc/trunk

Subversion Repositories open8_urisc

[/] [open8_urisc/] [trunk/] [gnu/] [binutils/] [ld/] [testsuite/] [ld-alpha/] [tlsbinpic.s] - Blame information for rev 118

Go to most recent revision | Details | Compare with Previous | View Log


        .section ".tdata", "awT", @progbits
        .globl sg1, sg2, sg3, sg4, sg5, sg6, sg7, sg8
        .globl sh1, sh2, sh3, sh4, sh5, sh6, sh7, sh8
        .hidden sh1, sh2, sh3, sh4, sh5, sh6, sh7, sh8
sg1:    .long 17
sg2:    .long 18
sg3:    .long 19
sg4:    .long 20
sg5:    .long 21
sg6:    .long 22
sg7:    .long 23
sg8:    .long 24
sl1:    .long 65
sl2:    .long 66
sl3:    .long 67
sl4:    .long 68
sl5:    .long 69
sl6:    .long 70
sl7:    .long 71
sl8:    .long 72
sh1:    .long 257
sh2:    .long 258
sh3:    .long 259
sh4:    .long 260
sh5:    .long 261
sh6:    .long 262
sh7:    .long 263
sh8:    .long 264
 
        .text
        .globl  fn2
        .ent    fn2
fn2:
        .frame  $sp, 16, $26, 0
        ldgp    $gp, 0($27)
        subq    $sp, 16, $sp
        stq     $26, 0($sp)
        .prologue 1
 
        /* GD */
        lda     $16, sG1($gp)                   !tlsgd!1
        ldq     $27, __tls_get_addr($gp)        !literal!1
        jsr     $26, ($27), __tls_get_addr      !lituse_tlsgd!1
        ldgp    $gp, 0($26)
 
        /* GD against local symbol */
        lda     $16, sl2($gp)                   !tlsgd!2
        ldq     $27, __tls_get_addr($gp)        !literal!2
        jsr     $26, ($27), __tls_get_addr      !lituse_tlsgd!2
        ldgp    $gp, 0($26)
 
        /* LD */
        lda     $16, sl1($gp)                   !tlsldm!3
        ldq     $27, __tls_get_addr($gp)        !literal!3
        jsr     $26, ($27), __tls_get_addr      !lituse_tlsldm!3
        ldgp    $gp, 0($26)
        lda     $1, sl1+1($0)                    !dtprel
 
        /* LD with 4 variables */
        lda     $16, sh1($gp)                   !tlsldm!4
        ldq     $27, __tls_get_addr($gp)        !literal!4
        jsr     $26, ($27), __tls_get_addr      !lituse_tlsldm!4
        ldgp    $gp, 0($26)
        lda     $1, sh1($0)                      !dtprel
        lda     $1, sh2+2($0)                    !dtprel
        ldah    $1, sh3+3($0)                    !dtprelhi
        lda     $1, sh3+3($1)                   !dtprello
        ldq     $1, sh4+10($gp)                 !gotdtprel
        addq    $1, $0, $1
 
        ldq     $26, 0($sp)
        addq    $sp, 16, $sp
        ret
        .end    fn2

Line No.	Rev	Author	Line
1	30	khays	`.section ".tdata", "awT", @progbits`
2			`.globl sg1, sg2, sg3, sg4, sg5, sg6, sg7, sg8`
3			`.globl sh1, sh2, sh3, sh4, sh5, sh6, sh7, sh8`
4			`.hidden sh1, sh2, sh3, sh4, sh5, sh6, sh7, sh8`
5			`sg1: .long 17`
6			`sg2: .long 18`
7			`sg3: .long 19`
8			`sg4: .long 20`
9			`sg5: .long 21`
10			`sg6: .long 22`
11			`sg7: .long 23`
12			`sg8: .long 24`
13			`sl1: .long 65`
14			`sl2: .long 66`
15			`sl3: .long 67`
16			`sl4: .long 68`
17			`sl5: .long 69`
18			`sl6: .long 70`
19			`sl7: .long 71`
20			`sl8: .long 72`
21			`sh1: .long 257`
22			`sh2: .long 258`
23			`sh3: .long 259`
24			`sh4: .long 260`
25			`sh5: .long 261`
26			`sh6: .long 262`
27			`sh7: .long 263`
28			`sh8: .long 264`
29
30			`.text`
31			`.globl fn2`
32			`.ent fn2`
33			`fn2:`
34			`.frame $sp, 16, $26, 0`
35			`ldgp $gp, 0($27)`
36			`subq $sp, 16, $sp`
37			`stq $26, 0($sp)`
38			`.prologue 1`
39
40			`/* GD */`
41			`lda $16, sG1($gp) !tlsgd!1`
42			`ldq $27, __tls_get_addr($gp) !literal!1`
43			`jsr $26, ($27), __tls_get_addr !lituse_tlsgd!1`
44			`ldgp $gp, 0($26)`
45
46			`/* GD against local symbol */`
47			`lda $16, sl2($gp) !tlsgd!2`
48			`ldq $27, __tls_get_addr($gp) !literal!2`
49			`jsr $26, ($27), __tls_get_addr !lituse_tlsgd!2`
50			`ldgp $gp, 0($26)`
51
52			`/* LD */`
53			`lda $16, sl1($gp) !tlsldm!3`
54			`ldq $27, __tls_get_addr($gp) !literal!3`
55			`jsr $26, ($27), __tls_get_addr !lituse_tlsldm!3`
56			`ldgp $gp, 0($26)`
57			`lda $1, sl1+1($0) !dtprel`
58
59			`/* LD with 4 variables */`
60			`lda $16, sh1($gp) !tlsldm!4`
61			`ldq $27, __tls_get_addr($gp) !literal!4`
62			`jsr $26, ($27), __tls_get_addr !lituse_tlsldm!4`
63			`ldgp $gp, 0($26)`
64			`lda $1, sh1($0) !dtprel`
65			`lda $1, sh2+2($0) !dtprel`
66			`ldah $1, sh3+3($0) !dtprelhi`
67			`lda $1, sh3+3($1) !dtprello`
68			`ldq $1, sh4+10($gp) !gotdtprel`
69			`addq $1, $0, $1`
70
71			`ldq $26, 0($sp)`
72			`addq $sp, 16, $sp`
73			`ret`
74			`.end fn2`

Browse

Tools

Subversion Repositories open8_urisc

[/] [open8_urisc/] [trunk/] [gnu/] [binutils/] [ld/] [testsuite/] [ld-alpha/] [tlsbinpic.s] - Blame information for rev 118