sgs/rtld.4.x/umultiply.s

38  * pass the multiplier into %o0, and the multiplicand into %o1
40  * and the most significant in %o1
78 	mulscc	%o4, %o1, %o4		! first iteration of 9
82 	mulscc	%o4, %o1, %o4		! first iteration of 13
86 	mulscc	%o4, %o1, %o4		! first iteration of 17
93 	mulscc	%o4, %o1, %o4		! first iteration of 33
94 	mulscc	%o4, %o1, %o4
95 	mulscc	%o4, %o1, %o4
96 	mulscc	%o4, %o1, %o4
97 	mulscc	%o4, %o1, %o4
98 	mulscc	%o4, %o1, %o4
99 	mulscc	%o4, %o1, %o4
100 	mulscc	%o4, %o1, %o4
101 	mulscc	%o4, %o1, %o4
102 	mulscc	%o4, %o1, %o4
103 	mulscc	%o4, %o1, %o4
104 	mulscc	%o4, %o1, %o4
105 	mulscc	%o4, %o1, %o4
106 	mulscc	%o4, %o1, %o4
107 	mulscc	%o4, %o1, %o4
108 	mulscc	%o4, %o1, %o4
109 	mulscc	%o4, %o1, %o4
110 	mulscc	%o4, %o1, %o4
111 	mulscc	%o4, %o1, %o4
112 	mulscc	%o4, %o1, %o4
113 	mulscc	%o4, %o1, %o4
114 	mulscc	%o4, %o1, %o4
115 	mulscc	%o4, %o1, %o4
116 	mulscc	%o4, %o1, %o4
117 	mulscc	%o4, %o1, %o4
118 	mulscc	%o4, %o1, %o4
119 	mulscc	%o4, %o1, %o4
120 	mulscc	%o4, %o1, %o4
121 	mulscc	%o4, %o1, %o4
122 	mulscc	%o4, %o1, %o4
123 	mulscc	%o4, %o1, %o4
124 	mulscc	%o4, %o1, %o4		! 32nd iteration
154 	tst	%o1
169 	!		mov	%o4, %o1
174 	addcc	%o4, %g0, %o1		! return high-order bits and set Z if
180 	mulscc	%o4, %o1, %o4		! first iteration of 5
181 	mulscc	%o4, %o1, %o4
182 	mulscc	%o4, %o1, %o4
183 	mulscc	%o4, %o1, %o4		! 4th iteration
191 	tst	%o1
193 	sra	%o4, 28, %o1		! right shift high bits by 28 bits
195 	add	%o1, %o0, %o1
213 	tst	%o1			! set Z if high order bits are 0
218 	mulscc	%o4, %o1, %o4		! second iteration of 9
219 	mulscc	%o4, %o1, %o4
220 	mulscc	%o4, %o1, %o4
221 	mulscc	%o4, %o1, %o4
222 	mulscc	%o4, %o1, %o4
223 	mulscc	%o4, %o1, %o4
224 	mulscc	%o4, %o1, %o4		! 8th iteration
232 	tst	%o1
234 	sra	%o4, 24, %o1		! right shift high bits by 24 bits
236 	add	%o1, %o0, %o1
254 	tst	%o1			! set Z if high order bits are 0
259 	mulscc	%o4, %o1, %o4		! second iteration of 13
260 	mulscc	%o4, %o1, %o4
261 	mulscc	%o4, %o1, %o4
262 	mulscc	%o4, %o1, %o4
263 	mulscc	%o4, %o1, %o4
264 	mulscc	%o4, %o1, %o4
265 	mulscc	%o4, %o1, %o4
266 	mulscc	%o4, %o1, %o4
267 	mulscc	%o4, %o1, %o4
268 	mulscc	%o4, %o1, %o4
269 	mulscc	%o4, %o1, %o4		! 12th iteration
277 	tst	%o1
279 	sra	%o4, 20, %o1		! right shift high bits by 20 bits
281 	add	%o1, %o0, %o1
299 	tst	%o1			! set Z if high order bits are 0
304 	mulscc	%o4, %o1, %o4		! second iteration of 17
305 	mulscc	%o4, %o1, %o4
306 	mulscc	%o4, %o1, %o4
307 	mulscc	%o4, %o1, %o4
308 	mulscc	%o4, %o1, %o4
309 	mulscc	%o4, %o1, %o4
310 	mulscc	%o4, %o1, %o4
311 	mulscc	%o4, %o1, %o4
312 	mulscc	%o4, %o1, %o4
313 	mulscc	%o4, %o1, %o4
314 	mulscc	%o4, %o1, %o4
315 	mulscc	%o4, %o1, %o4
316 	mulscc	%o4, %o1, %o4
317 	mulscc	%o4, %o1, %o4
318 	mulscc	%o4, %o1, %o4		! 16th iteration
326 	tst	%o1
328 	sra	%o4, 16, %o1		! right shift high bits by 16 bits
330 	add	%o1, %o0, %o1
348 	tst	%o1			! set Z if high order bits are 0