OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [binutils-2.18.50/] [gas/] [testsuite/] [gas/] [hppa/] [reloc/] [applybug.s] - Blame information for rev 856

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

Line No. Rev Author Line
1 38 julius
        .IMPORT $global$,DATA
2
        .IMPORT $$dyncall,MILLICODE
3
; gcc_compiled.:
4
        .data
5
 
6
        .align 4
7
tab___2:
8
        .word L$0002
9
        .word L$0003
10
        .word L$0004
11
        .code
12
 
13
        .align 4
14
        .EXPORT execute,CODE
15
        .EXPORT execute,ENTRY,PRIV_LEV=3,ARGW0=GR,RTNVAL=GR
16
execute:
17
        .PROC
18
        .CALLINFO FRAME=0,NO_CALLS
19
        .ENTRY
20
        addil L'buf-$global$,%r27
21
        ldo R'buf-$global$(%r1),%r20
22
        ldil L'L$0002,%r19
23
        movb,<> %r26,%r26,L$0002
24
        ldo R'L$0002(%r19),%r22
25
        copy %r0,%r21
26
        addil L'tab___2-$global$,%r27
27
        ldo R'tab___2-$global$(%r1),%r23
28
        addil L'optab-$global$,%r27
29
        ldo R'optab-$global$(%r1),%r20
30
L$0009:
31
        sh2add %r21,%r23,%r19
32
        ldh 2(%r19),%r19
33
        ldo 1(%r21),%r21
34
        sub %r19,%r22,%r19
35
        comib,>= 2,%r21,L$0009
36
        sths,ma %r19,2(%r20)
37
        bv,n %r0(%r2)
38
L$0002:
39
        ldi 120,%r19
40
        stbs,ma %r19,1(%r20)
41
        ldhs,ma 2(%r26),%r19
42
        add %r22,%r19,%r19
43
        bv,n %r0(%r19)
44
L$0003:
45
        ldi 121,%r19
46
        stbs,ma %r19,1(%r20)
47
        ldhs,ma 2(%r26),%r19
48
        add %r22,%r19,%r19
49
        bv,n %r0(%r19)
50
L$0004:
51
        ldi 122,%r19
52
        stb %r19,0(%r20)
53
        bv %r0(%r2)
54
        stbs,mb %r0,1(%r20)
55
        .EXIT
56
        .PROCEND
57
        .IMPORT __main,CODE
58
        .IMPORT strcmp,CODE
59
 
60
        .align 4
61
L$C0000:
62
        .STRING "xyxyz\x00"
63
        .IMPORT abort,CODE
64
        .IMPORT exit,CODE
65
        .code
66
 
67
        .align 4
68
        .EXPORT main,CODE
69
        .EXPORT main,ENTRY,PRIV_LEV=3,RTNVAL=GR
70
main:
71
        .PROC
72
        .CALLINFO FRAME=128,CALLS,SAVE_RP
73
        .ENTRY
74
        stw %r2,-20(%r30)
75
        .CALL
76
        bl __main,%r2
77
        ldo 128(%r30),%r30
78
        .CALL ARGW0=GR
79
        bl execute,%r2
80
        copy %r0,%r26
81
        addil L'optab-$global$,%r27
82
        copy %r1,%r19
83
        ldo R'optab-$global$(%r19),%r21
84
        ldh 2(%r21),%r20
85
        ldh R'optab-$global$(%r19),%r19
86
        addil L'p-$global$,%r27
87
        copy %r1,%r22
88
        sth %r20,R'p-$global$(%r22)
89
        ldo R'p-$global$(%r22),%r26
90
        sth %r20,4(%r26)
91
        sth %r19,2(%r26)
92
        ldh 4(%r21),%r19
93
        .CALL ARGW0=GR
94
        bl execute,%r2
95
        sth %r19,6(%r26)
96
        addil L'buf-$global$,%r27
97
        copy %r1,%r19
98
        ldo R'buf-$global$(%r19),%r26
99
        ldil L'L$C0000,%r25
100
        .CALL ARGW0=GR,ARGW1=GR
101
        bl strcmp,%r2
102
        ldo R'L$C0000(%r25),%r25
103
        comib,=,n 0,%r28,L$0011
104
        .CALL
105
        bl abort,%r2
106
        nop
107
L$0011:
108
        .CALL ARGW0=GR
109
        bl exit,%r2
110
        copy %r0,%r26
111
        nop
112
        .EXIT
113
        .PROCEND
114
        .data
115
 
116
optab:  .comm 10
117
buf:    .comm 10
118
p:      .comm 10

powered by: WebSVN 2.1.0

© copyright 1999-2025 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.