update for HEAD-2003091401
[reactos.git] / lib / msvcrt / float / scalb.c
1 #include <msvcrt/float.h>
2 #include <msvcrt/internal/ieee.h>
3
4 /*
5  * @implemented
6  */
7 double _scalb( double __x, long e )
8 {
9         double_t *x = (double_t *)&__x;
10         
11         x->exponent += e;
12
13         return __x;
14 }