sqr.pl revision 7c478bd95313f5f23a4c958a745db2134aa03244
# x86 assember
{
$r="esi";
$a="edi";
&
and($
num,
0xfffffff8);
# num / 8
for ($i=0; $i<32; $i+=4)
{
&
mov(
"eax",&
DWP($i,$a,
"",
0));
# *a # XXX
&
mov(&
DWP($i*
2,$r,
"",
0),
"eax");
# &
mov(&
DWP($i*
2+
4,$r,
"",
0),
"edx");
# }
for ($i=0; $i<7; $i++)
{
&
mov(
"eax",&
DWP($i*
4,$a,
"",
0));
# *a # XXX
&
mov(&
DWP($i*
8,$r,
"",
0),
"eax");
# &
mov(&
DWP($i*
8+
4,$r,
"",
0),
"edx");
&
jz(&
label(
"sw_end"))
if ($i !=
7-
1);
}
}
1;