bn/asm/parisc-mont.pl

126 $fni="%fr9";	$fnm0="%fr10";	$fnm1="%fr11";
182 	fldds		0($np),${fni}		; np[0,1]
203 	xmpyu		${fni}L,${fm0}R,${fnm0}	; np[0]*m
204 	xmpyu		${fni}R,${fm0}R,${fnm1}	; np[1]*m
210 	 flddx		$idx($np),${fni}	; np[2,3]
221 	xmpyu		${fni}L,${fm0}R,${fnm0}	; np[j]*m
236 	xmpyu		${fni}R,${fm0}R,${fnm1}	; np[j+1]*m
246 	flddx		$idx($np),${fni}	; np[j,j+1]
251 	xmpyu		${fni}L,${fm0}R,${fnm0}	; np[j]*m
267 	xmpyu		${fni}R,${fm0}R,${fnm1}	; np[j]*m
303 	 flddx		$idx($np),${fni}	; np[0,1]
331 	xmpyu		${fni}L,${fm0}R,${fnm0}	; np[0]*m
332 	xmpyu		${fni}R,${fm0}R,${fnm1}	; np[1]*m
336 	 flddx		$idx($np),${fni}	; np[2]
343 	xmpyu		${fni}L,${fm0}R,${fnm0}	; np[j]*m
358 	xmpyu		${fni}R,${fm0}R,${fnm1}	; np[j+1]*m
368 	flddx		$idx($np),${fni}	; np[j,j+1]
375 	xmpyu		${fni}L,${fm0}R,${fnm0}	; np[j]*m
393 	xmpyu		${fni}R,${fm0}R,${fnm1}	; np[j]*m
438 	 flddx		$idx($np),${fni}	; np[0]
555 	xmpyu		${fni}L,${fm0}R,${fnm0}	; np[j]*m
574 	xmpyu		${fni}R,${fm0}R,${fnm1}	; np[j+1]*m
575 	flddx		$idx($np),${fni}	; np[j,j+1]
591 	xmpyu		${fni}L,${fm0}R,${fnm0}	; np[j]*m
610 	xmpyu		${fni}R,${fm0}R,${fnm1}	; np[j]*m
642 	 flddx		$idx($np),${fni}	; np[0,1]
670 	xmpyu		${fni}L,${fm0}R,${fnm0}	; np[0]*m
671 	xmpyu		${fni}R,${fm0}R,${fnm1}	; np[1]*m
675 	 flddx		$idx($np),${fni}	; np[2,3]
684 	xmpyu		${fni}L,${fm0}R,${fnm0}	; np[j]*m
700 	xmpyu		${fni}R,${fm0}R,${fnm1}	; np[j+1]*m
701 	flddx		$idx($np),${fni}	; np[j,j+1]
720 	xmpyu		${fni}L,${fm0}R,${fnm0}	; np[j]*m
741 	xmpyu		${fni}R,${fm0}R,${fnm1}	; np[j]*m
782 	 flddx		$idx($np),${fni}	; np[0]
986 	s/(xmpyu\s+)($fai|$fni)([LR])/$1.$2.($3 eq "L"?"R":"L")/e if ($BN_SZ==8);