1 | #include "SDL_internal.h" |
2 | /* |
3 | * ==================================================== |
4 | * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. |
5 | * |
6 | * Developed at SunPro, a Sun Microsystems, Inc. business. |
7 | * Permission to use, copy, modify, and distribute this |
8 | * software is freely granted, provided that this notice |
9 | * is preserved. |
10 | * ==================================================== |
11 | */ |
12 | |
13 | /* |
14 | * copysign(double x, double y) |
15 | * copysign(x,y) returns a value with the magnitude of x and |
16 | * with the sign bit of y. |
17 | */ |
18 | |
19 | #include "math_libm.h" |
20 | #include "math_private.h" |
21 | |
22 | double copysign(double x, double y) |
23 | { |
24 | u_int32_t hx,hy; |
25 | GET_HIGH_WORD(hx,x); |
26 | GET_HIGH_WORD(hy,y); |
27 | SET_HIGH_WORD(x,(hx&0x7fffffff)|(hy&0x80000000)); |
28 | return x; |
29 | } |
30 | libm_hidden_def(copysign) |
31 | |