bid128_to_int8.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_internal.h" 25 26#define SIZE_MASK 0xffffff80 27#define INVALID_RESULT 0x80 28 29BID_TO_SMALL_INT_CVT_FUNCTION (char, bid128_to_int8_rnint, UINT128, x, 30 bid128_to_int32_rnint, int, SIZE_MASK, 31 INVALID_RESULT) 32 33BID_TO_SMALL_INT_CVT_FUNCTION (char, bid128_to_int8_xrnint, UINT128, x, 34 bid128_to_int32_xrnint, int, SIZE_MASK, 35 INVALID_RESULT) 36 37BID_TO_SMALL_INT_CVT_FUNCTION (char, bid128_to_int8_rninta, UINT128, x, 38 bid128_to_int32_rninta, int, SIZE_MASK, 39 INVALID_RESULT) 40 41BID_TO_SMALL_INT_CVT_FUNCTION (char, bid128_to_int8_xrninta, UINT128, x, 42 bid128_to_int32_xrninta, int, SIZE_MASK, 43 INVALID_RESULT) 44 45BID_TO_SMALL_INT_CVT_FUNCTION (char, bid128_to_int8_int, UINT128, x, 46 bid128_to_int32_int, int, SIZE_MASK, 47 INVALID_RESULT) 48 49BID_TO_SMALL_INT_CVT_FUNCTION (char, bid128_to_int8_xint, UINT128, x, 50 bid128_to_int32_xint, int, SIZE_MASK, 51 INVALID_RESULT) 52 53BID_TO_SMALL_INT_CVT_FUNCTION (char, bid128_to_int8_floor, UINT128, x, 54 bid128_to_int32_floor, int, SIZE_MASK, 55 INVALID_RESULT) 56 57BID_TO_SMALL_INT_CVT_FUNCTION (char, bid128_to_int8_ceil, UINT128, x, 58 bid128_to_int32_ceil, int, SIZE_MASK, 59 INVALID_RESULT) 60 61BID_TO_SMALL_INT_CVT_FUNCTION (char, bid128_to_int8_xfloor, UINT128, x, 62 bid128_to_int32_xfloor, int, SIZE_MASK, 63 INVALID_RESULT) 64 65BID_TO_SMALL_INT_CVT_FUNCTION (char, bid128_to_int8_xceil, UINT128, x, 66 bid128_to_int32_xceil, int, SIZE_MASK, 67 INVALID_RESULT) 68