1 /* Software floating-point emulation. 2 Return !a 3 Copyright (C) 1997-2022 Free Software Foundation, Inc. 4 This file is part of the GNU C Library. 5 6 The GNU C Library is free software; you can redistribute it and/or 7 modify it under the terms of the GNU Lesser General Public 8 License as published by the Free Software Foundation; either 9 version 2.1 of the License, or (at your option) any later version. 10 11 The GNU C Library is distributed in the hope that it will be useful, 12 but WITHOUT ANY WARRANTY; without even the implied warranty of 13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 14 Lesser General Public License for more details. 15 16 You should have received a copy of the GNU Lesser General Public 17 License along with the GNU C Library; if not, see 18 <https://www.gnu.org/licenses/>. */ 19 20 #include "soft-fp.h" 21 #include "quad.h" 22 _Q_neg(const long double a)23long double _Q_neg(const long double a) 24 { 25 union { 26 long double ldbl; 27 UWtype words[4]; 28 } c; 29 30 c.ldbl = a; 31 32 #if (__BYTE_ORDER == __BIG_ENDIAN) 33 c.words[0] ^= (((UWtype)1) << (W_TYPE_SIZE - 1)); 34 #elif (__BYTE_ORDER == __LITTLE_ENDIAN) && (W_TYPE_SIZE == 64) 35 c.words[1] ^= (((UWtype)1) << (W_TYPE_SIZE - 1)); 36 #elif (__BYTE_ORDER == __LITTLE_ENDIAN) && (W_TYPE_SIZE == 32) 37 c.words[3] ^= (((UWtype)1) << (W_TYPE_SIZE - 1)); 38 #else 39 FP_DECL_Q(A); FP_DECL_Q(C); 40 41 FP_UNPACK_RAW_Q(A, a); 42 FP_NEG_Q(C, A); 43 FP_PACK_RAW_Q(c.ldbl, C); 44 #endif 45 return c.ldbl; 46 } 47