From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mail-lj1-x22e.google.com (mail-lj1-x22e.google.com [IPv6:2a00:1450:4864:20::22e]) by sourceware.org (Postfix) with ESMTPS id D1E0F3860C3E; Tue, 16 Mar 2021 16:42:36 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.3.2 sourceware.org D1E0F3860C3E Received: by mail-lj1-x22e.google.com with SMTP id 16so21358773ljc.11; Tue, 16 Mar 2021 09:42:36 -0700 (PDT) X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:mime-version:from:date:message-id:subject:to:cc; bh=s1xZRIWahyUoi7xamelJ3wanuupYprSmVppl/MMza74=; b=YZ53M6K8AAYKA3y1LRmVVtm2r74khCHMH8H+xa/xSP74hhI3doxsO1tD0JjFJVTPJ9 oa1/dPhONaOpYD8GQuw28AnvVg/NPFilHawLomJHH+5Udo8fAjIjM+R4r0EMWCEIt0UC 2XDZ9pgkQJqFDgJnZqAX1rGt+j1U2qYtvoT+oFqZFfuFby0eOis2j5I1ut5iL700JUIS Azl/AaXktrmjL5gZmDzCWJwTODnYzOGGSxnY27QGQGtcMO0eoSSvXDRKcm+gdTG76bM4 CnQxR4sz0lj3UBXl/uzdW69BrfHYOyMLTZT5WRsxavE/wgLgbYvoTzDsZ5t+vU8U3yKu gFUw== X-Gm-Message-State: AOAM531fmDpIR12sl7uXLoU+7QQTqbAqJj5aB5HhX5qs0UrNMIn96A3A 4+RLtd0+BXiApAsFM1FsXDbFcNc1BtOPWFGyFjrWG++++tg= X-Google-Smtp-Source: ABdhPJy76u06WBhCXCkaI/ybJOTVjrcj+rnVMvarDv4bJlqRDOQV9aWOQOeuqUaVt0yDjFcCxnYtzFpMFvnQy5shHag= X-Received: by 2002:a2e:94cc:: with SMTP id r12mr3145748ljh.373.1615912955044; Tue, 16 Mar 2021 09:42:35 -0700 (PDT) MIME-Version: 1.0 From: Paul Richard Thomas Date: Tue, 16 Mar 2021 16:42:23 +0000 Message-ID: Subject: [Patch, fortran] PR99602 - [11 regression] runtime error: pointer actual argument not associated To: "fortran@gcc.gnu.org" , gcc-patches Cc: Harald Anlauf , Juergen Reuter Content-Type: multipart/mixed; boundary="000000000000ac927b05bdaa0d4b" X-Spam-Status: No, score=-8.7 required=5.0 tests=BAYES_00, DKIM_SIGNED, DKIM_VALID, DKIM_VALID_AU, DKIM_VALID_EF, FILL_THIS_FORM, FREEMAIL_FROM, GIT_PATCH_0, HTML_MESSAGE, RCVD_IN_DNSWL_NONE, SPF_HELO_NONE, SPF_PASS, TXREP autolearn=ham autolearn_force=no version=3.4.2 X-Spam-Checker-Version: SpamAssassin 3.4.2 (2018-09-13) on server2.sourceware.org X-Content-Filtered-By: Mailman/MimeDel 2.1.29 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, 16 Mar 2021 16:42:39 -0000 --000000000000ac927b05bdaa0d4b Content-Type: text/plain; charset="UTF-8" Hi Everybody, Although this is 'obvious' I thought that I should post it because I believe that it was triggered by the fix for PR99602 but I just do not have the bandwidth at the moment to test that. The ChangeLog together with the patch is more than sufficient explanation. Regtests OK on FC33/x86_64. OK for 11-branch? Paul Fortran: Fix runtime errors for class actual arguments [PR99602]. 2021-03-16 Paul Thomas gcc/fortran PR fortran/99602 * trans-array.c (gfc_conv_procedure_call): For class formal arguments, use the _data field attributes for runtime errors. gcc/testsuite/ PR fortran/99602 * gfortran.dg/pr99602.f90: New test. --000000000000ac927b05bdaa0d4b Content-Type: text/x-fortran; charset="US-ASCII"; name="pr99602.f90" Content-Disposition: attachment; filename="pr99602.f90" Content-Transfer-Encoding: base64 Content-ID: X-Attachment-Id: f_kmc8smbv0 ISB7IGRnLWRvIGNvbXBpbGUgfQohIHsgZGctb3B0aW9ucyAiLWZjaGVjaz1wb2ludGVyIC1mZHVt cC10cmVlLW9yaWdpbmFsIiB9CiEKISBUZXN0IGZpeCBvZiBQUjk5NjAyLCB3aGVyZSBhIHNwdXJp b3VzIHJ1bnRpbWUgZXJyb3Igd2FzIGludHJvZHVjZWQKISBieSBQUjk5MTEyLiBUaGlzIGlzIHRo ZSB0ZXN0Y2FzZSBpbiBjb21tZW50ICM2IG9mIHRoZSBQUi4KIQohIENvbnRyaWJ1dGVkIGJ5IEpl dXJnZW4gUmV1dGVyICA8anVlcmdlbi5yZXV0ZXJAZGVzeS5kZT4KIQptb2R1bGUgbQogIGltcGxp Y2l0IG5vbmUKICBwcml2YXRlCiAgcHVibGljIDo6IG1fdAogIHR5cGUgOjogbV90CiAgICAgcHJp dmF0ZQogIGVuZCB0eXBlIG1fdAplbmQgbW9kdWxlIG0KCm1vZHVsZSBtMl90ZXN0YmVkCiAgdXNl IG0KICBpbXBsaWNpdCBub25lCiAgcHJpdmF0ZQogIHB1YmxpYyA6OiBwcmVwYXJlX20yCiAgcHJv Y2VkdXJlIChwcmVwYXJlX20yX3Byb2MpLCBwb2ludGVyIDo6IHByZXBhcmVfbTIgPT4gbnVsbCAo KQoKICBhYnN0cmFjdCBpbnRlcmZhY2UKICAgICBzdWJyb3V0aW5lIHByZXBhcmVfbTJfcHJvYyAo bTIpCiAgICAgICBpbXBvcnQKICAgICAgIGNsYXNzKG1fdCksIGludGVudChpbm91dCksIHBvaW50 ZXIgOjogbTIKICAgICBlbmQgc3Vicm91dGluZSBwcmVwYXJlX20yX3Byb2MKICBlbmQgaW50ZXJm YWNlCgplbmQgbW9kdWxlIG0yX3Rlc3RiZWQKCm1vZHVsZSBhCiAgdXNlIG0KICB1c2UgbTJfdGVz dGJlZCwgb25seTogcHJlcGFyZV9tMgogIGltcGxpY2l0IG5vbmUKICBwcml2YXRlCiAgcHVibGlj IDo6IGFfMQoKY29udGFpbnMKCiAgc3Vicm91dGluZSBhXzEgKCkKICAgIGNsYXNzKG1fdCksIHBv aW50ZXIgOjogbW0KICAgIG1tID0+IG51bGwgKCkKICAgIGNhbGwgcHJlcGFyZV9tMiAobW0pICEg UnVudGltZSBlcnJvciB0cmlnZ2VyZWQgaGVyZQogIGVuZCBzdWJyb3V0aW5lIGFfMQoKZW5kIG1v ZHVsZSBhCgoKbW9kdWxlIG0yCiAgdXNlIG0KICBpbXBsaWNpdCBub25lCiAgcHJpdmF0ZQogIHB1 YmxpYyA6OiBtMl90CgogIHR5cGUsIGV4dGVuZHMgKG1fdCkgOjogbTJfdAogICAgIHByaXZhdGUK ICAgY29udGFpbnMKICAgICBwcm9jZWR1cmUgOjogcmVhZCA9PiBtMl9yZWFkCiAgZW5kIHR5cGUg bTJfdApjb250YWlucwoKICBzdWJyb3V0aW5lIG0yX3JlYWQgKG1tKQogICAgY2xhc3MobTJfdCks IGludGVudChvdXQpLCB0YXJnZXQgOjogbW0KICBlbmQgc3Vicm91dGluZSBtMl9yZWFkCmVuZCBt b2R1bGUgbTIKCnByb2dyYW0gbWFpbgogIHVzZSBtMl90ZXN0YmVkCiAgdXNlIGEsIG9ubHk6IGFf MQogIGltcGxpY2l0IG5vbmUKICBwcmVwYXJlX20yID0+IHByZXBhcmVfd2hpemFyZF9tMgogIGNh bGwgYV8xICgpCgpjb250YWlucwoKICBzdWJyb3V0aW5lIHByZXBhcmVfd2hpemFyZF9tMiAobW0p CiAgICB1c2UgbQogICAgdXNlIG0yCiAgICBjbGFzcyhtX3QpLCBpbnRlbnQoaW5vdXQpLCBwb2lu dGVyIDo6IG1tCiAgICBpZiAoLm5vdC4gYXNzb2NpYXRlZCAobW0pKSAgYWxsb2NhdGUgKG0yX3Qg OjogbW0pCiAgICBzZWxlY3QgdHlwZSAobW0pCiAgICB0eXBlIGlzIChtMl90KQogICAgICAgY2Fs bCBtbSVyZWFkICgpCiAgICBlbmQgc2VsZWN0CiAgZW5kIHN1YnJvdXRpbmUgcHJlcGFyZV93aGl6 YXJkX20yCmVuZCBwcm9ncmFtIG1haW4KISB7IGRnLWZpbmFsIHsgc2Nhbi10cmVlLWR1bXAtdGlt ZXMgIl9nZm9ydHJhbl9ydW50aW1lX2Vycm9yX2F0IiAwICJvcmlnaW5hbCIgfSB9CiEgeyBkZy1m aW5hbCB7IHNjYW4tdHJlZS1kdW1wLXRpbWVzICJQb2ludGVyIGFjdHVhbCBhcmd1bWVudCIgMCAi b3JpZ2luYWwiIH0gfQo= --000000000000ac927b05bdaa0d4b Content-Type: text/x-patch; charset="US-ASCII"; name="submit.diff" Content-Disposition: attachment; filename="submit.diff" Content-Transfer-Encoding: base64 Content-ID: X-Attachment-Id: f_kmc8suwu1 ZGlmZiAtLWdpdCBhL2djYy9mb3J0cmFuL3RyYW5zLWV4cHIuYyBiL2djYy9mb3J0cmFuL3RyYW5z LWV4cHIuYwppbmRleCBiZmZlMDgwOGRmZi4uMGNmMTcwMDhiMDUgMTAwNjQ0Ci0tLSBhL2djYy9m b3J0cmFuL3RyYW5zLWV4cHIuYworKysgYi9nY2MvZm9ydHJhbi90cmFucy1leHByLmMKQEAgLTY2 NjMsNiArNjY2MywxNSBAQCBnZmNfY29udl9wcm9jZWR1cmVfY2FsbCAoZ2ZjX3NlICogc2UsIGdm Y19zeW1ib2wgKiBzeW0sCiAJICBjaGFyICptc2c7CiAJICB0cmVlIGNvbmQ7CiAJICB0cmVlIHRt cDsKKwkgIHN5bWJvbF9hdHRyaWJ1dGUgZnN5bV9hdHRyOworCisJICBpZiAoZnN5bSkKKwkgICAg eworCSAgICAgIGlmIChmc3ltLT50cy50eXBlID09IEJUX0NMQVNTICYmICFVTkxJTUlURURfUE9M WSAoZnN5bSkpCisJCWZzeW1fYXR0ciA9IENMQVNTX0RBVEEgKGZzeW0pLT5hdHRyOworCSAgICAg IGVsc2UKKwkJZnN5bV9hdHRyID0gZnN5bS0+YXR0cjsKKwkgICAgfQogCiAJICBpZiAoZS0+ZXhw cl90eXBlID09IEVYUFJfVkFSSUFCTEUgfHwgZS0+ZXhwcl90eXBlID09IEVYUFJfRlVOQ1RJT04p CiAJICAgIGF0dHIgPSBnZmNfZXhwcl9hdHRyIChlKTsKQEAgLTY2ODUsMTcgKzY2OTQsMTcgQEAg Z2ZjX2NvbnZfcHJvY2VkdXJlX2NhbGwgKGdmY19zZSAqIHNlLCBnZmNfc3ltYm9sICogc3ltLAog CSAgICAgIHRyZWUgcHJlc2VudCwgbnVsbF9wdHIsIHR5cGU7CiAKIAkgICAgICBpZiAoYXR0ci5h bGxvY2F0YWJsZQotCQkgICYmIChmc3ltID09IE5VTEwgfHwgIWZzeW0tPmF0dHIuYWxsb2NhdGFi bGUpKQorCQkgICYmIChmc3ltID09IE5VTEwgfHwgIWZzeW1fYXR0ci5hbGxvY2F0YWJsZSkpCiAJ CW1zZyA9IHhhc3ByaW50ZiAoIkFsbG9jYXRhYmxlIGFjdHVhbCBhcmd1bWVudCAnJXMnIGlzIG5v dCAiCiAJCQkJICJhbGxvY2F0ZWQgb3Igbm90IHByZXNlbnQiLAogCQkJCSBlLT5zeW10cmVlLT5u LnN5bS0+bmFtZSk7CiAJICAgICAgZWxzZSBpZiAoYXR0ci5wb2ludGVyCi0JCSAgICAgICAmJiAo ZnN5bSA9PSBOVUxMIHx8ICFmc3ltLT5hdHRyLnBvaW50ZXIpKQorCQkgICAgICAgJiYgKGZzeW0g PT0gTlVMTCB8fCAhZnN5bV9hdHRyLnBvaW50ZXIpKQogCQltc2cgPSB4YXNwcmludGYgKCJQb2lu dGVyIGFjdHVhbCBhcmd1bWVudCAnJXMnIGlzIG5vdCAiCiAJCQkJICJhc3NvY2lhdGVkIG9yIG5v dCBwcmVzZW50IiwKIAkJCQkgZS0+c3ltdHJlZS0+bi5zeW0tPm5hbWUpOwogCSAgICAgIGVsc2Ug aWYgKGF0dHIucHJvY19wb2ludGVyCi0JCSAgICAgICAmJiAoZnN5bSA9PSBOVUxMIHx8ICFmc3lt LT5hdHRyLnByb2NfcG9pbnRlcikpCisJCSAgICAgICAmJiAoZnN5bSA9PSBOVUxMIHx8ICFmc3lt X2F0dHIucHJvY19wb2ludGVyKSkKIAkJbXNnID0geGFzcHJpbnRmICgiUHJvYy1wb2ludGVyIGFj dHVhbCBhcmd1bWVudCAnJXMnIGlzIG5vdCAiCiAJCQkJICJhc3NvY2lhdGVkIG9yIG5vdCBwcmVz ZW50IiwKIAkJCQkgZS0+c3ltdHJlZS0+bi5zeW0tPm5hbWUpOwpAQCAtNjcxOSwxNSArNjcyOCwx NSBAQCBnZmNfY29udl9wcm9jZWR1cmVfY2FsbCAoZ2ZjX3NlICogc2UsIGdmY19zeW1ib2wgKiBz eW0sCiAgICAgICAgICAgZWxzZQogCSAgICB7CiAJICAgICAgaWYgKGF0dHIuYWxsb2NhdGFibGUK LQkJICAmJiAoZnN5bSA9PSBOVUxMIHx8ICFmc3ltLT5hdHRyLmFsbG9jYXRhYmxlKSkKKwkJICAm JiAoZnN5bSA9PSBOVUxMIHx8ICFmc3ltX2F0dHIuYWxsb2NhdGFibGUpKQogCQltc2cgPSB4YXNw cmludGYgKCJBbGxvY2F0YWJsZSBhY3R1YWwgYXJndW1lbnQgJyVzJyBpcyBub3QgIgogCQkJCSAi YWxsb2NhdGVkIiwgZS0+c3ltdHJlZS0+bi5zeW0tPm5hbWUpOwogCSAgICAgIGVsc2UgaWYgKGF0 dHIucG9pbnRlcgotCQkgICAgICAgJiYgKGZzeW0gPT0gTlVMTCB8fCAhZnN5bS0+YXR0ci5wb2lu dGVyKSkKKwkJICAgICAgICYmIChmc3ltID09IE5VTEwgfHwgIWZzeW1fYXR0ci5wb2ludGVyKSkK IAkJbXNnID0geGFzcHJpbnRmICgiUG9pbnRlciBhY3R1YWwgYXJndW1lbnQgJyVzJyBpcyBub3Qg IgogCQkJCSAiYXNzb2NpYXRlZCIsIGUtPnN5bXRyZWUtPm4uc3ltLT5uYW1lKTsKIAkgICAgICBl bHNlIGlmIChhdHRyLnByb2NfcG9pbnRlcgotCQkgICAgICAgJiYgKGZzeW0gPT0gTlVMTCB8fCAh ZnN5bS0+YXR0ci5wcm9jX3BvaW50ZXIpKQorCQkgICAgICAgJiYgKGZzeW0gPT0gTlVMTCB8fCAh ZnN5bV9hdHRyLnByb2NfcG9pbnRlcikpCiAJCW1zZyA9IHhhc3ByaW50ZiAoIlByb2MtcG9pbnRl ciBhY3R1YWwgYXJndW1lbnQgJyVzJyBpcyBub3QgIgogCQkJCSAiYXNzb2NpYXRlZCIsIGUtPnN5 bXRyZWUtPm4uc3ltLT5uYW1lKTsKIAkgICAgICBlbHNlCg== --000000000000ac927b05bdaa0d4b--