bn/asm/pa-risc2W.s

157     FLDD    0(a_ptr),t_float_0       ; load up 64-bit value (fr8L) ht(L)/lt(R)
158     FLDD    8(a_ptr),t_float_1       ; load up 64-bit value (fr8L) ht(L)/lt(R)
187     LDD     -24(%sp),ht_0            ; ht[0]
188     LDD     -56(%sp),ht_1            ; ht[1]
195     ADD,L   ht_0,top_overflow,ht_0   ; ht[0] += (1<<32)
198     ADD,L   ht_1,top_overflow,ht_1   ; ht[1] += (1<<32)
204     ADD,L   ht_0,m_0,ht_0            ; ht[0]+= (m[0]>>32)
205     ADD,L   ht_1,m_1,ht_1            ; ht[1]+= (m[1]>>32)
208 	ADD,DC  ht_0,%r0,ht_0            ; ht[0]++
210     ADD,DC  ht_1,%r0,ht_1            ; ht[1]++
213 	ADD,DC  ht_0,%r0,ht_0            ; ht[0]++
215     ADD,DC  ht_0,%r0,ht_0            ; ht[0]++
219     ADD,DC  ht_1,%r0,ht_1            ; ht[1]++
223     ADD,DC  ht_1,%r0,%ret0           ; ht[1]++
236     FLDD    0(a_ptr),t_float_0        ; load up 64-bit value (fr8L) ht(L)/lt(R)
239     XMPYU   fht_0,fw_l,fm1            ; m1 = ht*fw_l
243     XMPYU   fht_0,fw_h,ht_temp        ; ht_temp = ht*fw_h
244     FSTD    ht_temp,-24(%sp)          ; -24(sp) = ht
255     ADD,L   ht_0,top_overflow,ht_0    ; ht += (1<<32)
260     ADD,L   ht_0,m_0,ht_0             ; ht+= (m>>32)
262     ADD,DC  ht_0,%r0,ht_0             ; ht++
264     ADD,DC  ht_0,%r0,ht_0             ; ht++
266     ADD,DC  ht_0,%r0,%ret0            ; ht++
324     FLDD    0(a_ptr),t_float_0        ; load up 64-bit value (fr8L) ht(L)/lt(R)
325     FLDD    8(a_ptr),t_float_1        ; load up 64-bit value (fr8L) ht(L)/lt(R)
327     XMPYU   fht_1,fw_l,fm1_1          ; m1[1] = ht*fw_l
337     XMPYU   fht_1,fw_h,ht_temp_1      ; ht_temp = ht*fw_h
339     FSTD    ht_temp,-24(%sp)          ; -24(sp) = ht
340     FSTD    ht_temp_1,-56(%sp)        ; -56(sp) = ht
360     ADD,L   ht_0,top_overflow,ht_0    ; ht += (1<<32)
362     ADD,L   ht_1,top_overflow,ht_1    ; ht += (1<<32)
369     ADD,L   ht_0,m_0,ht_0             ; ht+= (m>>32)
370     ADD,L   ht_1,m_1,ht_1             ; ht+= (m>>32)
372 	ADD,DC  ht_0,%r0,ht_0             ; ht++
375     ADD,DC  ht_1,%r0,ht_1             ; ht++
377 	ADD,DC  ht_0,%r0,ht_0             ; ht++
380     ADD,DC  ht_1,%r0,ht_1             ; ht++
384 	COPY    ht_1,%ret0                ; carry = ht
396     FLDD    0(a_ptr),t_float_0        ; load up 64-bit value (fr8L) ht(L)/lt(R)
398     XMPYU   fht_0,fw_l,fm1            ; m1 = ht*fw_l
402     XMPYU   fht_0,fw_h,ht_temp        ; ht_temp = ht*fw_h
403     FSTD    ht_temp,-24(%sp)          ; -24(sp) = ht
414     ADD,L   ht_0,top_overflow,ht_0    ; ht += (1<<32)
419     ADD,L   ht_0,m_0,ht_0             ; ht+= (m>>32)
421     ADD,DC  ht_0,%r0,ht_0             ; ht++
424     ADD,DC  ht_0,%r0,ht_0             ; ht++
486     XMPYU   fht_0,fht_0,ht_temp       ; ht[0]
487     XMPYU   fht_1,fht_1,ht_temp_1     ; ht[1]
489     FSTD    ht_temp,-8(%sp)           ; store ht[0]
490     FSTD    ht_temp_1,-40(%sp)        ; store ht[1]
506     ADD,L   ht_0,tmp_0,ht_0           ; ht[0] += tmp_0
507     ADD,L   ht_1,tmp_1,ht_1           ; ht[1] += tmp_1
510     ADD,DC  ht_0,%r0,ht_0             ; ht[0]++
512     STD     ht_0,8(r_ptr)             ; rp[1] = ht[1]
515     ADD,DC  ht_1,%r0,ht_1             ; ht[1]++
517     STD     ht_1,24(r_ptr)            ; rp[3] = ht[1]
530     FLDD    0(a_ptr),t_float_0        ; load up 64-bit value (fr8L) ht(L)/lt(R)
538     XMPYU   fht_0,fht_0,ht_temp       ; ht
539     FSTD    ht_temp,-8(%sp)           ; store ht
546     LDD     -8(%sp),ht_0              ; ht
549     ADD,L   ht_0,tmp_0,ht_0           ; ht += tmp_0
550     ADD,DC  ht_0,%r0,ht_0             ; ht++
553     STD     ht_0,8(r_ptr)             ; rp[1] = ht
1002 ht           .reg %r6
1014     XMPYU   A0L,A0L,ftemp3       ; ht
1015     FSTD    ftemp3,-8(%sp)       ; store ht
1022     LDD     -8(%sp),ht           ; ht
1025     ADD,L   ht,temp1,ht          ; ht += temp1
1026     ADD,DC  ht,%r0,ht            ; ht++
1029     ADD,DC  ht,%r0,ht            ; ht++
1031     ADD     C2,ht,C2             ; c2=c2+ht
1036     XMPYU   A0L,A1R,ftemp1          ; m1 = bl*ht
1042     XMPYU   A0L,A1L,ftemp4          ; ht = bh*ht
1050     LDD     -24(%sp),ht             ; r24 = ht
1053     ADD,L   ht,high_one,ht          ; ht+=high_one
1057     ADD,L   ht,temp1,ht             ; ht+= m>>32
1059     ADD,DC  ht,%r0,ht               ; ht++
1061     ADD     ht,ht,ht                ; ht=ht+ht;
1065     ADD,DC  ht,%r0,ht               ; add in carry (ht++)
1068     ADD,DC,*NUV ht,%r0,ht           ; add in carry (ht++)
1071     ADD     C2,ht,C2                ; c2 = c2 + ht
1296     XMPYU   A0L,B0R,ftemp1        ; m1 = bl*ht
1302     XMPYU   A0L,B0L,ftemp4        ; ht = bh*ht
1310     LDD     -24(%sp),ht           ; r24 = ht
1313     ADD,L   ht,high_one,ht        ; ht+=high_one
1317     ADD,L   ht,temp1,ht           ; ht+= m>>32
1319     ADD,DC  ht,%r0,ht             ; ht++
1322     ADD,DC  ht,%r0,ht             ; bump c3 if overflow,nullify otherwise
1324     ADD     C2,ht,C2              ; c2 = c2 + ht