From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 48) id A56303858C2D; Mon, 17 Apr 2023 19:24:27 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org A56303858C2D DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gcc.gnu.org; s=default; t=1681759467; bh=63DZ8jwtC8M81G0sxJRHJOcNz/fG9VvjK1UuMog2/8U=; h=From:To:Subject:Date:In-Reply-To:References:From; b=Z1ctwNYeWvizg8bq3ZPsZeS3P7bcLU34/UIqL5xrfLPgtXQgN3T715P6q/LNAZpMc 23vBDXVn78slrHAo6XUgUkx4AUy21+/VHWvszAFBL+VXhK/PWTZ4I8jM1Zt156XABr zW696AxmsYWkcXfK7NLG4hMIcco/Jf2Zy63rC/0U= From: "anlauf at gcc dot gnu.org" To: gcc-bugs@gcc.gnu.org Subject: [Bug fortran/100297] FAIL: gfortran.dg/allocatable_function_1.f90 gfortran.dg/reshape_8.f90 Date: Mon, 17 Apr 2023 19:24:27 +0000 X-Bugzilla-Reason: CC X-Bugzilla-Type: changed X-Bugzilla-Watch-Reason: None X-Bugzilla-Product: gcc X-Bugzilla-Component: fortran X-Bugzilla-Version: 12.0 X-Bugzilla-Keywords: testsuite-fail X-Bugzilla-Severity: normal X-Bugzilla-Who: anlauf at gcc dot gnu.org X-Bugzilla-Status: NEW X-Bugzilla-Resolution: X-Bugzilla-Priority: P3 X-Bugzilla-Assigned-To: unassigned at gcc dot gnu.org X-Bugzilla-Target-Milestone: --- X-Bugzilla-Flags: X-Bugzilla-Changed-Fields: Message-ID: In-Reply-To: References: Content-Type: text/plain; charset="UTF-8" Content-Transfer-Encoding: quoted-printable X-Bugzilla-URL: http://gcc.gnu.org/bugzilla/ Auto-Submitted: auto-generated MIME-Version: 1.0 List-Id: https://gcc.gnu.org/bugzilla/show_bug.cgi?id=3D100297 --- Comment #4 from anlauf at gcc dot gnu.org --- (In reply to Andreas Schwab from comment #3) > "\.data" is the same as ".data", you want either "\\.data" or {\.data}. = But > it still doesn't lower the probability to match a filename by much. True. I've compared the dump generated by gfortran <=3D 10 vs. >=3D 11, looked at PR96624 again and came to the conclusion that the absence of the following was probably intended: (*(integer(kind=3D4)[0] * restrict) atmp.0.data)[0] =3D 1; (*(integer(kind=3D4)[0] * restrict) atmp.0.data)[1] =3D 2; The following pattern variant succeeds with 11+ and fails with 10-branch: diff --git a/gcc/testsuite/gfortran.dg/reshape_8.f90 b/gcc/testsuite/gfortran.dg/reshape_8.f90 index 01799ac5c19..56812124cb8 100644 --- a/gcc/testsuite/gfortran.dg/reshape_8.f90 +++ b/gcc/testsuite/gfortran.dg/reshape_8.f90 @@ -11,4 +11,4 @@ program test a =3D reshape([1,2,3,4], [2,0]) print *, a end -! { dg-final { scan-tree-dump-times "data" 4 "original" } } +! { dg-final { scan-tree-dump-not "data..0. =3D" "original" } } This should be safe enough...=