From patchwork Tue Feb 27 21:00:14 2024 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Harald Anlauf X-Patchwork-Id: 86480 Return-Path: X-Original-To: patchwork@sourceware.org Delivered-To: patchwork@sourceware.org Received: from server2.sourceware.org (localhost [IPv6:::1]) by sourceware.org (Postfix) with ESMTP id 468853858426 for ; Tue, 27 Feb 2024 21:00:51 +0000 (GMT) X-Original-To: gcc-patches@gcc.gnu.org Delivered-To: gcc-patches@gcc.gnu.org Received: from mout.gmx.net (mout.gmx.net [212.227.17.21]) by sourceware.org (Postfix) with ESMTPS id 039953858C31; Tue, 27 Feb 2024 21:00:15 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.2 sourceware.org 039953858C31 Authentication-Results: sourceware.org; dmarc=pass (p=quarantine dis=none) header.from=gmx.de Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=gmx.de ARC-Filter: OpenARC Filter v1.0.0 sourceware.org 039953858C31 Authentication-Results: server2.sourceware.org; arc=none smtp.remote-ip=212.227.17.21 ARC-Seal: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1709067617; cv=none; b=eXZit1nyh17B/ROePlHy3/WD3B5aRt3dbALyh0bJiOJE0kDoGQOYktyuJLNog7VbHAn5Fkot76FP7vjeo3qT/E7wa19oXZquhwFbJFykhI5mA/3GwEFJTzPhMo/91j3bHp1fPbGvq0FZu9OlKnQfeWKZ5d/8A4kKnMYx64qoWYQ= ARC-Message-Signature: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1709067617; c=relaxed/simple; bh=LPaI/Q++6L1Y31Pn8/zYoKzBPWSEkNTZBafOeu0aF5o=; h=DKIM-Signature:MIME-Version:Message-ID:From:To:Subject:Date; b=xaANbT2zzA5UrDAUbhVihBbGPFY6LnXz2jU6U/NGYAVlWW/vav3tK5TkU3Re2tSBo3I6Cq8a3An1Y0mLJpSSec0RWfXEUPlsK/jqX5koU5gz+Xdk+aN8zzWbSLLORZVjr0qfi592wMKyxqC/kdHBSqexry0i/OYSkXYv0cVKbRs= ARC-Authentication-Results: i=1; server2.sourceware.org DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=gmx.de; s=s31663417; t=1709067614; x=1709672414; i=anlauf@gmx.de; bh=LPaI/Q++6L1Y31Pn8/zYoKzBPWSEkNTZBafOeu0aF5o=; h=X-UI-Sender-Class:From:To:Subject:Date; b=gfnO3u7PqYaIzd5K0eQvHgYUf36VgpXtt7Sh0R6GC2MkkSljmPLNy+kx72iY0hRM Rpw06TKFg/ttBBhYZvj3E1AzP9kmiy2tg8j6uN0rhtiLIwZpOi+gD6fkMn2nr5nJe RY9MgTU1XTHsstmyglXk4HMsf0PjuIwNQ968+JEk8PhYHrdnf4Ec8cAj3ibJGjqag ZU0wU38RJ9i+W+L4vtmMLN+3BLiw5hQb1KpAk5LgCqMNKsEuZmS2GxBt79tlswdVi +i3OKKPo3c6dnruhBNx2UfjrztJ7Pn31+H5i7mER0QDDIW8fPr7ValJeEbdcWQkGq QLdP0fbh1zuDUHSn1Q== X-UI-Sender-Class: 724b4f7f-cbec-4199-ad4e-598c01a50d3a Received: from [79.251.7.31] ([79.251.7.31]) by web-mail.gmx.net (3c-app-gmx-bap21.server.lan [172.19.172.91]) (via HTTP); Tue, 27 Feb 2024 22:00:14 +0100 MIME-Version: 1.0 Message-ID: From: Harald Anlauf To: fortran , gcc-patches Subject: [PATCH] Fortran testsuite: fix invalid Fortran in testcase Date: Tue, 27 Feb 2024 22:00:14 +0100 Importance: normal Sensitivity: Normal X-Priority: 3 X-Provags-ID: V03:K1:PGIUqYVftzZoAAIebLycxoLTGxtMiMtRrnzuN2Yftfo5ByGJ7iEd3ctra5ai1REK52Gjg fTa/LFfGfASSDjPx++TAfvjujzs7nZKZDoAzpmSeq7kQx4ftU/WpRM8OvMnrWgEOuUwEgA5+drjt LH6T9EqGN6JC+Uy2XkFm3+ZzCaxF0VwoXwe0lGwjJsHZU8f63YJs5/AJ8M/w48fEhENOfS/d8MQN hi254495prgjMXic3eAmwFfN8Wjabql3qDXxaP7RHTi/+UqoQjfNq37PzGCDp8IfeK11pF/2gwye Lo= UI-OutboundReport: notjunk:1;M01:P0:5COmZnkX9+8=;ZeGb/LnH5pQmpeiC6oPARwIaUhf gfZbvw2l5T3GVjXYIDpSEvkUv1AH85xyEjYi2QZ+LRQXRIAndMFyAqgxdsD61LlESFu+CZngQ tmoM8KVaDJIu6jV7cI/zFbhmo6GWaROSewGicx3/Pdsf5VSZ1fytc8H8JWYvvXVVXjl3gJj9w Leesjj5dg1EhYARuNjwWgaCI+G5Q6Q/E/L50b8PVgxR1LxrDJalBHDRJ7eUqhYeUhL38+vTdF 0Aq1I1kDIbpy8J6CwRNHli1UoL9SOIXOAOU7yRrC4VR0WQO7ty/rtI1miXz0PZVsAZm03ev7n /Ay/LUfIMjESnllPWtlo0iJNNRVj36/dVmUeM8PRnmzjC65/ZwCOBuctyumVWTuLIfdfvCEFi 8kAQofi5bYr56n32mhXqR2Tcmdrim+OPfRpMcavw0N8ZpQA6YXyDCWC9XOs0Styw4wyjpPTmM ZvVSs6MV0XPeJaVRdguyDXd+/nQ3yEDsjpwvhZ6nCuWliWcJ1l1118tyI9APDBaz7CsO1vL4f HDR05bk9D1u5SlN6CdkFzU14U0y078IxsTn1n5uVV0yo9idPRiNU9xE+jMXMC41TTCWwXH8W4 eeqMtN+bufuxgbu5+lIz85HKZItWILjjnp8q/Za7PvE6UqRdyhL49rCmMB6A//M2zbT6Qy+Jg eWVyAjJhvxIl30FAZSi+aIuAKrHGg2HQgByBmNrXJz8PKX6ilHKh8NpeQKmbEWE= X-Spam-Status: No, score=-12.4 required=5.0 tests=BAYES_00, DKIM_SIGNED, DKIM_VALID, DKIM_VALID_AU, DKIM_VALID_EF, FREEMAIL_FROM, GIT_PATCH_0, RCVD_IN_DNSWL_LOW, RCVD_IN_MSPIKE_H3, RCVD_IN_MSPIKE_WL, SPF_HELO_NONE, SPF_PASS, 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: gcc-patches@gcc.gnu.org X-Mailman-Version: 2.1.30 Precedence: list List-Id: Gcc-patches mailing list List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: gcc-patches-bounces+patchwork=sourceware.org@gcc.gnu.org Dear all, the attached patch fixes invalid Fortran in testcase gfortran.dg/pr101026.f, which might prohibit progress in fixing pr111781. (Note that the testcase was for a tree-optimizer issue, not the Fortran frontend.) OK for mainline? Will commit within 24h unless there are comments. Thanks, Harald From 75724b6b42a1c46383d8e6deedbfb8d2ebd0fa12 Mon Sep 17 00:00:00 2001 From: Harald Anlauf Date: Tue, 27 Feb 2024 21:51:53 +0100 Subject: [PATCH] Fortran testsuite: fix invalid Fortran in testcase gcc/testsuite/ChangeLog: * gfortran.dg/pr101026.f: Let variables used in specification expression be passed as dummy arguments --- gcc/testsuite/gfortran.dg/pr101026.f | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gcc/testsuite/gfortran.dg/pr101026.f b/gcc/testsuite/gfortran.dg/pr101026.f index 9576d8802ca..e05e21c898a 100644 --- a/gcc/testsuite/gfortran.dg/pr101026.f +++ b/gcc/testsuite/gfortran.dg/pr101026.f @@ -1,6 +1,6 @@ ! { dg-do compile } ! { dg-options "-Ofast -frounding-math" } - SUBROUTINE PASSB4 (CC,CH) + SUBROUTINE PASSB4 (CC,CH,IDO,L1) DIMENSION CC(IDO,4,L1), CH(IDO,L1,*) DO 103 I=2,IDO,2 TI4 = CC0-CC(I,4,K) -- 2.35.3