d/freebsd-nq
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Pull in GNU2 fix for this from FreeBSD, allows ldexp.c to compile with

Browse Source 
gcc2.x
This commit is contained in:
Rodney W. Grimes 1994-05-27 11:00:56 +00:00
parent 1cb16b68b3
commit 8e101982f3
2 changed files with 20 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lib/libc/amd64/gen/ldexp.c
View File

@ -55,8 +55,18 @@ ldexp (double value, int exp)
{
double temp, texp, temp2;
texp = exp;
#ifdef __GNUC__
#if __GNUC__ >= 2
asm ("fscale "
: "=u" (temp2), "=t" (temp)
: "0" (texp), "1" (value));
#else
asm ("fscale ; fxch %%st(1) ; fstp%L1 %1 "
: "=f" (temp), "=0" (temp2)
: "0" (texp), "f" (value));
#endif
#else
error unknown asm
#endif
return (temp);
}

10
lib/libc/i386/gen/ldexp.c
View File

@ -55,8 +55,18 @@ ldexp (double value, int exp)
{
double temp, texp, temp2;
texp = exp;
#ifdef __GNUC__
#if __GNUC__ >= 2
asm ("fscale "
: "=u" (temp2), "=t" (temp)
: "0" (texp), "1" (value));
#else
asm ("fscale ; fxch %%st(1) ; fstp%L1 %1 "
: "=f" (temp), "=0" (temp2)
: "0" (texp), "f" (value));
#endif
#else
error unknown asm
#endif
return (temp);
}