mul.pl revision 7c478bd95313f5f23a4c958a745db2134aa03244
# x86 assember
sub bn_mul_words
{
local($name)=@_;
&comment("");
$Low="eax";
$High="edx";
$a="ebx";
$w="ecx";
$r="edi";
$c="esi";
$num="ebp";
&xor($c,$c); # clear carry
for ($i=0; $i<32; $i+=4)
{
&comment("Round $i");
&mul($w); # *a * w
# XXX
}
&comment("");
&add($a,32);
&add($r,32);
for ($i=0; $i<7; $i++)
{
&comment("Tail Round $i");
&mul($w); # *a * w
# XXX
}
&mov("eax",$c);
&function_end($name);
}
1;