From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from esa4.mentor.iphmx.com (esa4.mentor.iphmx.com [68.232.137.252]) by sourceware.org (Postfix) with ESMTPS id 8D23B3858D28; Sat, 16 Oct 2021 18:48:08 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.1 sourceware.org 8D23B3858D28 Authentication-Results: sourceware.org; dmarc=none (p=none dis=none) header.from=codesourcery.com Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=mentor.com IronPort-SDR: v2rg0iHOvYHxp+SwzzaIOc7pYXkFWKuTRp05CD5/cpVMK04hn5pah2kRnuQJe6nGuQarNF8i0T wwTx5e185ktNjrDufBckYs21/Fm6PmkZYIe31i2ZhlIrXi6BTdoVX/OqTqfno+GLfn+aZCmdrZ PoUtRPhMIrWsrFLhBuAya5g10/0hiM5GyOg10dtHJ4d5Q4HsQq+VRB3RIKHPSFU5ml7R8cpMCV gtoh7pBqAxAHgNp9YuzOnMqfvOh2Xrf8uUtSZr2cxS+mg606wLDdaMzrOiK4qpICZlPRX+e3B7 664j+0wLQpGtFzxJXlge3SFL X-IronPort-AV: E=Sophos;i="5.85,378,1624348800"; d="diff'?scan'208";a="67290604" Received: from orw-gwy-02-in.mentorg.com ([192.94.38.167]) by esa4.mentor.iphmx.com with ESMTP; 16 Oct 2021 10:48:07 -0800 IronPort-SDR: D/4XPNZgkhAszy87ST77U0SBxyhZrpYAEvluGffU9haK5blgkPIyb9QImuZiFEqQgpzy15ww0S Lm5BzNbA4YdDbBc0eCLq74tVQzYvIUS09CuSfTSWSIC+nKwCe+mQeZhIJnFIt4LI0hZ+WgOQDZ iizWXE/HkulnO8GKk/T4cFOBbb01BEW2tISr9aXMmGcVYdqmVStJpo6UzBAVjddsuCTy0t6hFR LtXJRUXaf8Ragz4niFR2FNxm9EeJn4+TW3Npin49BARGjJZp0fzrM5dJ4QHtBAW0ZA4+H33jU+ A70= Content-Type: multipart/mixed; boundary="------------oAvvk6YlZycicxOqZ2rK6itA" Message-ID: Date: Sat, 16 Oct 2021 20:48:00 +0200 MIME-Version: 1.0 User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:91.0) Gecko/20100101 Thunderbird/91.2.0 Subject: [Patch] (was: Re: [r12-4457 Regression] FAIL: gfortran.dg/deferred_type_param_6.f90 -Os execution test on Linux/x86_64) Content-Language: en-US To: Jan Hubicka , sunil.k.pandey , fortran CC: , , References: <20211016161130.731AF286470F@gskx-2.sc.intel.com> <20211016182354.GE64164@kam.mff.cuni.cz> From: Tobias Burnus In-Reply-To: <20211016182354.GE64164@kam.mff.cuni.cz> X-Originating-IP: [137.202.0.90] X-ClientProxiedBy: svr-ies-mbx-05.mgc.mentorg.com (139.181.222.5) To svr-ies-mbx-01.mgc.mentorg.com (139.181.222.1) X-Spam-Status: No, score=-11.6 required=5.0 tests=BAYES_00, GIT_PATCH_0, HEADER_FROM_DIFFERENT_DOMAINS, KAM_DMARC_STATUS, SPF_HELO_PASS, SPF_PASS, 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: Sat, 16 Oct 2021 18:48:10 -0000 --------------oAvvk6YlZycicxOqZ2rK6itA Content-Type: text/plain; charset="UTF-8"; format=flowed Content-Transfer-Encoding: quoted-printable Hi Honza, On 16.10.21 20:23, Jan Hubicka via Gcc-patches wrote: >> FAIL: gfortran.dg/deferred_type_param_6.f90 -O1 execution test >> FAIL: gfortran.dg/deferred_type_param_6.f90 -Os execution test > Sorry for the breakage. This time it seems like bug in Fortran FE > which was previously latent: > > __attribute__((fn spec (". . R "))) > void subfunc (character(kind=3D1)[1:..__result] * & __result, integer(kin= d=3D8) * .__result) ... Fortran has for a long time 'character(len=3D5), allocatable" or "character(len=3D*)". In the first case, the "5" can be ignored as both caller and callee know the length. In the second case, the length is determined by the argument, but it cannot be changed. Since a not-that-short while, 'len=3D:' together with allocatable/pointer is supported. In the latter case, the value can be change when the array association/allocation is changed. I attached a patch, which was not tested. I am not quite sure whether the pointer address can actually escape or not - I think cannot but I played safe. Tobias ----------------- Siemens Electronic Design Automation GmbH; Anschrift: Arnulfstra=C3=9Fe 201= , 80634 M=C3=BCnchen; Gesellschaft mit beschr=C3=A4nkter Haftung; Gesch=C3= =A4ftsf=C3=BChrer: Thomas Heurung, Frank Th=C3=BCrauf; Sitz der Gesellschaf= t: M=C3=BCnchen; Registergericht M=C3=BCnchen, HRB 106955 --------------oAvvk6YlZycicxOqZ2rK6itA Content-Type: text/x-patch; charset="UTF-8"; name="fnspec.diff" Content-Disposition: attachment; filename="fnspec.diff" Content-Transfer-Encoding: base64 Rm9ydHJhbjogRml4IGZuIHNwZWMgZm9yIGNoYXJhY3Rlci1yZXR1cm5pbmcgZnVuY3Rpb25z CgpnY2MvZm9ydHJhbi9DaGFuZ2VMb2cKCSogdHJhbnMtdHlwZXMuYyAoY3JlYXRlX2ZuX3Nw ZWMpOiBGb3IgY2hhcmFjdGVyLXJldHVybmluZyBmdW5jdGlvbnMsCglzZXQgdGhlIGhpZGRl biBzdHJpbmctbGVuZ3RoIGFyZ3VtZW50IHRvICdSJyBvbmx5IHdoZW4gdGhlICJsZW49OiIs CglpLmUuIGRlZmVycmVkIGxlbmd0aCB3aGljaCBnb2VzIGFsb25nc2lkZSB3aXRoIGFsbG9j YXRhYmxlL3BvaW50ZXIuCgpkaWZmIC0tZ2l0IGEvZ2NjL2ZvcnRyYW4vdHJhbnMtdHlwZXMu YyBiL2djYy9mb3J0cmFuL3RyYW5zLXR5cGVzLmMKaW5kZXggMjIwOTc2YmFiYjguLjYzN2Qy YzcxZDAxIDEwMDY0NAotLS0gYS9nY2MvZm9ydHJhbi90cmFucy10eXBlcy5jCisrKyBiL2dj Yy9mb3J0cmFuL3RyYW5zLXR5cGVzLmMKQEAgLTMwMDgsNyArMzAwOCwxNCBAQCBjcmVhdGVf Zm5fc3BlYyAoZ2ZjX3N5bWJvbCAqc3ltLCB0cmVlIGZudHlwZSkKIAl9CiAgICAgICBpZiAo c3ltLT50cy50eXBlID09IEJUX0NIQVJBQ1RFUikKIAl7Ci0JICBzcGVjW3NwZWNfbGVuKytd ID0gJ1InOworCSAgaWYgKCFzeW0tPnRzLnUuY2wtPmxlbmd0aAorCSAgICAgICYmICgoc3lt LT5hdHRyLmFsbG9jYXRhYmxlICYmIHN5bS0+YXR0ci50YXJnZXQpCisJCSAgfHwgc3ltLT5h dHRyLnBvaW50ZXIpKQorCSAgICBzcGVjW3NwZWNfbGVuKytdID0gJy4nOworCSAgaWYgKCFz eW0tPnRzLnUuY2wtPmxlbmd0aCAmJiBzeW0tPmF0dHIuYWxsb2NhdGFibGUpCisJICAgIHNw ZWNbc3BlY19sZW4rK10gPSAndyc7CisJICBlbHNlCisJICAgIHNwZWNbc3BlY19sZW4rK10g PSAnUic7CiAJICBzcGVjW3NwZWNfbGVuKytdID0gJyAnOwogCX0KICAgICB9Cg== --------------oAvvk6YlZycicxOqZ2rK6itA--