1/* Copyright (C) 2008-2015 Free Software Foundation, Inc. 2 3This file is part of GCC. 4 5GCC is free software; you can redistribute it and/or modify it under 6the terms of the GNU General Public License as published by the Free 7Software Foundation; either version 3, or (at your option) any later 8version. 9 10GCC is distributed in the hope that it will be useful, but WITHOUT ANY 11WARRANTY; without even the implied warranty of MERCHANTABILITY or 12FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 13for more details. 14 15Under Section 7 of GPL version 3, you are granted additional 16permissions described in the GCC Runtime Library Exception, version 173.1, as published by the Free Software Foundation. 18 19You should have received a copy of the GNU General Public License and 20a copy of the GCC Runtime Library Exception along with this program; 21see the files COPYING3 and COPYING.RUNTIME respectively. If not, see 22<http://www.gnu.org/licenses/>. */ 23 24union _FP_UNION_Q 25{ 26 __float128 flt; 27 struct 28 { 29 unsigned long frac1 : 64; 30 unsigned long frac0 : 48; 31 unsigned exp : 15; 32 unsigned sign : 1; 33 } bits __attribute__((packed)); 34}; 35 36__float128 __copysigntf3 (__float128, __float128); 37__float128 __fabstf2 (__float128); 38 39__float128 40__copysigntf3 (__float128 a, __float128 b) 41{ 42 union _FP_UNION_Q A, B; 43 44 A.flt = a; 45 B.flt = b; 46 A.bits.sign = B.bits.sign; 47 48 return A.flt; 49} 50 51__float128 52__fabstf2 (__float128 a) 53{ 54 union _FP_UNION_Q A; 55 56 A.flt = a; 57 A.bits.sign = 0; 58 59 return A.flt; 60} 61