From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mout.gmx.net (mout.gmx.net [212.227.17.20]) by sourceware.org (Postfix) with ESMTPS id 1FB073858D28; Sun, 20 Feb 2022 19:31:13 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.1 sourceware.org 1FB073858D28 X-UI-Sender-Class: 01bb95c1-4bf8-414a-932a-4f6e2808ef9c Received: from [192.168.178.29] ([79.251.7.181]) by mail.gmx.net (mrgmx105 [212.227.17.168]) with ESMTPSA (Nemesis) id 1Mj8mb-1nrsok34dh-00f74N; Sun, 20 Feb 2022 20:31:11 +0100 Message-ID: <477a332e-7baf-1d2d-3eef-f348c1cb016d@gmx.de> Date: Sun, 20 Feb 2022 20:31:10 +0100 MIME-Version: 1.0 User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:91.0) Gecko/20100101 Thunderbird/91.5.0 Subject: *Ping* [PATCH] PR fortran/77693 - ICE in rtl_for_decl_init, at dwarf2out.c:17378 Content-Language: en-US To: fortran , gcc-patches Newsgroups: gmane.comp.gcc.patches,gmane.comp.gcc.fortran References: From: Harald Anlauf In-Reply-To: Content-Type: text/plain; charset=UTF-8; format=flowed Content-Transfer-Encoding: quoted-printable X-Provags-ID: V03:K1:0j4YzGZzMMng1cZ5H9bB12SpdmVe3SeHbR9FieBKBqWkTX0/p3J /SVl7AVLOhuDQMkqSWGrRiGUqrU6E+ukQrU0mGDmeIUNtqf93TWn9lQK/Dv2+LMQt55CCGx WHQUXQGl9eWKiarrvPnQzjhKVil1QrGNw4DNunwBUx0NY1macU3wiJg9n2eXPX9Q0gO+FPR A04fE62QKFtdVtt2vhTQQ== X-UI-Out-Filterresults: notjunk:1;V03:K0:oD0oHgvJ2Io=:pr/8ud66Qp+f7pQKbx7Q28 xy8bi4yHNtKchdOb3ji9JjuOai31KOrl5feRlVkP+KI4hUhESz268PxVLXRJLS/g9Xs6SuMMe m9EiwCo6Ny2XmgEIbSX58ChGz9AUzLV9Z+0WAX+/ZyyOy4MiakML4HM/sLi2N3is2myVgrtxa WtGPezYyvKGHafG32LF9at4qRiIIlqBkiqe10cMNhqrTlFY5Zun53AOjqGn96nf8UgKGeN6sO VLdNUdGzno60AYI36/qAfD95hW6wUb8KrJ93lU1a6qCd/ddaSAG7wwURmSqtvyGjQOjAgeEwm ugr+JIreZ83dqSnqI9y5an9Me5knn0goE8Vd21qPFI1XoaUCY9O2+XCQEv4KzibiJ++Jmm4WZ L6YKk0vw+cZsvdw1TNEOjgnoAls102krR4tYyyWvpunXI5jNfcRHEk0eNlOhRvK1xQr1XTcR/ XKQ2GIpaREIMO0T1/p2GUycpgPEytCa3RbgKoVsajhf2cqx6/fkFrZi3S96eU2z0OFknwTcdf /1xusz5QszkLy2LbNskFPxWqERmFvs7F+Q4uIgRVKgpxPAlC0zCiArrVPqqu+BsPCEeDZ+MqS cRBPP/g8UMaOe531iOQgfbaLT1TL+CChFFSDJ/0+CAHXwqK8FZvrhKMrCidbNZbHYwpcEGToo gqDSZL0mBxFeD5hju4KNfaiXLaLYeSNy+BomLyptPTbnH8c//LcesVmHZL27KeEzTzCBmgLKy vOCiGdKmJHn+QBWdz6JaAc2mJKkZkJ5gdTobeWt84lfMb+hftUOh/XIjOeJn5SnT0W18pdszi HtfdVJdhTekeOEM0glPf6h7iDRSvymNwZ17/P2ltxgoewwaWS+FT2uMNN7hUZZVuOrrwHPx+s rsCeRnbT50dkN90DA8u0z+9qMJ57TujDPqgzBJQaOw3ivF//d104FTVfaqdwCE32MdEF10s+8 UShkHyl2Fr3MXHeU+LCDAAwQU7m71gZXEy1oXBjICR0bxAmlYCBHG9+JBWkJfQiDS2Ajx+AfV v62mYmz4e5Ff1Ga6PkMM4f1O26ViHbF2mdp1of6mUjqsCVumTzzW987HxtQCULO8Iic4zaYgl /b48DgkgTArHgg= X-Spam-Status: No, score=-4.4 required=5.0 tests=BAYES_00, DKIM_SIGNED, DKIM_VALID, FREEMAIL_FROM, KAM_NUMSUBJECT, RCVD_IN_DNSWL_LOW, RCVD_IN_MSPIKE_H2, SPF_HELO_NONE, SPF_PASS, TXREP, T_SCC_BODY_TEXT_LINE autolearn=ham autolearn_force=no version=3.4.4 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on server2.sourceware.org X-BeenThere: fortran@gcc.gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Fortran mailing list List-Unsubscribe: , List-Archive: List-Help: List-Subscribe: , X-List-Received-Date: Sun, 20 Feb 2022 19:31:14 -0000 Am 09.02.22 um 22:11 schrieb Harald Anlauf via Gcc-patches: > Dear all, > > as we did not properly check the initialization of pointers in > DATA statements for valid initial data targets, we could either > ICE or generate wrong code. Testcase based on Gerhard's, BTW. > > The attached patch adds a check in gfc_assign_data_value by > calling gfc_check_pointer_assign, as the latter did not get > called otherwise. > > Along the course I introduced a new macro IS_POINTER() that > should help to make the code more readable whenever we need > to check the attributes of a symbol to see whether it is a > pointer, CLASS or not. At least it may save some typing in > the future. > > Regtested on x86_64-pc-linux-gnu. OK for mainline? > > Thanks, > Harald >