From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mail-pf1-x42c.google.com (mail-pf1-x42c.google.com [IPv6:2607:f8b0:4864:20::42c]) by sourceware.org (Postfix) with ESMTPS id 5435E3858D35; Sat, 11 Nov 2023 10:15:59 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.2 sourceware.org 5435E3858D35 Authentication-Results: sourceware.org; dmarc=pass (p=none dis=none) header.from=gmail.com Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=gmail.com ARC-Filter: OpenARC Filter v1.0.0 sourceware.org 5435E3858D35 Authentication-Results: server2.sourceware.org; arc=none smtp.remote-ip=2607:f8b0:4864:20::42c ARC-Seal: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1699697761; cv=none; b=NLt9vVteC7axe5PvCg2zOen9obwLF9I3nJzdMzY/qjbvMEz3XHZngJgWg9IY+8W7T7qVMlqjnly8v8V2TyFozBz6DAB6z6RxkzWh4RU3k3gTKhuwGOGFeksFXOFlyZeyYwAK7iSNE6qJZ8D67/IH8if22IevTC0ZTUZ6cpkm82U= ARC-Message-Signature: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1699697761; c=relaxed/simple; bh=CYRRX9geHyRqXFUHcMZAgKVfQap/XodeVPb9mnW+oiI=; h=DKIM-Signature:MIME-Version:From:Date:Message-ID:Subject:To; b=vDhs2ECw590AyPq1xQfcL2keET0GLe9NHEkh8Gi2ouZh4OZcodYZ7seK62ZgrjzKPg/v0uJISsUQ13crsv0Ld9ukYM7LHg+me8LKW4i1gT8YIczwguuQqoWh3ty83SHzQNLSNixXIbTfVz6WJqq+rUxv7Gjh8Sg7ldEyQt8QXZA= ARC-Authentication-Results: i=1; server2.sourceware.org Received: by mail-pf1-x42c.google.com with SMTP id d2e1a72fcca58-692c02adeefso2642573b3a.3; Sat, 11 Nov 2023 02:15:59 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20230601; t=1699697757; x=1700302557; darn=gcc.gnu.org; h=to:subject:message-id:date:from:mime-version:from:to:cc:subject :date:message-id:reply-to; bh=1zAD78TACrgf3iuq+GDUXShypl9hJj+BYtzMxZiNdKU=; b=cX8C9aYgiiwH8q9A0I6nvi0otx0Kdy0pAUEJjgGb70Bq67FtmXZuDdeRZGEHlsKnXc VY5ApAwk8aAcqpK+PYQHgBYbUdHeS7mEQz9vLvHZDE5PmHLWAWhMw/fJroDMTW+EGtt2 2GneKc0O54CMWdKUvbZ2IHHDjskw1c5WCsgUZm2zNk1Bxq0rxCW9U3A1juJSMB/+APSS wb60NuHeaU0di2MoDqU4ijH2ThQ+CIUM4uGbBldTFE1/KjIzRRm6YqgW+CSUyPe4xB/d k5cQwuQ+0xwlhL+q7vzCgy629FplPlWj4DF95BCpbn3mW2jPblme1y+Qw7cxrP+HKHxk adLA== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20230601; t=1699697757; x=1700302557; h=to:subject:message-id:date:from:mime-version:x-gm-message-state :from:to:cc:subject:date:message-id:reply-to; bh=1zAD78TACrgf3iuq+GDUXShypl9hJj+BYtzMxZiNdKU=; b=Qzn1zHsAtzoQx7+TfnqIbDxAX6PeDh3sZDOuUEjMXEDR1sUP+cymKbrVF302pNQHmY DxbqTlmgJkfca9jVLmZvO0t6HN4lX78B4g+KoMxJRtyncnkQyBsjxi7XFrADMewuXxGg 1pECNPIftdnZIdUwlwCxlF1/u0Bw2mAsPMbL187aX05WiQ6SWR9wvrVkS+razlQxjmHp Xj75PM5A+M1yrFXCGw5ApR2cVsQ6Mf9NC14xozs2FRgjnhCnaxhYlZHfnReDOGav+Q1x vRO8bvqFb/nESpcvEYBDLl2MMz+5LpFLMkImF6ySBE4mM6ykeBVkCClBQ08oytZWdee1 Geow== X-Gm-Message-State: AOJu0Yy/0DAAMCuZIjfmqSv+xq7fnY3Fh+8W9EBY72JVmfiOSYQBmWDW 4VhKZo+qrMJ/Pg+rJgMl7EhPAcBQcWdr62RBNt5d5Ogh9HU= X-Google-Smtp-Source: AGHT+IGjOmkkr5R1Hd3K08Q4IRwpPrERAqPaIKULKJmTO3/9SXysUN4qpiPdtuoTpuOTtcOiPDype0MKidsSRL4xW3c= X-Received: by 2002:a05:6a21:19d:b0:15a:bf8:7dfc with SMTP id le29-20020a056a21019d00b0015a0bf87dfcmr1276411pzb.15.1699697757393; Sat, 11 Nov 2023 02:15:57 -0800 (PST) MIME-Version: 1.0 From: Paul Richard Thomas Date: Sat, 11 Nov 2023 10:15:45 +0000 Message-ID: Subject: [Patch, fortran] PR112459 - gfortran -w option causes derived-type finalization at creation time To: "fortran@gcc.gnu.org" , gcc-patches Content-Type: multipart/mixed; boundary="0000000000000e2f210609ddb9d5" X-Spam-Status: No, score=-7.3 required=5.0 tests=BAYES_00,DKIM_SIGNED,DKIM_VALID,DKIM_VALID_AU,DKIM_VALID_EF,FREEMAIL_FROM,GIT_PATCH_0,HTML_MESSAGE,RCVD_IN_DNSWL_NONE,SPF_HELO_NONE,SPF_PASS,TXREP,T_SCC_BODY_TEXT_LINE 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: --0000000000000e2f210609ddb9d5 Content-Type: multipart/alternative; boundary="0000000000000e2f200609ddb9d3" --0000000000000e2f200609ddb9d3 Content-Type: text/plain; charset="UTF-8" Hi All, Evidently -w causes gfc_option.allow_std to be set to default, which allows anything and everything to happen, including these f2003/8 finalizations. The fix is trivial. Regtests fine - OK for mainline and -13 branch? Paul Fortran: Prevent unwanted finalization with -w option [PR112459] 2023-11-11 Paul Thomas gcc/fortran PR fortran/112459 * trans-array.cc (gfc_trans_array_constructor_value): Replace gfc_notification_std with explicit logical expression that selects F2003/2008 and excludes -std=default/gnu. *trans-array.cc (gfc_conv_expr): Ditto. gcc/testsuite/ PR fortran/112459 * gfortran.dg/pr112459.f90: New test. --0000000000000e2f200609ddb9d3-- --0000000000000e2f210609ddb9d5 Content-Type: text/x-fortran; charset="US-ASCII"; name="pr112459.f90" Content-Disposition: attachment; filename="pr112459.f90" Content-Transfer-Encoding: base64 Content-ID: X-Attachment-Id: f_lotw467r0 ISB7IGRnLWRvIGNvbXBpbGUgfQohIHsgZGctb3B0aW9ucyAiLXcgLWZkdW1w LXRyZWUtb3JpZ2luYWwiIH0KIQohIENvcnJlY3QgdW5leHBlY3RlZCBmaW5h bGl6YXRpb24gd2l0aCAtc3RkPWRlZmF1bHQvZ251IGFuZCAtdwohCiEgQ29u dHJpYnV0ZWQgYnkgU2ViYXN0aWFuIEJhcmRlYXUgIDxiYXJkZWF1QGlyYW0u ZnI+CiEKbW9kdWxlIG15bW9kCiAgdHlwZSBteXN1YnR5cGUKICAgIGludGVn ZXIoa2luZD00KSwgYWxsb2NhdGFibGUgOjogYSg6KQogIGVuZCB0eXBlIG15 c3VidHlwZQogIHR5cGUgOjogbXl0eXBlCiAgICBpbnRlZ2VyIDo6IGkKICAg IHR5cGUobXlzdWJ0eXBlKSA6OiBzdWIKICBjb250YWlucwogICAgZmluYWwg OjogbXl0eXBlX2ZpbmFsCiAgZW5kIHR5cGUgbXl0eXBlCmNvbnRhaW5zCiAg c3Vicm91dGluZSBteXN1YnR5cGVfZmluYWwoc3ViKQogICAgdHlwZShteXN1 YnR5cGUpLCBpbnRlbnQoaW5vdXQpIDo6IHN1YgogICAgcHJpbnQgKiwnTVlT VUJUWVBFPkZJTkFMJwogICAgaWYgKGFsbG9jYXRlZChzdWIlYSkpIGRlYWxs b2NhdGUoc3ViJWEpCiAgZW5kIHN1YnJvdXRpbmUgbXlzdWJ0eXBlX2ZpbmFs CiAgc3Vicm91dGluZSBteXR5cGVfZmluYWwodHlwKQogICAgdHlwZShteXR5 cGUpLCBpbnRlbnQoaW5vdXQpIDo6IHR5cAogICAgcHJpbnQgKiwiTVlUWVBF PkZJTkFMIgogICAgY2FsbCBteXN1YnR5cGVfZmluYWwodHlwJXN1YikKICBl bmQgc3Vicm91dGluZSBteXR5cGVfZmluYWwKZW5kIG1vZHVsZSBteW1vZAoh CnByb2dyYW0gbXlwcm9nCiAgdXNlIG15bW9kCiAgdHlwZShteXR5cGUpLCBw b2ludGVyIDo6IGMKICBwcmludCAqLCJCZWZvcmUgYWxsb2NhdGlvbiIKICBh bGxvY2F0ZShjKQogIHByaW50ICosIkFmdGVyIGFsbG9jYXRpb24iCmVuZCBw cm9ncmFtIG15cHJvZwohIEZpbmFsIHN1YnJvdXRpbmVzIHdlcmUgY2FsbGVk IHdpdGggc3RkPWdudSBhbmQgLXcgPSA+IDE0ICJfZmluYWwicy4KISB7IGRn LWZpbmFsIHsgc2Nhbi10cmVlLWR1bXAtdGltZXMgIl9maW5hbCIgMTIgIm9y aWdpbmFsIiB9IH0K --0000000000000e2f210609ddb9d5 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_lotw4xia1 ZGlmZiAtLWdpdCBhL2djYy9mb3J0cmFuL3RyYW5zLWFycmF5LmNjIGIvZ2Nj L2ZvcnRyYW4vdHJhbnMtYXJyYXkuY2MKaW5kZXggYmJiODFmNDBhYTkuLmVm NTRhMjBkYWZkIDEwMDY0NAotLS0gYS9nY2MvZm9ydHJhbi90cmFucy1hcnJh eS5jYworKysgYi9nY2MvZm9ydHJhbi90cmFucy1hcnJheS5jYwpAQCAtMjMx MSw3ICsyMzExLDkgQEAgZ2ZjX3RyYW5zX2FycmF5X2NvbnN0cnVjdG9yX3Zh bHVlIChzdG10YmxvY2tfdCAqIHBibG9jaywKICAgICAgQ29ycmlnZW5kYSAx IFRPIDQgZm9yIGZvcnRyYW4gMjAwOCAoZjA4LzAwMTEpLgogCiAgICAgIFRy YW5zbWl0IGZpbmFsaXphdGlvbiBvZiB0aGlzIGNvbnN0cnVjdG9yIHRocm91 Z2ggJ2ZpbmFsYmxvY2snLiAqLwotICBpZiAoIWdmY19ub3RpZmljYXRpb25f c3RkIChHRkNfU1REX0YyMDE4X0RFTCkgJiYgZmluYWxibG9jayAhPSBOVUxM CisgIGlmICgoZ2ZjX29wdGlvbi5hbGxvd19zdGQgJiAoR0ZDX1NURF9GMjAw OCB8IEdGQ19TVERfRjIwMDMpKQorICAgICAgJiYgIShnZmNfb3B0aW9uLmFs bG93X3N0ZCAmIEdGQ19TVERfR05VKQorICAgICAgJiYgZmluYWxibG9jayAh PSBOVUxMCiAgICAgICAmJiBnZmNfbWF5X2JlX2ZpbmFsaXplZCAodHMpCiAg ICAgICAmJiBjdHIgPiAwICYmIGRlc2MgIT0gTlVMTF9UUkVFCiAgICAgICAm JiBHRkNfREVTQ1JJUFRPUl9UWVBFX1AgKFRSRUVfVFlQRSAoZGVzYykpKQpk aWZmIC0tZ2l0IGEvZ2NjL2ZvcnRyYW4vdHJhbnMtZXhwci5jYyBiL2djYy9m b3J0cmFuL3RyYW5zLWV4cHIuY2MKaW5kZXggMWI4YmUwODFhMTcuLmE2OWQ3 YzcxMTRkIDEwMDY0NAotLS0gYS9nY2MvZm9ydHJhbi90cmFucy1leHByLmNj CisrKyBiL2djYy9mb3J0cmFuL3RyYW5zLWV4cHIuY2MKQEAgLTk2OTgsNyAr OTY5OCw5IEBAIGdmY19jb252X2V4cHIgKGdmY19zZSAqIHNlLCBnZmNfZXhw ciAqIGV4cHIpCiAJIGV4ZWN1dGFibGUgY29uc3RydWN0IGNvbnRhaW5pbmcg dGhlIHJlZmVyZW5jZS4gVGhpcywgaW4gZmFjdCwKIAkgd2FzIGxhdGVyIGRl bGV0ZWQgYnkgdGhlIENvbWJpbmVkIFRlY2hpY2FsIENvcnJpZ2VuZGEgMSBU TyA0IGZvcgogCSBmb3J0cmFuIDIwMDggKGYwOC8wMDExKS4gICovCi0gICAg ICBpZiAoIWdmY19ub3RpZmljYXRpb25fc3RkIChHRkNfU1REX0YyMDE4X0RF TCkgJiYgZXhwci0+bXVzdF9maW5hbGl6ZQorICAgICAgaWYgKChnZmNfb3B0 aW9uLmFsbG93X3N0ZCAmIChHRkNfU1REX0YyMDA4IHwgR0ZDX1NURF9GMjAw MykpCisJICAmJiAhKGdmY19vcHRpb24uYWxsb3dfc3RkICYgR0ZDX1NURF9H TlUpCisJICAmJiBleHByLT5tdXN0X2ZpbmFsaXplCiAJICAmJiBnZmNfbWF5 X2JlX2ZpbmFsaXplZCAoZXhwci0+dHMpKQogCXsKIAkgIGdmY193YXJuaW5n ICgwLCAiVGhlIHN0cnVjdHVyZSBjb25zdHJ1Y3RvciBhdCAlQyBoYXMgYmVl biIK --0000000000000e2f210609ddb9d5--