From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gcc-bugzilla@gcc.gnu.org>
Received: by sourceware.org (Postfix, from userid 48)
	id 8BDB73858D20; Sun,  7 Apr 2024 18:12:38 +0000 (GMT)
DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 8BDB73858D20
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gcc.gnu.org;
	s=default; t=1712513558;
	bh=wwDmfAiBc8QuG/NHOkI5JCxZsADGL2/9eLNSuBpgfEc=;
	h=From:To:Subject:Date:In-Reply-To:References:From;
	b=FpM3LDuayRo1WD0FGnLJ6nCWZsdZrSKx8akp/SVXvqJ7G9WPVRvl6VWkLveBQvI+C
	 Z5AX2+NpYAsLN65y1U6Ie7PnTbGLyWNnJo9yLGyZKUUTfOn7B8D798v+5Z7iZrPubT
	 WaSrVPblpRLVw2CMXo7rF/MUw+iVKiRMm+11P450=
From: "cvs-commit at gcc dot gnu.org" <gcc-bugzilla@gcc.gnu.org>
To: gcc-bugs@gcc.gnu.org
Subject: [Bug fortran/114474] [11/12/13/14 Regression] DATA statement with
 derived type, pointer component rejected
Date: Sun, 07 Apr 2024 18:12:38 +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: 14.0
X-Bugzilla-Keywords: rejects-valid
X-Bugzilla-Severity: normal
X-Bugzilla-Who: cvs-commit at gcc dot gnu.org
X-Bugzilla-Status: ASSIGNED
X-Bugzilla-Resolution: 
X-Bugzilla-Priority: P4
X-Bugzilla-Assigned-To: anlauf at gcc dot gnu.org
X-Bugzilla-Target-Milestone: 11.5
X-Bugzilla-Flags: 
X-Bugzilla-Changed-Fields: 
Message-ID: <bug-114474-4-7PUqGUOl6y@http.gcc.gnu.org/bugzilla/>
In-Reply-To: <bug-114474-4@http.gcc.gnu.org/bugzilla/>
References: <bug-114474-4@http.gcc.gnu.org/bugzilla/>
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: <gcc-bugs.sourceware.org>

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=3D114474

--- Comment #6 from GCC Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-12 branch has been updated by Harald Anlauf
<anlauf@gcc.gnu.org>:

https://gcc.gnu.org/g:88abe04de2f16f773126f3908632a27568330cc9

commit r12-10314-g88abe04de2f16f773126f3908632a27568330cc9
Author: Harald Anlauf <anlauf@gmx.de>
Date:   Wed Mar 27 21:18:04 2024 +0100

    Fortran: fix DATA and derived types with pointer components [PR114474]

    When matching actual arguments in match_actual_arg, these are initially
    treated as a possible dummy procedure, assuming that the correct type is
    determined later.  This resolution could fail when the procedure is a
    derived type constructor with a pointer component and appears in a DATA
    statement, where the pointer shall be associated with an initial data
    target.  Check for those cases where the type obviously has not been
    resolved yet, and which were missed because there was no component
    reference.

    gcc/fortran/ChangeLog:

            PR fortran/114474
            * primary.cc (gfc_variable_attr): Catch variables used in struc=
ture
            constructors within DATA statements that are still tagged with a
            temporary type BT_PROCEDURE from match_actual_arg and which have
the
            target attribute, and fix their typespec.

    gcc/testsuite/ChangeLog:

            PR fortran/114474
            * gfortran.dg/data_pointer_3.f90: New test.

    (cherry picked from commit bbb7c513dddc5c9b2d5e9b78bc1c2f85a0cfe07e)=