mirror of
https://github.com/reactos/reactos.git
synced 2025-06-16 12:58:31 +00:00
30 lines
296 B
C
30 lines
296 B
C
![]() |
#include <math.h>
|
||
|
#include <stdlib.h>
|
||
|
#include <internal/ieee.h>
|
||
|
|
||
|
/*
|
||
|
* @implemented
|
||
|
*/
|
||
|
double
|
||
|
frexp(double __x, int *exptr)
|
||
|
{
|
||
|
union
|
||
|
{
|
||
|
double* __x;
|
||
|
double_t* x;
|
||
|
} x;
|
||
|
|
||
|
x.__x = &__x;
|
||
|
|
||
|
if ( exptr != NULL )
|
||
|
*exptr = x.x->exponent - 0x3FE;
|
||
|
|
||
|
|
||
|
x.x->exponent = 0x3FE;
|
||
|
|
||
|
return __x;
|
||
|
}
|
||
|
|
||
|
|
||
|
|