home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power Programming
/
powerprogramming1994.iso
/
progtool
/
borland
/
jnfb88.arc
/
CFLOAT.ARC
/
DOT3.C
< prev
next >
Wrap
Text File
|
1987-06-23
|
238b
|
17 lines
/* Listing 6: */
double dot(int n, double *x, double *y)
{
asm fldz
_SI = x;
_DI = y;
while (n--)
{
asm fld qword ptr [si]
asm add si,8
asm fmul qword ptr [di]
asm add di,8
asm fadd
}
}