From f378ebf14df0952eae870c9865bab8326aa8f137 Mon Sep 17 00:00:00 2001 From: Dan Albert Date: Wed, 17 Jun 2015 11:09:54 -0700 Subject: Delete old versions of GCC. Change-Id: I710f125d905290e1024cbd67f48299861790c66c --- .../libgcc/config/libbid/bid_flag_operations.c | 345 --------------------- 1 file changed, 345 deletions(-) delete mode 100644 gcc-4.4.3/libgcc/config/libbid/bid_flag_operations.c (limited to 'gcc-4.4.3/libgcc/config/libbid/bid_flag_operations.c') diff --git a/gcc-4.4.3/libgcc/config/libbid/bid_flag_operations.c b/gcc-4.4.3/libgcc/config/libbid/bid_flag_operations.c deleted file mode 100644 index 23d8a5678..000000000 --- a/gcc-4.4.3/libgcc/config/libbid/bid_flag_operations.c +++ /dev/null @@ -1,345 +0,0 @@ -/* Copyright (C) 2007, 2009 Free Software Foundation, Inc. - -This file is part of GCC. - -GCC is free software; you can redistribute it and/or modify it under -the terms of the GNU General Public License as published by the Free -Software Foundation; either version 3, or (at your option) any later -version. - -GCC is distributed in the hope that it will be useful, but WITHOUT ANY -WARRANTY; without even the implied warranty of MERCHANTABILITY or -FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -for more details. - -Under Section 7 of GPL version 3, you are granted additional -permissions described in the GCC Runtime Library Exception, version -3.1, as published by the Free Software Foundation. - -You should have received a copy of the GNU General Public License and -a copy of the GCC Runtime Library Exception along with this program; -see the files COPYING3 and COPYING.RUNTIME respectively. If not, see -. */ - -/***************************************************************************** - * Non-computational Operations on Flags: - ****************************************************************************/ - -#include "bid_internal.h" - -// Note the following definitions from bid_conf.h: if the status flags are -// global, they have a fixed name recognized by the library functions: -// _IDEC_glbflags; pfpsf, defined as &_IDEC_glbflags, can be used instead; no -// argument is passed for the status flags to the library functions; if the -// status flags are local then they are passed as an arument, always by -// reference, to the library functions -// -// #if !DECIMAL_GLOBAL_EXCEPTION_FLAGS -// #define _EXC_FLAGS_PARAM , _IDEC_flags *pfpsf -// #else -// extern _IDEC_flags _IDEC_glbflags; -// #define _EXC_FLAGS_PARAM -// #define pfpsf &_IDEC_glbflags -// #endif - -#if DECIMAL_CALL_BY_REFERENCE -void -signalException (_IDEC_flags * pflagsmask _EXC_FLAGS_PARAM) { - // *pflagsmask is the logical OR of the flags to be set, e.g. - // *pflagsmask =INVALID_EXCEPTION | ZERO_DIVIDE_EXCEPTION | OVERFLOW_EXCEPTION - // UNDERFLOW_EXCEPTION | INEXACT_EXCEPTION to set all five IEEE 754R - // exception flags - *pfpsf = *pfpsf | (*pflagsmask & BID_IEEE_FLAGS); -} -#else -void -signalException (_IDEC_flags flagsmask _EXC_FLAGS_PARAM) { - // flagsmask is the logical OR of the flags to be set, e.g. - // flagsmask = INVALID_EXCEPTION | ZERO_DIVIDE_EXCEPTION | OVERFLOW_EXCEPTION - // UNDERFLOW_EXCEPTION | INEXACT_EXCEPTION to set all five IEEE 754R - // exception flags - *pfpsf = *pfpsf | (flagsmask & BID_IEEE_FLAGS); -} -#endif - -#if DECIMAL_CALL_BY_REFERENCE -void -lowerFlags (_IDEC_flags * pflagsmask _EXC_FLAGS_PARAM) { - // *pflagsmask is the logical OR of the flags to be cleared, e.g. - // *pflagsmask =INVALID_EXCEPTION | ZERO_DIVIDE_EXCEPTION | OVERFLOW_EXCEPTION - // UNDERFLOW_EXCEPTION | INEXACT_EXCEPTION to clear all five IEEE 754R - // exception flags - *pfpsf = *pfpsf & ~(*pflagsmask & BID_IEEE_FLAGS); -} -#else -void -lowerFlags (_IDEC_flags flagsmask _EXC_FLAGS_PARAM) { - // flagsmask is the logical OR of the flags to be cleared, e.g. - // flagsmask = INVALID_EXCEPTION | ZERO_DIVIDE_EXCEPTION | OVERFLOW_EXCEPTION - // UNDERFLOW_EXCEPTION | INEXACT_EXCEPTION to clear all five IEEE 754R - // exception flags - *pfpsf = *pfpsf & ~(flagsmask & BID_IEEE_FLAGS); -} -#endif - -#if DECIMAL_CALL_BY_REFERENCE -void -testFlags (_IDEC_flags * praised, - _IDEC_flags * pflagsmask _EXC_FLAGS_PARAM) { - // *praised is a pointer to the result, i.e. the logical OR of the flags - // selected by *pflagsmask that are set; e.g. if - // *pflagsmask = INVALID_EXCEPTION | UNDERFLOW_EXCEPTION | INEXACT_EXCEPTION - // and only the invalid and inexact flags are raised (set) then upon return - // *praised = INVALID_EXCEPTION | INEXACT_EXCEPTION - *praised = *pfpsf & (*pflagsmask & BID_IEEE_FLAGS); -} -#else -_IDEC_flags -testFlags (_IDEC_flags flagsmask _EXC_FLAGS_PARAM) { - _IDEC_flags raised; - // the raturn value raised is the logical OR of the flags - // selected by flagsmask, that are set; e.g. if - // flagsmask = INVALID_EXCEPTION | UNDERFLOW_EXCEPTION | INEXACT_EXCEPTION and - // only the invalid and inexact flags are raised (set) then the return value - // is raised = INVALID_EXCEPTION | INEXACT_EXCEPTION - raised = *pfpsf & (flagsmask & BID_IEEE_FLAGS); - return (raised); -} -#endif - -#if DECIMAL_CALL_BY_REFERENCE -void -testSavedFlags (_IDEC_flags * praised, _IDEC_flags * psavedflags, - _IDEC_flags * pflagsmask) { - // *praised is a pointer to the result, i.e. the logical OR of the flags - // selected by *pflagsmask that are set in *psavedflags; e.g. if - // *pflagsmask = INVALID_EXCEPTION | UNDERFLOW_EXCEPTION | INEXACT_EXCEPTION - // and only the invalid and inexact flags are raised (set) in *psavedflags - // then upon return *praised = INVALID_EXCEPTION | INEXACT_EXCEPTION - // Note that the flags could be saved in a global variable, but this function - // would still expect that value as an argument passed by reference - *praised = *psavedflags & (*pflagsmask & BID_IEEE_FLAGS); -} -#else -_IDEC_flags -testSavedFlags (_IDEC_flags savedflags, _IDEC_flags flagsmask) { - _IDEC_flags raised; - // the raturn value raised is the logical OR of the flags - // selected by flagsmask, that are set in savedflags; e.g. if - // flagsmask = INVALID_EXCEPTION | UNDERFLOW_EXCEPTION | INEXACT_EXCEPTION and - // only the invalid and inexact flags are raised (set) in savedflags - // then the return value is raised = INVALID_EXCEPTION | INEXACT_EXCEPTION - // Note that the flags could be saved in a global variable, but this function - // would still expect that value as an argument passed by value - raised = savedflags & (flagsmask & BID_IEEE_FLAGS); - return (raised); -} -#endif - -#if DECIMAL_CALL_BY_REFERENCE -void -restoreFlags (_IDEC_flags * pflagsvalues, - _IDEC_flags * pflagsmask _EXC_FLAGS_PARAM) { - // restore the status flags selected by *pflagsmask to the values speciafied - // (as a logical OR) in *pflagsvalues; e.g. if - // *pflagsmask = INVALID_EXCEPTION | UNDERFLOW_EXCEPTION | INEXACT_EXCEPTION - // and only the invalid and inexact flags are raised (set) in *pflagsvalues - // then upon return the invalid status flag will be set, the underflow status - // flag will be clear, and the inexact status flag will be set - *pfpsf = *pfpsf & ~(*pflagsmask & BID_IEEE_FLAGS); - // clear flags that have to be restored - *pfpsf = *pfpsf | (*pflagsvalues & (*pflagsmask & BID_IEEE_FLAGS)); - // restore flags -} -#else -void -restoreFlags (_IDEC_flags flagsvalues, - _IDEC_flags flagsmask _EXC_FLAGS_PARAM) { - // restore the status flags selected by flagsmask to the values speciafied - // (as a logical OR) in flagsvalues; e.g. if - // flagsmask = INVALID_EXCEPTION | UNDERFLOW_EXCEPTION | INEXACT_EXCEPTION - // and only the invalid and inexact flags are raised (set) in flagsvalues - // then upon return the invalid status flag will be set, the underflow status - // flag will be clear, and the inexact status flag will be set - *pfpsf = *pfpsf & ~(flagsmask & BID_IEEE_FLAGS); - // clear flags that have to be restored - *pfpsf = *pfpsf | (flagsvalues & (flagsmask & BID_IEEE_FLAGS)); - // restore flags -} -#endif - -#if DECIMAL_CALL_BY_REFERENCE -void -saveFlags (_IDEC_flags * pflagsvalues, - _IDEC_flags * pflagsmask _EXC_FLAGS_PARAM) { - // return in *pflagsvalues the status flags specified (as a logical OR) in - // *pflagsmask; e.g. if - // *pflagsmask = INVALID_EXCEPTION | UNDERFLOW_EXCEPTION | INEXACT_EXCEPTION - // and only the invalid and inexact flags are raised (set) in the status word, - // then upon return the value in *pflagsvalues will have the invalid status - // flag set, the underflow status flag clear, and the inexact status flag set - *pflagsvalues = *pfpsf & (*pflagsmask & BID_IEEE_FLAGS); -} -#else -_IDEC_flags -saveFlags (_IDEC_flags flagsmask _EXC_FLAGS_PARAM) { - _IDEC_flags flagsvalues; - // return the status flags specified (as a logical OR) in flagsmask; e.g. if - // flagsmask = INVALID_EXCEPTION | UNDERFLOW_EXCEPTION | INEXACT_EXCEPTION - // and only the invalid and inexact flags are raised (set) in the status word, - // then the return value will have the invalid status flag set, the - // underflow status flag clear, and the inexact status flag set - flagsvalues = *pfpsf & (flagsmask & BID_IEEE_FLAGS); - return (flagsvalues); -} -#endif - -// Note the following definitions from bid_conf.h (rearranged): if the rounding -// mode is global, it has a fixed name recognized by the library functions: -// _IDEC_glbround; rnd_mode, defined as &_IDEC_glbround, can be used instead; no -// argument is passed for the rounding mode to the library functions; if the -// rounding mode is local then it is passed as an arument, by reference or by -// value, to the library functions -// -// #if DECIMAL_CALL_BY_REFERENCE -// #if !DECIMAL_GLOBAL_ROUNDING -// #define _RND_MODE_PARAM , _IDEC_round *prnd_mode -// #else -// #define _RND_MODE_PARAM -// #define rnd_mode _IDEC_glbround -// #endif -// #else -// #if !DECIMAL_GLOBAL_ROUNDING -// #define _RND_MODE_PARAM , _IDEC_round rnd_mode -// #else -// #define _RND_MODE_PARAM -// #define rnd_mode _IDEC_glbround -// #endif -// #endif - -#if DECIMAL_CALL_BY_REFERENCE -#if !DECIMAL_GLOBAL_ROUNDING - // #define _RND_MODE_PARAM , _IDEC_round *prnd_mode -void -getDecimalRoundingDirection (_IDEC_round * rounding_mode - _RND_MODE_PARAM) { - // returns the current rounding mode - *rounding_mode = *prnd_mode; -} -#else - // #define _RND_MODE_PARAM - // #define rnd_mode _IDEC_glbround -void -getDecimalRoundingDirection (_IDEC_round * rounding_mode - _RND_MODE_PARAM) { - // returns the current rounding mode - *rounding_mode = rnd_mode; -} -#endif -#else -#if !DECIMAL_GLOBAL_ROUNDING - // #define _RND_MODE_PARAM , _IDEC_round rnd_mode -_IDEC_round -getDecimalRoundingDirection (_IDEC_round rnd_mode) { - // returns the current rounding mode - return (rnd_mode); -} -#else - // #define _RND_MODE_PARAM - // #define rnd_mode _IDEC_glbround -_IDEC_round -getDecimalRoundingDirection (void) { - // returns the current rounding mode - return (rnd_mode); -} -#endif -#endif - -#if DECIMAL_CALL_BY_REFERENCE -#if !DECIMAL_GLOBAL_ROUNDING - // #define _RND_MODE_PARAM , _IDEC_round *prnd_mode -void -setDecimalRoundingDirection (_IDEC_round * rounding_mode - _RND_MODE_PARAM) { - // sets the current rounding mode to the value in *rounding_mode, if valid - if (*rounding_mode == ROUNDING_TO_NEAREST || - *rounding_mode == ROUNDING_DOWN || - *rounding_mode == ROUNDING_UP || - *rounding_mode == ROUNDING_TO_ZERO || - *rounding_mode == ROUNDING_TIES_AWAY) { - *prnd_mode = *rounding_mode; - } -} -#else - // #define _RND_MODE_PARAM - // #define rnd_mode _IDEC_glbround -void -setDecimalRoundingDirection (_IDEC_round * rounding_mode - ) { - // sets the global rounding mode to the value in *rounding_mode, if valid - if (*rounding_mode == ROUNDING_TO_NEAREST || - *rounding_mode == ROUNDING_DOWN || - *rounding_mode == ROUNDING_UP || - *rounding_mode == ROUNDING_TO_ZERO || - *rounding_mode == ROUNDING_TIES_AWAY) { - rnd_mode = *rounding_mode; - } -} -#endif -#else -#if !DECIMAL_GLOBAL_ROUNDING - // #define _RND_MODE_PARAM , _IDEC_round rnd_mode -_IDEC_round -setDecimalRoundingDirection (_IDEC_round rounding_mode _RND_MODE_PARAM) { - // sets the current rounding mode to the value in rounding_mode; - // however, when arguments are passed by value and the rounding mode - // is a local variable, this is not of any use - if (rounding_mode == ROUNDING_TO_NEAREST || - rounding_mode == ROUNDING_DOWN || - rounding_mode == ROUNDING_UP || - rounding_mode == ROUNDING_TO_ZERO || - rounding_mode == ROUNDING_TIES_AWAY) { - return (rounding_mode); - } - return (rnd_mode); -} -#else - // #define _RND_MODE_PARAM - // #define rnd_mode _IDEC_glbround -void -setDecimalRoundingDirection (_IDEC_round rounding_mode) { - // sets the current rounding mode to the value in rounding_mode, if valid; - if (rounding_mode == ROUNDING_TO_NEAREST || - rounding_mode == ROUNDING_DOWN || - rounding_mode == ROUNDING_UP || - rounding_mode == ROUNDING_TO_ZERO || - rounding_mode == ROUNDING_TIES_AWAY) { - rnd_mode = rounding_mode; - } -} -#endif -#endif - -#if DECIMAL_CALL_BY_REFERENCE -void -is754 (int *retval) { - *retval = 0; -} -#else -int -is754 (void) { - return 0; -} -#endif - -#if DECIMAL_CALL_BY_REFERENCE -void -is754R (int *retval) { - *retval = 1; -} -#else -int -is754R (void) { - return 1; -} -#endif -- cgit v1.2.3