From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from simark.ca by simark.ca with LMTP id YGx4LiJ2emIAdAUAWB0awg (envelope-from ) for ; Tue, 10 May 2022 10:26:42 -0400 Received: by simark.ca (Postfix, from userid 112) id BA1391E21F; Tue, 10 May 2022 10:26:42 -0400 (EDT) Authentication-Results: simark.ca; dkim=pass (1024-bit key; secure) header.d=sourceware.org header.i=@sourceware.org header.a=rsa-sha256 header.s=default header.b=kK4JwYAT; dkim-atps=neutral X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on simark.ca X-Spam-Level: X-Spam-Status: No, score=-3.0 required=5.0 tests=BAYES_00,DKIM_SIGNED, DKIM_VALID,DKIM_VALID_AU,MAILING_LIST_MULTI,URIBL_BLOCKED autolearn=ham autolearn_force=no version=3.4.6 Received: from sourceware.org (server2.sourceware.org [8.43.85.97]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature RSA-PSS (2048 bits) server-digest SHA256) (No client certificate requested) by simark.ca (Postfix) with ESMTPS id 408B11E01D for ; Tue, 10 May 2022 10:26:42 -0400 (EDT) Received: from server2.sourceware.org (localhost [IPv6:::1]) by sourceware.org (Postfix) with ESMTP id B354E3949F28 for ; Tue, 10 May 2022 14:26:41 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org B354E3949F28 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=sourceware.org; s=default; t=1652192801; bh=CxtkQNfaprWGxF3PebrwE3xh14GJPS1mmQ18yLt/SLQ=; h=To:Subject:Date:In-Reply-To:References:List-Id:List-Unsubscribe: List-Archive:List-Post:List-Help:List-Subscribe:From:Reply-To:Cc: From; b=kK4JwYATRQtzYSv6Z4K6ZhGio1a8ZpXed8EdCMMGN1oeJoSWhd53nXfc1U/kXlJZ8 oaOOelAiRaQI++71pbiNucCRT9HwmI/kSQRwqv3pIwUqZcVqz8pPCocvZ6okbi80UC h+Bx1lRPIrMA8HbvuwFl1RY1BTs0osGMumXyfHus= Received: from mga17.intel.com (mga17.intel.com [192.55.52.151]) by sourceware.org (Postfix) with ESMTPS id BF993395382F for ; Tue, 10 May 2022 14:25:04 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.1 sourceware.org BF993395382F X-IronPort-AV: E=McAfee;i="6400,9594,10342"; a="249917553" X-IronPort-AV: E=Sophos;i="5.91,214,1647327600"; d="scan'208";a="249917553" Received: from fmsmga008.fm.intel.com ([10.253.24.58]) by fmsmga107.fm.intel.com with ESMTP/TLS/ECDHE-RSA-AES256-GCM-SHA384; 10 May 2022 07:25:03 -0700 X-IronPort-AV: E=Sophos;i="5.91,214,1647327600"; d="scan'208";a="623480067" Received: from labpcdell3650-003.iul.intel.com (HELO localhost) ([172.28.49.87]) by fmsmga008-auth.fm.intel.com with ESMTP/TLS/ECDHE-RSA-AES256-GCM-SHA384; 10 May 2022 07:25:02 -0700 To: gdb-patches@sourceware.org Subject: [PATCH 03/18] gdb/testsuite: Fix fortran types for Intel compilers. Date: Tue, 10 May 2022 16:24:22 +0200 Message-Id: <20220510142437.1397399-4-nils-christian.kempke@intel.com> X-Mailer: git-send-email 2.25.1 In-Reply-To: <20220510142437.1397399-1-nils-christian.kempke@intel.com> References: <20220510142437.1397399-1-nils-christian.kempke@intel.com> MIME-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: 7bit 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: , From: Nils-Christian Kempke via Gdb-patches Reply-To: Nils-Christian Kempke Cc: JiniSusan.George@amd.com, Abdul Basit Ijaz , aburgess@redhat.com Errors-To: gdb-patches-bounces+public-inbox=simark.ca@sourceware.org Sender: "Gdb-patches" 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. There was not yet a way to handle the print for variable length strings to this commit introduces fortran_integerN as well. 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