1*38fd1498Szrj /* Local definitions for use with the decNumber C Library. 2*38fd1498Szrj Copyright (C) 2007-2018 Free Software Foundation, Inc. 3*38fd1498Szrj 4*38fd1498Szrj This file is part of GCC. 5*38fd1498Szrj 6*38fd1498Szrj GCC is free software; you can redistribute it and/or modify it under 7*38fd1498Szrj the terms of the GNU General Public License as published by the Free 8*38fd1498Szrj Software Foundation; either version 3, or (at your option) any later 9*38fd1498Szrj version. 10*38fd1498Szrj 11*38fd1498Szrj GCC is distributed in the hope that it will be useful, but WITHOUT ANY 12*38fd1498Szrj WARRANTY; without even the implied warranty of MERCHANTABILITY or 13*38fd1498Szrj FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 14*38fd1498Szrj for more details. 15*38fd1498Szrj 16*38fd1498Szrj Under Section 7 of GPL version 3, you are granted additional 17*38fd1498Szrj permissions described in the GCC Runtime Library Exception, version 18*38fd1498Szrj 3.1, as published by the Free Software Foundation. 19*38fd1498Szrj 20*38fd1498Szrj You should have received a copy of the GNU General Public License and 21*38fd1498Szrj a copy of the GCC Runtime Library Exception along with this program; 22*38fd1498Szrj see the files COPYING3 and COPYING.RUNTIME respectively. If not, see 23*38fd1498Szrj <http://www.gnu.org/licenses/>. */ 24*38fd1498Szrj 25*38fd1498Szrj #if !defined(DECIMAL128LOCAL) 26*38fd1498Szrj 27*38fd1498Szrj /* The compiler needs sign manipulation functions for decimal128 which 28*38fd1498Szrj are not part of the decNumber package. */ 29*38fd1498Szrj 30*38fd1498Szrj /* Set sign; this assumes the sign was previously zero. */ 31*38fd1498Szrj #define decimal128SetSign(d,b) \ 32*38fd1498Szrj { (d)->bytes[WORDS_BIGENDIAN ? 0 : 15] |= ((unsigned) (b) << 7); } 33*38fd1498Szrj 34*38fd1498Szrj /* Clear sign. */ 35*38fd1498Szrj #define decimal128ClearSign(d) \ 36*38fd1498Szrj { (d)->bytes[WORDS_BIGENDIAN ? 0 : 15] &= ~0x80; } 37*38fd1498Szrj 38*38fd1498Szrj /* Flip sign. */ 39*38fd1498Szrj #define decimal128FlipSign(d) \ 40*38fd1498Szrj { (d)->bytes[WORDS_BIGENDIAN ? 0 : 15] ^= 0x80; } 41*38fd1498Szrj 42*38fd1498Szrj #endif 43