Intravision/reactos
1
0
Fork 0
mirror of https://github.com/reactos/reactos.git synced 2025-06-14 07:18:31 +00:00
Code Issues Projects Releases Packages Wiki Activity

[CRT]

Browse source 
Check for NaN and set error accordingly

svn path=/trunk/; revision=54447
This commit is contained in:
Pierre Schweitzer 2011-11-19 19:01:58 +00:00
parent ada492283a
commit 7d1620fa34
1 changed files with 21 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

31
reactos/lib/sdk/crt/math/i386/ldexp.c
View file

@ -19,11 +19,22 @@
Boston, MA 02110-1301, USA. Boston, MA 02110-1301, USA.
*/ */
#include <precomp.h>
#include <math.h> #include <math.h>
#include <float.h>
double ldexp (double value, int exp) double ldexp (double value, int exp)
{ {
register double result; register double result;
/* Check for value correctness
* and set errno if required
*/
if (_isnan(value))
{
errno = EDOM;
}
#ifdef __GNUC__ #ifdef __GNUC__
#if defined(__clang__) #if defined(__clang__)
asm ("fild %[exp]\n" asm ("fild %[exp]\n"
@ -33,20 +44,20 @@ double ldexp (double value, int exp)
: [value] "0" (value), [exp] "m" (exp)); : [value] "0" (value), [exp] "m" (exp));
#else #else
asm ("fscale" asm ("fscale"
: "=t" (result) : "=t" (result)
: "0" (value), "u" ((double)exp) : "0" (value), "u" ((double)exp)
: "1"); : "1");
#endif #endif
#else /* !__GNUC__ */ #else /* !__GNUC__ */
register double __dy = (double)exp; register double __dy = (double)exp;
__asm __asm
{ {
fld __dy fld __dy
fld value fld value
fscale fscale
fstp result fstp result
} }
#endif /* !__GNUC__ */ #endif /* !__GNUC__ */
return result; return result;
} }