Mercurial > hg > CbC > CbC_gcc
comparison libquadmath/math/copysignq.c @ 68:561a7518be6b
update gcc-4.6
author | Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Sun, 21 Aug 2011 07:07:55 +0900 |
parents | |
children | 04ced10e8804 |
comparison
equal
deleted
inserted
replaced
67:f6334be47118 | 68:561a7518be6b |
---|---|
1 /* s_copysignl.c -- long double version of s_copysign.c. | |
2 * Conversion to long double by Jakub Jelinek, jj@ultra.linux.cz. | |
3 */ | |
4 | |
5 /* | |
6 * ==================================================== | |
7 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. | |
8 * | |
9 * Developed at SunPro, a Sun Microsystems, Inc. business. | |
10 * Permission to use, copy, modify, and distribute this | |
11 * software is freely granted, provided that this notice | |
12 * is preserved. | |
13 * ==================================================== | |
14 */ | |
15 | |
16 #include "quadmath-imp.h" | |
17 | |
18 __float128 | |
19 copysignq (__float128 x, __float128 y) | |
20 { | |
21 uint64_t hx,hy; | |
22 GET_FLT128_MSW64(hx,x); | |
23 GET_FLT128_MSW64(hy,y); | |
24 SET_FLT128_MSW64(x,(hx&0x7fffffffffffffffULL)|(hy&0x8000000000000000ULL)); | |
25 return x; | |
26 } |