From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 1005) id 758413858D28; Tue, 12 Jul 2022 02:51:41 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 758413858D28 Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit From: Michael Meissner To: gcc-cvs@gcc.gnu.org Subject: [gcc(refs/users/meissner/heads/work093)] Add TARGET_IBM128 X-Act-Checkin: gcc X-Git-Author: Michael Meissner X-Git-Refname: refs/users/meissner/heads/work093 X-Git-Oldrev: 40652cac7e725c3dfdb54ca871ac4043d125e470 X-Git-Newrev: e4301263ba757f46963aa73c6c7e04dc9399fcc3 Message-Id: <20220712025141.758413858D28@sourceware.org> Date: Tue, 12 Jul 2022 02:51:41 +0000 (GMT) X-BeenThere: gcc-cvs@gcc.gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Gcc-cvs mailing list List-Unsubscribe: , List-Archive: List-Help: List-Subscribe: , X-List-Received-Date: Tue, 12 Jul 2022 02:51:41 -0000 https://gcc.gnu.org/g:e4301263ba757f46963aa73c6c7e04dc9399fcc3 commit e4301263ba757f46963aa73c6c7e04dc9399fcc3 Author: Michael Meissner Date: Mon Jul 11 22:51:24 2022 -0400 Add TARGET_IBM128 2022-07-08 Michael Meissner gcc/ * config/rs6000/rs6000-builtin.cc (rs6000_init_builtins): Use TARGET_IBM128. * config/rs6000/rs0000.c (rs6000_init_libfuncs): Likewise. * config/rs6000/rs6000.h (TARGET_IBM128): New macro. * config/rs6000/rs6000.md (extenddf2_fprs): Remove redundant test for TARGET_LONG_DOUBLE_128. (extenddf2_vsx): Likewise. (extendiftf2): Use TARGET_IBM128. (extendtfkf2): Likewise. (extendtfif2): Likewise. (trunckftf2): Likewise. Diff: --- gcc/config/rs6000/rs6000-builtin.cc | 2 +- gcc/config/rs6000/rs6000.cc | 4 ++-- gcc/config/rs6000/rs6000.h | 6 ++++++ gcc/config/rs6000/rs6000.md | 13 ++++++------- 4 files changed, 15 insertions(+), 10 deletions(-) diff --git a/gcc/config/rs6000/rs6000-builtin.cc b/gcc/config/rs6000/rs6000-builtin.cc index 457e463087f..eac933f45c0 100644 --- a/gcc/config/rs6000/rs6000-builtin.cc +++ b/gcc/config/rs6000/rs6000-builtin.cc @@ -717,7 +717,7 @@ rs6000_init_builtins (void) format is IBM extended double. For IEEE 128-bit floating point, always create the type __float128. */ - if (TARGET_LONG_DOUBLE_128 || TARGET_FLOAT128_TYPE) + if (TARGET_IBM128) { ibm128_float_type_node = make_node (REAL_TYPE); TYPE_PRECISION (ibm128_float_type_node) = 128; diff --git a/gcc/config/rs6000/rs6000.cc b/gcc/config/rs6000/rs6000.cc index 541b4679907..73fcb5f26fc 100644 --- a/gcc/config/rs6000/rs6000.cc +++ b/gcc/config/rs6000/rs6000.cc @@ -11154,7 +11154,7 @@ rs6000_init_libfuncs (void) init_float128_ieee (KFmode); /* __ibm128 support. */ - if (TARGET_FLOAT128_TYPE || TARGET_LONG_DOUBLE_128) + if (TARGET_IBM128) init_float128_ibm (IFmode); /* AIX/Darwin/64-bit Linux quad floating point routines. */ @@ -23837,7 +23837,7 @@ rs6000_scalar_mode_supported_p (scalar_mode mode) return default_decimal_float_supported_p (); else if (TARGET_FLOAT128_TYPE && mode == KFmode) return true; - else if ((TARGET_FLOAT128_TYPE || TARGET_LONG_DOUBLE_128) && mode == IFmode) + else if (TARGET_IBM128 && mode == IFmode) return true; else return default_scalar_mode_supported_p (mode); diff --git a/gcc/config/rs6000/rs6000.h b/gcc/config/rs6000/rs6000.h index 85d4f4c91d8..7bbd9ab5238 100644 --- a/gcc/config/rs6000/rs6000.h +++ b/gcc/config/rs6000/rs6000.h @@ -561,6 +561,12 @@ extern int rs6000_vector_align[]; && TARGET_P8_VECTOR \ && TARGET_POWERPC64) +/* Whether the __ibm128 keyword is allowed. Any system that supports _Float128 + is assumed to be capable of supporting __ibm128. Similarly if the long + double size is 128 bits, we assume __ibm128 is supported. We don't want to + support it on a system without existing 128-bit long doubles. */ +#define TARGET_IBM128 (TARGET_FLOAT128_TYPE || TARGET_LONG_DOUBLE_128) + /* Inlining allows targets to define the meanings of bits in target_info field of ipa_fn_summary by itself, the used bits for rs6000 are listed below. */ diff --git a/gcc/config/rs6000/rs6000.md b/gcc/config/rs6000/rs6000.md index 08165822be5..e17252bb8de 100644 --- a/gcc/config/rs6000/rs6000.md +++ b/gcc/config/rs6000/rs6000.md @@ -8580,8 +8580,7 @@ (float_extend:IBM128 (match_operand:DF 1 "nonimmediate_operand" "d,m,d"))) (use (match_operand:DF 2 "nonimmediate_operand" "m,m,d"))] - "!TARGET_VSX && TARGET_HARD_FLOAT - && TARGET_LONG_DOUBLE_128 && FLOAT128_IBM_P (mode)" + "!TARGET_VSX && TARGET_HARD_FLOAT && FLOAT128_IBM_P (mode)" "#" "&& reload_completed" [(set (match_dup 3) (match_dup 1)) @@ -8598,7 +8597,7 @@ [(set (match_operand:IBM128 0 "gpc_reg_operand" "=d,d") (float_extend:IBM128 (match_operand:DF 1 "nonimmediate_operand" "wa,m")))] - "TARGET_LONG_DOUBLE_128 && TARGET_VSX && FLOAT128_IBM_P (mode)" + "TARGET_VSX && FLOAT128_IBM_P (mode)" "#" "&& reload_completed" [(set (match_dup 2) (match_dup 1)) @@ -9055,7 +9054,7 @@ (define_expand "extendiftf2" [(set (match_operand:TF 0 "gpc_reg_operand") (float_extend:TF (match_operand:IF 1 "gpc_reg_operand")))] - "TARGET_FLOAT128_TYPE || TARGET_LONG_DOUBLE_128" + "TARGET_IBM128" { rs6000_expand_float128_convert (operands[0], operands[1], false); DONE; @@ -9091,7 +9090,7 @@ (define_expand "extendtfif2" [(set (match_operand:IF 0 "gpc_reg_operand") (float_extend:IF (match_operand:TF 1 "gpc_reg_operand")))] - "TARGET_FLOAT128_TYPE || TARGET_LONG_DOUBLE_128" + "TARGET_IBM128" { rs6000_expand_float128_convert (operands[0], operands[1], false); DONE; @@ -9100,7 +9099,7 @@ (define_expand "trunciftf2" [(set (match_operand:TF 0 "gpc_reg_operand") (float_truncate:TF (match_operand:IF 1 "gpc_reg_operand")))] - "TARGET_FLOAT128_TYPE || TARGET_LONG_DOUBLE_128" + "TARGET_IBM128" { rs6000_expand_float128_convert (operands[0], operands[1], false); DONE; @@ -9136,7 +9135,7 @@ (define_expand "trunctfif2" [(set (match_operand:IF 0 "gpc_reg_operand") (float_truncate:IF (match_operand:TF 1 "gpc_reg_operand")))] - "TARGET_FLOAT128_TYPE || TARGET_LONG_DOUBLE_128" + "TARGET_IBM128" { rs6000_expand_float128_convert (operands[0], operands[1], false); DONE;