From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mga07.intel.com (mga07.intel.com [134.134.136.100]) by sourceware.org (Postfix) with ESMTPS id 196AE383665B for ; Tue, 31 May 2022 09:25:12 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.1 sourceware.org 196AE383665B X-IronPort-AV: E=McAfee;i="6400,9594,10363"; a="338239285" X-IronPort-AV: E=Sophos;i="5.91,264,1647327600"; d="scan'208";a="338239285" Received: from orsmga005.jf.intel.com ([10.7.209.41]) by orsmga105.jf.intel.com with ESMTP/TLS/ECDHE-RSA-AES256-GCM-SHA384; 31 May 2022 02:24:58 -0700 X-IronPort-AV: E=Sophos;i="5.91,264,1647327600"; d="scan'208";a="754863298" Received: from labpcdell3650-003.iul.intel.com (HELO localhost) ([172.28.49.87]) by orsmga005-auth.jf.intel.com with ESMTP/TLS/ECDHE-RSA-AES256-GCM-SHA384; 31 May 2022 02:24:56 -0700 From: Nils-Christian Kempke To: gdb-patches@sourceware.org Cc: aburgess@redhat.com, JiniSusan.George@amd.com, Felix Willgerodt , Abdul Basit Ijaz , Nils-Christian Kempke Subject: [PATCH v2 03/16] gdb/testsuite: Fix fortran types for Intel compilers. Date: Tue, 31 May 2022 11:24:18 +0200 Message-Id: <20220531092423.2361679-2-nils-christian.kempke@intel.com> X-Mailer: git-send-email 2.25.1 In-Reply-To: <20220531092423.2361679-1-nils-christian.kempke@intel.com> References: <20220531092423.2361679-1-nils-christian.kempke@intel.com> MIME-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: 7bit X-Spam-Status: No, score=-10.7 required=5.0 tests=BAYES_00, DKIMWL_WL_HIGH, DKIM_SIGNED, DKIM_VALID, DKIM_VALID_AU, DKIM_VALID_EF, GIT_PATCH_0, SPF_HELO_NONE, SPF_NONE, TXREP, T_SCC_BODY_TEXT_LINE autolearn=ham autolearn_force=no version=3.4.6 X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on server2.sourceware.org X-BeenThere: gdb-patches@sourceware.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Gdb-patches mailing list List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Tue, 31 May 2022 09:25:14 -0000 From: Felix Willgerodt Newer Intel compilers emit their dwarf type name in a slightly different format. Therefore, this needs adjustment to make more tests pass in the Fortran testsuite. Co-authored-by: Abdul Basit Ijaz Co-authored-by: Nils-Christian Kempke --- gdb/testsuite/lib/fortran.exp | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) diff --git a/gdb/testsuite/lib/fortran.exp b/gdb/testsuite/lib/fortran.exp index a97c6eeb4e..9531d393a1 100644 --- a/gdb/testsuite/lib/fortran.exp +++ b/gdb/testsuite/lib/fortran.exp @@ -38,6 +38,8 @@ proc fortran_int4 {} { return "integer" } elseif {[test_compiler_info {icc-*}]} { return "INTEGER\\(4\\)" + } elseif {[test_compiler_info {intel-*}]} { + return "INTEGER\\*4" } else { return "unknown" } @@ -52,6 +54,8 @@ proc fortran_int8 {} { return "integer\\*8" } elseif {[test_compiler_info {icc-*}]} { return "INTEGER\\(8\\)" + } elseif {[test_compiler_info {intel-*}]} { + return "INTEGER\\*8" } else { return "unknown" } @@ -66,6 +70,8 @@ proc fortran_real4 {} { return "real" } elseif {[test_compiler_info {icc-*}]} { return "REAL\\(4\\)" + } elseif {[test_compiler_info {intel-*}]} { + return "REAL\\*4" } else { return "unknown" } @@ -80,6 +86,8 @@ proc fortran_real8 {} { return "double precision" } elseif {[test_compiler_info {icc-*}]} { return "REAL\\(8\\)" + } elseif {[test_compiler_info {intel-*}]} { + return "REAL\\*8" } else { return "unknown" } @@ -94,6 +102,8 @@ proc fortran_complex4 {} { return "complex" } elseif {[test_compiler_info {icc-*}]} { return "COMPLEX\\(4\\)" + } elseif {[test_compiler_info {intel-*}]} { + return "COMPLEX\\*8" } else { return "unknown" } @@ -108,6 +118,8 @@ proc fortran_complex8 {} { return "double complex" } elseif {[test_compiler_info {icc-*}]} { return "COMPLEX\\(8\\)" + } elseif {[test_compiler_info {intel-*}]} { + return "COMPLEX\\*16" } else { return "unknown" } @@ -122,6 +134,8 @@ proc fortran_complex16 {} { return "quad complex" } elseif {[test_compiler_info {icc-*}]} { return "COMPLEX\\(16\\)" + } elseif {[test_compiler_info {intel-*}]} { + return "COMPLEX\\*32" } else { return "unknown" } @@ -136,6 +150,8 @@ proc fortran_logical4 {} { return "logical" } elseif {[test_compiler_info {icc-*}]} { return "LOGICAL\\(4\\)" + } elseif {[test_compiler_info {intel-*}]} { + return "LOGICAL\\*4" } else { return "unknown" } @@ -150,6 +166,8 @@ proc fortran_character1 {} { return "character" } elseif {[test_compiler_info {icc-*}]} { return "CHARACTER\\(1\\)" + } elseif {[test_compiler_info {intel-*}]} { + return "CHARACTER\\*1" } else { return "unknown" } -- 2.25.1 Intel Deutschland GmbH Registered Address: Am Campeon 10, 85579 Neubiberg, Germany Tel: +49 89 99 8853-0, www.intel.de Managing Directors: Christin Eisenschmid, Sharon Heck, Tiffany Doon Silva Chairperson of the Supervisory Board: Nicole Lau Registered Office: Munich Commercial Register: Amtsgericht Muenchen HRB 186928