From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mout.gmx.net (mout.gmx.net [212.227.17.21]) by sourceware.org (Postfix) with ESMTPS id 5123A385840A; Wed, 11 Oct 2023 19:44:26 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.2 sourceware.org 5123A385840A Authentication-Results: sourceware.org; dmarc=pass (p=none dis=none) header.from=gmx.de Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=gmx.de DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=gmx.de; s=s31663417; t=1697053465; x=1697658265; i=anlauf@gmx.de; bh=CCmg77tQddWZXdqLd9NW8CEejd7n82TZ56byCoQlo+4=; h=X-UI-Sender-Class:Date:Subject:From:To:References:In-Reply-To; b=ME5+YIcHEozV6VfU1z0+rH80+hVIaLFF5NSfZCbIk5djaOnwVmrE8oqoB9e9bOjvVyIpqgd1m+p ulcOHw2aemAY/A4NwI4XesfZcXQonue3iEokj4sOAbt1vAHKszRpWiBBgPgNHd6DRu49yzjdU/N9y Qt/t7dTgQgkmKKZBbhyk4MUQG2TQz5fFeN6YA4CWOoGlMz1OfEnyuSrcqBQZTcc0gMMlj8OFAyBHT GcK2L3IL3piNkhgUBpPiY2QA2NjI6VDeReRso+BXgFmIRqFUm53NrqW6KI0KbllwTxMY6Smm0OjR7 ay1+TPJjpZNSNmjzKT+li5FO1uGdETW0uT/Q== X-UI-Sender-Class: 724b4f7f-cbec-4199-ad4e-598c01a50d3a Received: from [192.168.178.29] ([79.251.14.159]) by mail.gmx.net (mrgmx105 [212.227.17.168]) with ESMTPSA (Nemesis) id 1N33ET-1rZn0P3RZV-013K79; Wed, 11 Oct 2023 21:44:24 +0200 Content-Type: multipart/mixed; boundary="------------GAJWr00dcxZoDWsztd6pvMoG" Message-ID: <104b9c70-5222-4d90-a1de-84ac3bee6258@gmx.de> Date: Wed, 11 Oct 2023 21:44:24 +0200 MIME-Version: 1.0 User-Agent: Mozilla Thunderbird Subject: Re: [PATCH] Fortran: name conflict between internal procedure and derived type [PR104351] From: Harald Anlauf To: fortran , gcc-patches Newsgroups: gmane.comp.gcc.patches,gmane.comp.gcc.fortran References: Content-Language: en-US In-Reply-To: X-Provags-ID: V03:K1:eSsBsx6hZtnRoDVw4N4087QjYor98vLchrU5TNCO5vngtaCUf+m f8gEMmvaK6Xnrcl5wz4EBMooUr7Bu+ExRZyiuoENxrzhfznEZxbN+C5Q2nPbyQ/JLZglQKu CWb259i36CziOCelZO4v/EYEDk11l7arBvc5xQiU4sloqslUGNQG2VMrZYK8Us7LMjPz8+K pETaiwIHXrX1OQlWVEKnw== UI-OutboundReport: notjunk:1;M01:P0:wbVOGpB/Ryw=;PW4DdpTRq1oIB46KZ4pinMdv2G+ uCsOaOliU9fPP2ii7dEh2y0mRcD3O5EAr2snz/yeP23j0SbGfDrCzmMkKWSBCzymGs6IdRKpJ JiDHauY8JjDJ54BiBluV9HeHgRP11s53VBthJygMJ3Vb0BkzxLZ5INXnN3lI4uG7NQMIR3uhw iESC09eGt60qIFKDDqec16BHp1a0Rg0qshR+jvs9MN/sPyT/x/qV5BukynR1aawtF7Higtc/M h6WxM+B5P/7KRQ2UoGze3ZWgMD94w7DAnciVEuhiu7/SS8JFwy08G8fsYIP4rD2/S5JZ7NNtf cz0+RsrIKaEgjtrKwZYfqFR0YupnQDHQhSgnY+6zXKmvLhQn1MXOqaxWZsObTLNoKBWNSKwU8 A9DJR5RonlRJElBhC+wwN8GC2yx6fv6FAENaXzW1MmS/4P09Atd7xiIAuzTuYg3sxtWFYC3qq 1d2CUCVPq5+qxSTw1iwfABMoKdM/EFJii6TmoOD8AyGaGyEM+JJDLvWNtN/0M/yDwrQE5zKq9 nuZZzK2/7X3CWDeqcVdv5zx+K9qIuguvh7slEXRZ4iLju7l3lfEsrQHU9ZZrEledB0SgMoZrk sXvfwlaKRG320fW0V06t3S8ZmaD7l37BQKJBnHEQsmNHZpW5WPrIFqcXZPPE1dgRhRZCFJkzl TbI6glMudB4/XDurJkLUjr0m3QtpiWfLVTKCIgG1ejO1Ys27Cp2FG5K+RgD51tzV0TG++VDfx m1+DgXbKehaF0aNSb7YAJAYHMrzmZ1GxM45+l73C8+zz20ZV/u04yCh9/hys5nKwBHR4WG+ZY ECfB7b9E9PVubXtgkFSPj+uNzFkPeInx2Lg/JJ/pGwuz7WxFuLoUPvZxzDtVZ5WTjbUVJUFCi eLDlsX58s6k5f/DYqk2Hf/MRufDcjrhFMNjmZypdlQxzl3TX9YIuoxp0+3GQGQUqZ6gs6HBXi N+TcqRWViN4WE06aAUnjLQ2YZLs= X-Spam-Status: No, score=-11.7 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_H4,RCVD_IN_MSPIKE_WL,SPF_HELO_NONE,SPF_PASS,TXREP autolearn=ham autolearn_force=no version=3.4.6 X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on server2.sourceware.org List-Id: This is a multi-part message in MIME format. --------------GAJWr00dcxZoDWsztd6pvMoG Content-Type: text/plain; charset=UTF-8; format=flowed Content-Transfer-Encoding: quoted-printable Dear All, sorry for attaching the wrong patch - this time it is the correct one! Harald On 10/11/23 21:39, Harald Anlauf wrote: > Dear All, > > the attached trivial patch fixes (=3D catches) a forgotten corner-case > in the detection of a name conflict between an internal procedure and > a local declaration for the case that the latter is a derived type. > Another torture test by Gerhard... ;-) Used to ICE previously. > > Regtested on x86_64-pc-linux-gnu. OK for mainline? > > Thanks, > Harald > --------------GAJWr00dcxZoDWsztd6pvMoG Content-Type: text/x-patch; charset=UTF-8; name="pr104351.diff" Content-Disposition: attachment; filename="pr104351.diff" Content-Transfer-Encoding: base64 RnJvbSA4NGRlMDNjOTdmODk5ZGY5MWYyYjdlN2FmNGE1YmJjMDk0MTJhM2ZlIE1vbiBTZXAg MTcgMDA6MDA6MDAgMjAwMQpGcm9tOiBIYXJhbGQgQW5sYXVmIDxhbmxhdWZAZ214LmRlPgpE YXRlOiBXZWQsIDExIE9jdCAyMDIzIDIxOjI5OjM1ICswMjAwClN1YmplY3Q6IFtQQVRDSF0g Rm9ydHJhbjogbmFtZSBjb25mbGljdCBiZXR3ZWVuIGludGVybmFsIHByb2NlZHVyZSBhbmQg ZGVyaXZlZAogdHlwZSBbUFIxMDQzNTFdCgpnY2MvZm9ydHJhbi9DaGFuZ2VMb2c6CgoJUFIg Zm9ydHJhbi8xMDQzNTEKCSogZGVjbC5jYyAoZ2V0X3Byb2NfbmFtZSk6IEV4dGVuZCBuYW1l IGNvbmZsaWN0IGRldGVjdGlvbiBiZXR3ZWVuCglpbnRlcm5hbCBwcm9jZWR1cmUgYW5kIHBy ZXZpb3VzIGRlY2xhcmF0aW9uIGFsc28gdG8gZGVyaXZlZCB0eXBlLgoKZ2NjL3Rlc3RzdWl0 ZS9DaGFuZ2VMb2c6CgoJUFIgZm9ydHJhbi8xMDQzNTEKCSogZ2ZvcnRyYW4uZGcvZGVyaXZl ZF9mdW5jdGlvbl9pbnRlcmZhY2VfMS5mOTA6IEFkanVzdCBwYXR0ZXJuLgoJKiBnZm9ydHJh bi5kZy9wcjEwNDM1MS5mOTA6IE5ldyB0ZXN0LgotLS0KIGdjYy9mb3J0cmFuL2RlY2wuY2Mg ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHwgIDQgKysrLQogLi4uL2dmb3J0cmFu LmRnL2Rlcml2ZWRfZnVuY3Rpb25faW50ZXJmYWNlXzEuZjkwICAgfCAgMiArLQogZ2NjL3Rl c3RzdWl0ZS9nZm9ydHJhbi5kZy9wcjEwNDM1MS5mOTAgICAgICAgICAgICAgfCAxNCArKysr KysrKysrKysrKwogMyBmaWxlcyBjaGFuZ2VkLCAxOCBpbnNlcnRpb25zKCspLCAyIGRlbGV0 aW9ucygtKQogY3JlYXRlIG1vZGUgMTAwNjQ0IGdjYy90ZXN0c3VpdGUvZ2ZvcnRyYW4uZGcv cHIxMDQzNTEuZjkwCgpkaWZmIC0tZ2l0IGEvZ2NjL2ZvcnRyYW4vZGVjbC5jYyBiL2djYy9m b3J0cmFuL2RlY2wuY2MKaW5kZXggNGEzYzViODZkZTAuLmJkZDNiZTMyYTQ2IDEwMDY0NAot LS0gYS9nY2MvZm9ydHJhbi9kZWNsLmNjCisrKyBiL2djYy9mb3J0cmFuL2RlY2wuY2MKQEAg LTE0MDQsNyArMTQwNCw5IEBAIGdldF9wcm9jX25hbWUgKGNvbnN0IGNoYXIgKm5hbWUsIGdm Y19zeW1ib2wgKipyZXN1bHQsIGJvb2wgbW9kdWxlX2Zjbl9lbnRyeSkKICAgICAgIC8qIFRy YXAgZGVjbGFyYXRpb25zIG9mIGF0dHJpYnV0ZXMgaW4gZW5jb21wYXNzaW5nIHNjb3BlLiAg VGhlCiAJIHNpZ25hdHVyZSBmb3IgdGhpcyBpcyB0aGF0IHRzLmtpbmQgaXMgbm9uemVybyBm b3Igbm8tQ0xBU1MKIAkgZW50aXR5LiAgRm9yIGEgQ0xBU1MgZW50aXR5LCB0cy5raW5kIGlz IHplcm8uICAqLwotICAgICAgaWYgKChzeW0tPnRzLmtpbmQgIT0gMCB8fCBzeW0tPnRzLnR5 cGUgPT0gQlRfQ0xBU1MpCisgICAgICBpZiAoKHN5bS0+dHMua2luZCAhPSAwCisJICAgfHwg c3ltLT50cy50eXBlID09IEJUX0NMQVNTCisJICAgfHwgc3ltLT50cy50eXBlID09IEJUX0RF UklWRUQpCiAJICAmJiAhc3ltLT5hdHRyLmltcGxpY2l0X3R5cGUKIAkgICYmIHN5bS0+YXR0 ci5wcm9jID09IDAKIAkgICYmIGdmY19jdXJyZW50X25zLT5wYXJlbnQgIT0gTlVMTApkaWZm IC0tZ2l0IGEvZ2NjL3Rlc3RzdWl0ZS9nZm9ydHJhbi5kZy9kZXJpdmVkX2Z1bmN0aW9uX2lu dGVyZmFjZV8xLmY5MCBiL2djYy90ZXN0c3VpdGUvZ2ZvcnRyYW4uZGcvZGVyaXZlZF9mdW5j dGlvbl9pbnRlcmZhY2VfMS5mOTAKaW5kZXggMjRhMDA5NTA5MTIuLjU0MzhhZDQ5YzZhIDEw MDY0NAotLS0gYS9nY2MvdGVzdHN1aXRlL2dmb3J0cmFuLmRnL2Rlcml2ZWRfZnVuY3Rpb25f aW50ZXJmYWNlXzEuZjkwCisrKyBiL2djYy90ZXN0c3VpdGUvZ2ZvcnRyYW4uZGcvZGVyaXZl ZF9mdW5jdGlvbl9pbnRlcmZhY2VfMS5mOTAKQEAgLTM4LDcgKzM4LDcgQEAgZW5kIGZ1bmN0 aW9uIGV4dF9mdW4KIAogY29udGFpbnMKIAotICB0eXBlKGZvbykgZnVuY3Rpb24gZnVuKCkg ISB7IGRnLWVycm9yICJhbHJlYWR5IGhhcyBhbiBleHBsaWNpdCBpbnRlcmZhY2UiIH0KKyAg dHlwZShmb28pIGZ1bmN0aW9uIGZ1bigpICEgeyBkZy1lcnJvciAiaGFzIGFuIGV4cGxpY2l0 IGludGVyZmFjZSIgfQogICBlbmQgZnVuY3Rpb24gZnVuICAhIHsgZGctZXJyb3IgIkV4cGVj dGluZyBFTkQgUFJPR1JBTSIgfQogCiBlbmQKZGlmZiAtLWdpdCBhL2djYy90ZXN0c3VpdGUv Z2ZvcnRyYW4uZGcvcHIxMDQzNTEuZjkwIGIvZ2NjL3Rlc3RzdWl0ZS9nZm9ydHJhbi5kZy9w cjEwNDM1MS5mOTAKbmV3IGZpbGUgbW9kZSAxMDA2NDQKaW5kZXggMDAwMDAwMDAwMDAuLjg2 YjQ3ZTAzMzQwCi0tLSAvZGV2L251bGwKKysrIGIvZ2NjL3Rlc3RzdWl0ZS9nZm9ydHJhbi5k Zy9wcjEwNDM1MS5mOTAKQEAgLTAsMCArMSwxNCBAQAorISB7IGRnLWRvIGNvbXBpbGUgfQor ISBQUiBmb3J0cmFuLzEwNDM1MQorISBDb250cmlidXRlZCBieSBHLlN0ZWlubWV0egorCitw cm9ncmFtIHAKKyAgaW1wbGljaXQgbm9uZQorICB0eXBlIHQKKyAgZW5kIHR5cGUKKyAgdHlw ZSh0KSA6OiBmCitjb250YWlucworICByZWFsIGZ1bmN0aW9uIGYoKSByZXN1bHQoeikgISB7 IGRnLWVycm9yICJoYXMgYW4gZXhwbGljaXQgaW50ZXJmYWNlIiB9CisgICAgeiA9IDAuMCAg ICAgICAgICAgICAgICAgICAhIHsgZGctZXJyb3IgImFzc2lnbm1lbnQiIH0KKyAgZW5kIGZ1 bmN0aW9uIGYgICAgICAgICAgICAgICEgeyBkZy1lcnJvciAiRXhwZWN0aW5nIEVORCBQUk9H UkFNIiB9CitlbmQKLS0gCjIuMzUuMwoK --------------GAJWr00dcxZoDWsztd6pvMoG--