:pserver:cvsanon@mok.lvcm.com:/CVS/ReactOS reactos
[reactos.git] / lib / msvcrt / float / scalb.c
1 #include <msvcrt/float.h>
2 #include <msvcrt/internal/ieee.h>
3
4 double _scalb( double __x, long e )
5 {
6         double_t *x = (double_t *)&__x;
7         
8         x->exponent += e;
9
10         return __x;
11 }