From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from smtp.smtpout.orange.fr (smtp01.smtpout.orange.fr [80.12.242.123]) by sourceware.org (Postfix) with ESMTPS id D09AC3858C53 for ; Tue, 26 Apr 2022 18:35:04 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.1 sourceware.org D09AC3858C53 Authentication-Results: sourceware.org; dmarc=none (p=none dis=none) header.from=orange.fr Authentication-Results: sourceware.org; spf=none smtp.mailfrom=orange.fr Received: from [192.168.1.17] ([86.253.179.215]) by smtp.orange.fr with ESMTPA id jQ1enc7KPiK8njQ1en529J; Tue, 26 Apr 2022 20:35:03 +0200 X-ME-Helo: [192.168.1.17] X-ME-Auth: MDU4MTIxYWM4YWI0ZGE4ZTUwZWZmNTExZmI2ZWZlMThkM2ZhYiE5OWRkOGM= X-ME-Date: Tue, 26 Apr 2022 20:35:03 +0200 X-ME-IP: 86.253.179.215 Content-Type: multipart/mixed; boundary="------------vEdeg8yk5smvmNWNTlAnK1xR" Message-ID: Date: Tue, 26 Apr 2022 20:35:02 +0200 MIME-Version: 1.0 User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:91.0) Gecko/20100101 Thunderbird/91.8.0 From: Mikael Morin Subject: [PATCH] fortran: Compare non-constant bound expressions. [PR105379] To: gcc-patches , gfortran Content-Language: fr X-Spam-Status: No, score=-9.6 required=5.0 tests=BAYES_00, FREEMAIL_FROM, GIT_PATCH_0, KAM_DMARC_STATUS, KAM_LAZY_DOMAIN_SECURITY, RCVD_IN_DNSWL_NONE, RCVD_IN_MSPIKE_H2, SPF_HELO_NONE, SPF_NONE, TXREP 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: Tue, 26 Apr 2022 18:35:09 -0000 This is a multi-part message in MIME format. --------------vEdeg8yk5smvmNWNTlAnK1xR Content-Type: text/plain; charset=UTF-8; format=flowed Content-Transfer-Encoding: 7bit Hello, this fixes a regression caused by my recent PR103662 patch. Regression tested on x86_64-pc-linux-gnu. OK for master? --------------vEdeg8yk5smvmNWNTlAnK1xR Content-Type: text/x-patch; charset=UTF-8; name="0001-fortran-Compare-non-constant-bound-expressions.-PR10.patch" Content-Disposition: attachment; filename*0="0001-fortran-Compare-non-constant-bound-expressions.-PR10.pa"; filename*1="tch" Content-Transfer-Encoding: base64 RnJvbSBkNzMwOWE0NzFjNDJlNTFlODRjMzdkNWQ0YTNmZDViYjBlZDY3NDA1IE1vbiBTZXAg MTcgMDA6MDA6MDAgMjAwMQpGcm9tOiBNaWthZWwgTW9yaW4gPG1pa2FlbEBnY2MuZ251Lm9y Zz4KRGF0ZTogTW9uLCAyNSBBcHIgMjAyMiAxOTo0NzowNCArMDIwMApTdWJqZWN0OiBbUEFU Q0hdIGZvcnRyYW46IENvbXBhcmUgbm9uLWNvbnN0YW50IGJvdW5kIGV4cHJlc3Npb25zLiBb UFIxMDUzNzldCgpTdGFydGluZyB3aXRoIHIxMi04MjM1LWdmYTVjZDcxMDJkYTY3NmRjYjE3 NTdiMTI4ODQyMWY1ZjM0MzlhZTBlLApjbGFzcyBkZXNjcmlwdG9yIHR5cGVzIGFyZSBjb21w YXJlZCB0byBkZXRlY3QgZHVwbGljYXRlIGRlY2xhcmF0aW9ucy4KClRoaXMgY2F1c2VkIElD RXMgYXMgdGhlIGNvbXBhcmlzb24gb2YgYXJyYXkgc3BlYyBzdXBwb3J0ZWQgb25seSBjb25z dGFudApleHBsaWNpdCBib3VuZHMsIGJ1dCBkdW1teSBjbGFzcyB2YXJpYWJsZSBkZXNjcmlw dG9yIHR5cGVzIGNhbiBoYXZlIGEKX2RhdGEgZmllbGQgd2l0aCBub24tY29uc3RhbnQgYXJy YXkgc3BlYyBib3VuZHMuCgpUaGlzIGNoYW5nZSBhZGRzIHN1cHBvcnQgZm9yIG5vbi1jb25z dGFudCBib3VuZHMuICBGb3IgdGhhdCwKZ2ZjX2RlcF9jb21wYXJlX2V4cHIgaXMgdXNlZC4g IEl0IGRvZXMgcHJvYmFibHkgbW9yZSB0aGFuIHN0cmljdGx5Cm5lY2Vzc2FyeSwgYnV0IHVz aW5nIGl0IGF2b2lkcyByZXdyaXRpbmcgYSBzcGVjaWZpYyBjb21wYXJpc29uIGZ1bmN0aW9u LAptYWtpbmcgbWlzdGFrZXMgYW5kIGZvcmdldHRpbmcgY2FzZXMuCgoJUFIgZm9ydHJhbi8x MDM2NjIKCVBSIGZvcnRyYW4vMTA1Mzc5CgpnY2MvZm9ydHJhbi9DaGFuZ2VMb2c6CgoJKiBh cnJheS5jYyAoY29tcGFyZV9ib3VuZHMpOiBVc2UgYm9vbCBhcyByZXR1cm4gdHlwZS4KCVN1 cHBvcnQgbm9uLWNvbnN0YW50IGV4cHJlc3Npb25zLgoJKGdmY19jb21wYXJlX2FycmF5X3Nw ZWMpOiBVcGRhdGUgY2FsbCB0byBjb21wYXJlX2JvdW5kcy4KCmdjYy90ZXN0c3VpdGUvQ2hh bmdlTG9nOgoKCSogZ2ZvcnRyYW4uZGcvY2xhc3NfZHVtbXlfOC5mOTA6IE5ldyB0ZXN0LgoJ KiBnZm9ydHJhbi5kZy9jbGFzc19kdW1teV85LmY5MDogTmV3IHRlc3QuCi0tLQogZ2NjL2Zv cnRyYW4vYXJyYXkuY2MgICAgICAgICAgICAgICAgICAgICAgICB8IDI3ICsrKysrKysrKysr Ky0tLS0tLS0tLQogZ2NjL3Rlc3RzdWl0ZS9nZm9ydHJhbi5kZy9jbGFzc19kdW1teV84LmY5 MCB8IDIwICsrKysrKysrKysrKysrKwogZ2NjL3Rlc3RzdWl0ZS9nZm9ydHJhbi5kZy9jbGFz c19kdW1teV85LmY5MCB8IDIwICsrKysrKysrKysrKysrKwogMyBmaWxlcyBjaGFuZ2VkLCA1 NiBpbnNlcnRpb25zKCspLCAxMSBkZWxldGlvbnMoLSkKIGNyZWF0ZSBtb2RlIDEwMDY0NCBn Y2MvdGVzdHN1aXRlL2dmb3J0cmFuLmRnL2NsYXNzX2R1bW15XzguZjkwCiBjcmVhdGUgbW9k ZSAxMDA2NDQgZ2NjL3Rlc3RzdWl0ZS9nZm9ydHJhbi5kZy9jbGFzc19kdW1teV85LmY5MAoK ZGlmZiAtLWdpdCBhL2djYy9mb3J0cmFuL2FycmF5LmNjIGIvZ2NjL2ZvcnRyYW4vYXJyYXku Y2MKaW5kZXggOTBlYTgxMmQ2OTkuLmJiZGI1YjM5MmZjIDEwMDY0NAotLS0gYS9nY2MvZm9y dHJhbi9hcnJheS5jYworKysgYi9nY2MvZm9ydHJhbi9hcnJheS5jYwpAQCAtOTU3LDIzICs5 NTcsMjggQEAgZ2ZjX2NvcHlfYXJyYXlfc3BlYyAoZ2ZjX2FycmF5X3NwZWMgKnNyYykKIH0K IAogCi0vKiBSZXR1cm5zIG5vbnplcm8gaWYgdGhlIHR3byBleHByZXNzaW9ucyBhcmUgZXF1 YWwuICBPbmx5IGhhbmRsZXMgaW50ZWdlcgotICAgY29uc3RhbnRzLiAgKi8KKy8qIFJldHVy bnMgbm9uemVybyBpZiB0aGUgdHdvIGV4cHJlc3Npb25zIGFyZSBlcXVhbC4KKyAgIFdlIHNo b3VsZCBub3QgbmVlZCB0byBzdXBwb3J0IG1vcmUgdGhhbiBjb25zdGFudCB2YWx1ZXMsIGFz IHRoYXTigJlzIHdoYXQgaXMKKyAgIGFsbG93ZWQgaW4gZGVyaXZlZCB0eXBlIGNvbXBvbmVu dCBhcnJheSBzcGVjLiAgSG93ZXZlciwgd2UgbWF5IGNyZWF0ZSB0eXBlcworICAgd2l0aCBu b24tY29uc3RhbnQgYXJyYXkgc3BlYyBmb3IgZHVtbXkgdmFyaWFibGUgY2xhc3MgY29udGFp bmVyIHR5cGVzLCBmb3IKKyAgIHdoaWNoIHRoZSBfZGF0YSBjb21wb25lbnQgaG9sZHMgdGhl IGFycmF5IHNwZWMgb2YgdGhlIHZhcmlhYmxlIGRlY2xhcmF0aW9uLgorICAgU28gd2UgaGF2 ZSB0byBzdXBwb3J0IG5vbi1jb25zdGFudCBib3VuZHMgYXMgd2VsbC4gICovCiAKLXN0YXRp YyBpbnQKK3N0YXRpYyBib29sCiBjb21wYXJlX2JvdW5kcyAoZ2ZjX2V4cHIgKmJvdW5kMSwg Z2ZjX2V4cHIgKmJvdW5kMikKIHsKICAgaWYgKGJvdW5kMSA9PSBOVUxMIHx8IGJvdW5kMiA9 PSBOVUxMCi0gICAgICB8fCBib3VuZDEtPmV4cHJfdHlwZSAhPSBFWFBSX0NPTlNUQU5UCi0g ICAgICB8fCBib3VuZDItPmV4cHJfdHlwZSAhPSBFWFBSX0NPTlNUQU5UCiAgICAgICB8fCBi b3VuZDEtPnRzLnR5cGUgIT0gQlRfSU5URUdFUgogICAgICAgfHwgYm91bmQyLT50cy50eXBl ICE9IEJUX0lOVEVHRVIpCiAgICAgZ2ZjX2ludGVybmFsX2Vycm9yICgiZ2ZjX2NvbXBhcmVf YXJyYXlfc3BlYygpOiBBcnJheSBzcGVjIGNsb2JiZXJlZCIpOwogCi0gIGlmIChtcHpfY21w IChib3VuZDEtPnZhbHVlLmludGVnZXIsIGJvdW5kMi0+dmFsdWUuaW50ZWdlcikgPT0gMCkK LSAgICByZXR1cm4gMTsKLSAgZWxzZQotICAgIHJldHVybiAwOworICAvKiBXaGF0IHF1YWxp ZmllcyBhcyBpZGVudGljYWwgYm91bmRzPyAgV2UgY291bGQgcHJvYmFibHkganVzdCBjaGVj ayB0aGF0IHRoZQorICAgICBleHByZXNzaW9ucyBhcmUgZXhhY3QgY2xvbmVzLiAgV2UgYXZv aWQgcmV3cml0aW5nIGEgc3BlY2lmaWMgY29tcGFyaXNvbgorICAgICBmdW5jdGlvbiBhbmQg cmUtdXNlIGluc3RlYWQgdGhlIHJhdGhlciBpbnZvbHZlZCBnZmNfZGVwX2NvbXBhcmVfZXhw ciB3aGljaAorICAgICBpcyBqdXN0IGEgYml0IG1vcmUgcGVybWlzc2l2ZSwgYXMgaXQgY2Fu IGFsc28gZGV0ZWN0IGlkZW50aWNhbCB2YWx1ZXMgZm9yCisgICAgIHNvbWUgbWlzbWF0Y2hp bmcgZXhwcmVzc2lvbnMgKGV4dHJhIHBhcmVudGhlc2lzLCBzd2FwcGVkIG9wZXJhbmRzLCB1 bmFyeQorICAgICBwbHVzLCBldGMpLiAgSXQgcHJvYmFibHkgb25seSBtYWtlcyBhIGRpZmZl cmVuY2UgaW4gY29ybmVyIGNhc2VzLiAgKi8KKyAgcmV0dXJuIGdmY19kZXBfY29tcGFyZV9l eHByIChib3VuZDEsIGJvdW5kMikgPT0gMDsKIH0KIAogCkBAIC0xMDA2LDEwICsxMDExLDEw IEBAIGdmY19jb21wYXJlX2FycmF5X3NwZWMgKGdmY19hcnJheV9zcGVjICphczEsIGdmY19h cnJheV9zcGVjICphczIpCiAgIGlmIChhczEtPnR5cGUgPT0gQVNfRVhQTElDSVQpCiAgICAg Zm9yIChpID0gMDsgaSA8IGFzMS0+cmFuayArIGFzMS0+Y29yYW5rOyBpKyspCiAgICAgICB7 Ci0JaWYgKGNvbXBhcmVfYm91bmRzIChhczEtPmxvd2VyW2ldLCBhczItPmxvd2VyW2ldKSA9 PSAwKQorCWlmICghY29tcGFyZV9ib3VuZHMgKGFzMS0+bG93ZXJbaV0sIGFzMi0+bG93ZXJb aV0pKQogCSAgcmV0dXJuIDA7CiAKLQlpZiAoY29tcGFyZV9ib3VuZHMgKGFzMS0+dXBwZXJb aV0sIGFzMi0+dXBwZXJbaV0pID09IDApCisJaWYgKCFjb21wYXJlX2JvdW5kcyAoYXMxLT51 cHBlcltpXSwgYXMyLT51cHBlcltpXSkpCiAJICByZXR1cm4gMDsKICAgICAgIH0KIApkaWZm IC0tZ2l0IGEvZ2NjL3Rlc3RzdWl0ZS9nZm9ydHJhbi5kZy9jbGFzc19kdW1teV84LmY5MCBi L2djYy90ZXN0c3VpdGUvZ2ZvcnRyYW4uZGcvY2xhc3NfZHVtbXlfOC5mOTAKbmV3IGZpbGUg bW9kZSAxMDA2NDQKaW5kZXggMDAwMDAwMDAwMDAuLjA5NzZhNzI1ODY2Ci0tLSAvZGV2L251 bGwKKysrIGIvZ2NjL3Rlc3RzdWl0ZS9nZm9ydHJhbi5kZy9jbGFzc19kdW1teV84LmY5MApA QCAtMCwwICsxLDIwIEBACishIHsgZGctZG8gY29tcGlsZSB9CishCishIFBSIGZvcnRyYW4v MTA1Mzc5CishIFR5cGUgY29tcGFyaXNvbiBvZiBjbGFzcyBjb250YWluZXJzIHVzZWQgdG8g dHJpZ2dlciBhbiBJQ0Ugd2hlbiBvbmUgb2YgdGhlCishIGNsYXNzIGNvbnRhaW5lcnMgaGFk IGEgbm9uLWNvbnN0YW50IGFycmF5IHNwZWMuCishCishIENvbnRyaWJ1dGVkIGJ5IEdlcmhh cmQgU3RlaW5tZXR6IDxnc2NmcUB0LW9ubGluZS5kZT4uCisKK3Byb2dyYW0gcAorICAgdHlw ZSB0CisgICBlbmQgdHlwZQorY29udGFpbnMKKyAgIHN1YnJvdXRpbmUgczEoeCkKKyAgICAg IGNsYXNzKHQpIDo6IHgoMykKKyAgIGVuZAorICAgc3Vicm91dGluZSBzMihuLCB4KQorICAg ICAgaW50ZWdlciA6OiBuCisgICAgICBjbGFzcyh0KSA6OiB4KG4pCisgICBlbmQKK2VuZApk aWZmIC0tZ2l0IGEvZ2NjL3Rlc3RzdWl0ZS9nZm9ydHJhbi5kZy9jbGFzc19kdW1teV85LmY5 MCBiL2djYy90ZXN0c3VpdGUvZ2ZvcnRyYW4uZGcvY2xhc3NfZHVtbXlfOS5mOTAKbmV3IGZp bGUgbW9kZSAxMDA2NDQKaW5kZXggMDAwMDAwMDAwMDAuLjBmZDk4YzA1YmUyCi0tLSAvZGV2 L251bGwKKysrIGIvZ2NjL3Rlc3RzdWl0ZS9nZm9ydHJhbi5kZy9jbGFzc19kdW1teV85LmY5 MApAQCAtMCwwICsxLDIwIEBACishIHsgZGctZG8gY29tcGlsZSB9CishCishIFBSIGZvcnRy YW4vMTA1Mzc5CishIFR5cGUgY29tcGFyaXNvbiBvZiBjbGFzcyBjb250YWluZXJzIHVzZWQg dG8gdHJpZ2dlciBhbiBJQ0Ugd2hlbiBvbmUgb2YgdGhlCishIGNsYXNzIGNvbnRhaW5lcnMg aGFkIGEgbm9uLWNvbnN0YW50IGFycmF5IHNwZWMuCishCishIENvbnRyaWJ1dGVkIGJ5IEdl cmhhcmQgU3RlaW5tZXR6IDxnc2NmcUB0LW9ubGluZS5kZT4uCisKK3Byb2dyYW0gcAorICAg dHlwZSB0CisgICBlbmQgdHlwZQorICAgaW50ZWdlciA6OiBtID0gMworY29udGFpbnMKKyAg IHN1YnJvdXRpbmUgczEoeCkKKyAgICAgIGNsYXNzKHQpIDo6IHgoMykKKyAgIGVuZAorICAg c3Vicm91dGluZSBzMyh4KQorICAgICAgY2xhc3ModCkgOjogeChtKQorICAgZW5kCitlbmQK LS0gCjIuMzUuMQoK --------------vEdeg8yk5smvmNWNTlAnK1xR--