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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [config/] [sparc/] [lb1spl.asm] - Blame information for rev 282

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 282 jeremybenn
/* This is an assembly language implementation of mulsi3, divsi3, and modsi3
2
   for the sparclite processor.
3
 
4
   These routines are all from the SPARClite User's Guide, slightly edited
5
   to match the desired calling convention, and also to optimize them.  */
6
 
7
#ifdef L_udivsi3
8
.text
9
        .align 4
10
        .global .udiv
11
        .proc   04
12
.udiv:
13
        wr      %g0,%g0,%y      ! Not a delayed write for sparclite
14
        tst     %g0
15
        divscc  %o0,%o1,%g1
16
        divscc  %g1,%o1,%g1
17
        divscc  %g1,%o1,%g1
18
        divscc  %g1,%o1,%g1
19
        divscc  %g1,%o1,%g1
20
        divscc  %g1,%o1,%g1
21
        divscc  %g1,%o1,%g1
22
        divscc  %g1,%o1,%g1
23
        divscc  %g1,%o1,%g1
24
        divscc  %g1,%o1,%g1
25
        divscc  %g1,%o1,%g1
26
        divscc  %g1,%o1,%g1
27
        divscc  %g1,%o1,%g1
28
        divscc  %g1,%o1,%g1
29
        divscc  %g1,%o1,%g1
30
        divscc  %g1,%o1,%g1
31
        divscc  %g1,%o1,%g1
32
        divscc  %g1,%o1,%g1
33
        divscc  %g1,%o1,%g1
34
        divscc  %g1,%o1,%g1
35
        divscc  %g1,%o1,%g1
36
        divscc  %g1,%o1,%g1
37
        divscc  %g1,%o1,%g1
38
        divscc  %g1,%o1,%g1
39
        divscc  %g1,%o1,%g1
40
        divscc  %g1,%o1,%g1
41
        divscc  %g1,%o1,%g1
42
        divscc  %g1,%o1,%g1
43
        divscc  %g1,%o1,%g1
44
        divscc  %g1,%o1,%g1
45
        divscc  %g1,%o1,%g1
46
        retl
47
        divscc  %g1,%o1,%o0
48
#endif
49
 
50
#ifdef L_umodsi3
51
.text
52
        .align 4
53
        .global .urem
54
        .proc   04
55
.urem:
56
        wr      %g0,%g0,%y      ! Not a delayed write for sparclite
57
        tst     %g0
58
        divscc  %o0,%o1,%g1
59
        divscc  %g1,%o1,%g1
60
        divscc  %g1,%o1,%g1
61
        divscc  %g1,%o1,%g1
62
        divscc  %g1,%o1,%g1
63
        divscc  %g1,%o1,%g1
64
        divscc  %g1,%o1,%g1
65
        divscc  %g1,%o1,%g1
66
        divscc  %g1,%o1,%g1
67
        divscc  %g1,%o1,%g1
68
        divscc  %g1,%o1,%g1
69
        divscc  %g1,%o1,%g1
70
        divscc  %g1,%o1,%g1
71
        divscc  %g1,%o1,%g1
72
        divscc  %g1,%o1,%g1
73
        divscc  %g1,%o1,%g1
74
        divscc  %g1,%o1,%g1
75
        divscc  %g1,%o1,%g1
76
        divscc  %g1,%o1,%g1
77
        divscc  %g1,%o1,%g1
78
        divscc  %g1,%o1,%g1
79
        divscc  %g1,%o1,%g1
80
        divscc  %g1,%o1,%g1
81
        divscc  %g1,%o1,%g1
82
        divscc  %g1,%o1,%g1
83
        divscc  %g1,%o1,%g1
84
        divscc  %g1,%o1,%g1
85
        divscc  %g1,%o1,%g1
86
        divscc  %g1,%o1,%g1
87
        divscc  %g1,%o1,%g1
88
        divscc  %g1,%o1,%g1
89
        divscc  %g1,%o1,%g1
90
        bl 1f
91
        rd      %y,%o0
92
        retl
93
        nop
94
1:      retl
95
        add     %o0,%o1,%o0
96
#endif
97
 
98
#ifdef L_divsi3
99
.text
100
        .align 4
101
        .global .div
102
        .proc   04
103
! ??? This routine could be made faster if was optimized, and if it was
104
! rewritten to only calculate the quotient.
105
.div:
106
        wr      %g0,%g0,%y      ! Not a delayed write for sparclite
107
        mov     %o1,%o4
108
        tst     %o1
109
        bl,a    1f
110
        sub     %g0,%o4,%o4
111
1:      tst     %o0
112
        bl,a    2f
113
        mov     -1,%y
114
2:      divscc  %o0,%o4,%g1
115
        divscc  %g1,%o4,%g1
116
        divscc  %g1,%o4,%g1
117
        divscc  %g1,%o4,%g1
118
        divscc  %g1,%o4,%g1
119
        divscc  %g1,%o4,%g1
120
        divscc  %g1,%o4,%g1
121
        divscc  %g1,%o4,%g1
122
        divscc  %g1,%o4,%g1
123
        divscc  %g1,%o4,%g1
124
        divscc  %g1,%o4,%g1
125
        divscc  %g1,%o4,%g1
126
        divscc  %g1,%o4,%g1
127
        divscc  %g1,%o4,%g1
128
        divscc  %g1,%o4,%g1
129
        divscc  %g1,%o4,%g1
130
        divscc  %g1,%o4,%g1
131
        divscc  %g1,%o4,%g1
132
        divscc  %g1,%o4,%g1
133
        divscc  %g1,%o4,%g1
134
        divscc  %g1,%o4,%g1
135
        divscc  %g1,%o4,%g1
136
        divscc  %g1,%o4,%g1
137
        divscc  %g1,%o4,%g1
138
        divscc  %g1,%o4,%g1
139
        divscc  %g1,%o4,%g1
140
        divscc  %g1,%o4,%g1
141
        divscc  %g1,%o4,%g1
142
        divscc  %g1,%o4,%g1
143
        divscc  %g1,%o4,%g1
144
        divscc  %g1,%o4,%g1
145
        divscc  %g1,%o4,%g1
146
        be      6f
147
        mov     %y,%o3
148
        bg      4f
149
        addcc   %o3,%o4,%g0
150
        be,a    6f
151
        mov     %g0,%o3
152
        tst     %o0
153
        bl      5f
154
        tst     %g1
155
        ba      5f
156
        add     %o3,%o4,%o3
157
4:      subcc   %o3,%o4,%g0
158
        be,a    6f
159
        mov     %g0,%o3
160
        tst     %o0
161
        bge     5f
162
        tst     %g1
163
        sub     %o3,%o4,%o3
164
5:      bl,a    6f
165
        add     %g1,1,%g1
166
6:      tst     %o1
167
        bl,a    7f
168
        sub     %g0,%g1,%g1
169
7:      retl
170
        mov     %g1,%o0         ! Quotient is in %g1.
171
#endif
172
 
173
#ifdef L_modsi3
174
.text
175
        .align 4
176
        .global .rem
177
        .proc   04
178
! ??? This routine could be made faster if was optimized, and if it was
179
! rewritten to only calculate the remainder.
180
.rem:
181
        wr      %g0,%g0,%y      ! Not a delayed write for sparclite
182
        mov     %o1,%o4
183
        tst     %o1
184
        bl,a    1f
185
        sub     %g0,%o4,%o4
186
1:      tst     %o0
187
        bl,a    2f
188
        mov     -1,%y
189
2:      divscc  %o0,%o4,%g1
190
        divscc  %g1,%o4,%g1
191
        divscc  %g1,%o4,%g1
192
        divscc  %g1,%o4,%g1
193
        divscc  %g1,%o4,%g1
194
        divscc  %g1,%o4,%g1
195
        divscc  %g1,%o4,%g1
196
        divscc  %g1,%o4,%g1
197
        divscc  %g1,%o4,%g1
198
        divscc  %g1,%o4,%g1
199
        divscc  %g1,%o4,%g1
200
        divscc  %g1,%o4,%g1
201
        divscc  %g1,%o4,%g1
202
        divscc  %g1,%o4,%g1
203
        divscc  %g1,%o4,%g1
204
        divscc  %g1,%o4,%g1
205
        divscc  %g1,%o4,%g1
206
        divscc  %g1,%o4,%g1
207
        divscc  %g1,%o4,%g1
208
        divscc  %g1,%o4,%g1
209
        divscc  %g1,%o4,%g1
210
        divscc  %g1,%o4,%g1
211
        divscc  %g1,%o4,%g1
212
        divscc  %g1,%o4,%g1
213
        divscc  %g1,%o4,%g1
214
        divscc  %g1,%o4,%g1
215
        divscc  %g1,%o4,%g1
216
        divscc  %g1,%o4,%g1
217
        divscc  %g1,%o4,%g1
218
        divscc  %g1,%o4,%g1
219
        divscc  %g1,%o4,%g1
220
        divscc  %g1,%o4,%g1
221
        be      6f
222
        mov     %y,%o3
223
        bg      4f
224
        addcc   %o3,%o4,%g0
225
        be,a    6f
226
        mov     %g0,%o3
227
        tst     %o0
228
        bl      5f
229
        tst     %g1
230
        ba      5f
231
        add     %o3,%o4,%o3
232
4:      subcc   %o3,%o4,%g0
233
        be,a    6f
234
        mov     %g0,%o3
235
        tst     %o0
236
        bge     5f
237
        tst     %g1
238
        sub     %o3,%o4,%o3
239
5:      bl,a    6f
240
        add     %g1,1,%g1
241
6:      tst     %o1
242
        bl,a    7f
243
        sub     %g0,%g1,%g1
244
7:      retl
245
        mov     %o3,%o0         ! Remainder is in %o3.
246
#endif

powered by: WebSVN 2.1.0

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