_td_to_usi.c revision 1.9
1/* Copyright (C) 2007-2018 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 24#include "bid_conf.h" 25#include "bid_functions.h" 26#include "bid_gcc_intrinsics.h" 27 28USItype 29__bid_fixunstdsi (_Decimal128 x) { 30 USItype res = 0xbaddbadd; 31 union decimal128 ux; 32 33 ux.d = x; 34 res = __bid128_to_uint32_xint (ux.i); 35 36 if (res == 0x80000000) res = 0; // for NaNs too 37 return (res); 38} 39 40 41