[{"id":3672860,"web_url":"http://patchwork.ozlabs.org/comment/3672860/","msgid":"<2a57a2f0-65ef-40b6-a2f4-dc6247f4c2de@gmx.de>","list_archive_url":null,"date":"2026-04-02T18:49:38","subject":"Re: [Patch, fortran] PR100155 - [13/14/15/16 Regression] ICE in\n gfc_conv_intrinsic_size, at fortran/trans-intrinsic.c:805","submitter":{"id":21263,"url":"http://patchwork.ozlabs.org/api/people/21263/","name":"Harald Anlauf","email":"anlauf@gmx.de"},"content":"Hi Paul,\n\nOn 4/2/26 11:36, Paul Richard Thomas wrote:\n> Hi All,\n> \n> The attached fixes the PR and cures the memory leak in pr105168.\n> \n> Regtested on FC43/x86_64. OK for mainline and later backporting?\n\nas you say, the patch is indeed not too pretty, although\nit works with the testcase that comes with it.\n\nIt does not fix the following variation for me:\n\nprogram p\n   type :: t\n   end type\ncontains\n   recursive function f(x) result(z)\n     class(*), intent(in) :: x(:)\n     type(t)  :: z (size(x))\n     class(t), allocatable :: a(:)\n     class(t), allocatable :: b(:)\n     allocate (a(size(x)))\n     b = f((a))\n     z = b   ! no ICE\n     z = (b) ! ICE\n   end\nend\n\n% gfc-16 pr100155.f90\nf951: internal compiler error: Segmentation fault\n0x26ba694 internal_error(char const*, ...)\n         ../../gcc-trunk/gcc/diagnostic-global-context.cc:787\n0x127c0af crash_signal\n         ../../gcc-trunk/gcc/toplev.cc:325\n0xa2bc63 gfc_add_component_ref(gfc_expr*, char const*)\n         ../../gcc-trunk/gcc/fortran/class.cc:217\n0xaf6642 resolve_ordinary_assign\n         ../../gcc-trunk/gcc/fortran/resolve.cc:13223\n0xaf6642 gfc_resolve_code(gfc_code*, gfc_namespace*)\n         ../../gcc-trunk/gcc/fortran/resolve.cc:14336\n0xaf7c62 resolve_codes\n         ../../gcc-trunk/gcc/fortran/resolve.cc:20289\n0xaf7ba3 resolve_codes\n         ../../gcc-trunk/gcc/fortran/resolve.cc:20270\n0xaf7d02 gfc_resolve(gfc_namespace*)\n         ../../gcc-trunk/gcc/fortran/resolve.cc:20324\n0xae2ac9 resolve_all_program_units\n         ../../gcc-trunk/gcc/fortran/parse.cc:7531\n0xae2ac9 gfc_parse_file()\n         ../../gcc-trunk/gcc/fortran/parse.cc:7793\n0xb41caf gfc_be_parse_file\n         ../../gcc-trunk/gcc/fortran/f95-lang.cc:247\n\nYou might proceed nevertheless for 16-trunk, and either keep\nan eye on the above, or add it to the present (or a new) PR.\n(It could be a different existing PR; haven't searched bugzilla.\nIn that case just go ahead.)\n\nThanks,\nHarald","headers":{"Return-Path":"<gcc-patches-bounces~incoming=patchwork.ozlabs.org@gcc.gnu.org>","X-Original-To":["incoming@patchwork.ozlabs.org","gcc-patches@gcc.gnu.org"],"Delivered-To":["patchwork-incoming@legolas.ozlabs.org","gcc-patches@gcc.gnu.org"],"Authentication-Results":["legolas.ozlabs.org;\n spf=pass (sender SPF authorized) smtp.mailfrom=gcc.gnu.org\n (client-ip=2620:52:6:3111::32; helo=vm01.sourceware.org;\n envelope-from=gcc-patches-bounces~incoming=patchwork.ozlabs.org@gcc.gnu.org;\n receiver=patchwork.ozlabs.org)","sourceware.org;\n dmarc=fail (p=quarantine dis=none) header.from=gmx.de","sourceware.org; spf=pass smtp.mailfrom=m.gmane-mx.org","server2.sourceware.org;\n arc=none smtp.remote-ip=116.202.254.214"],"Received":["from vm01.sourceware.org (vm01.sourceware.org\n [IPv6:2620:52:6:3111::32])\n\t(using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)\n\t key-exchange x25519 server-signature ECDSA (secp384r1) server-digest SHA384)\n\t(No client certificate requested)\n\tby legolas.ozlabs.org (Postfix) with ESMTPS id 4fmrWr2xzlz1yGJ\n\tfor <incoming@patchwork.ozlabs.org>; Fri, 03 Apr 2026 05:50:15 +1100 (AEDT)","from vm01.sourceware.org (localhost [127.0.0.1])\n\tby sourceware.org (Postfix) with ESMTP id 1FACC4BA23EB\n\tfor <incoming@patchwork.ozlabs.org>; Thu,  2 Apr 2026 18:50:13 +0000 (GMT)","from ciao.gmane.io (ciao.gmane.io [116.202.254.214])\n by sourceware.org (Postfix) with ESMTPS id 4FB784BA23F5\n for <gcc-patches@gcc.gnu.org>; Thu,  2 Apr 2026 18:49:47 +0000 (GMT)","from list by ciao.gmane.io with local (Exim 4.92)\n (envelope-from <gcc-patches@m.gmane-mx.org>) id 1w8N6v-0006lH-3Z\n for gcc-patches@gcc.gnu.org; Thu, 02 Apr 2026 20:49:45 +0200"],"DKIM-Filter":["OpenDKIM Filter v2.11.0 sourceware.org 1FACC4BA23EB","OpenDKIM Filter v2.11.0 sourceware.org 4FB784BA23F5"],"DMARC-Filter":"OpenDMARC Filter v1.4.2 sourceware.org 4FB784BA23F5","ARC-Filter":"OpenARC Filter v1.0.0 sourceware.org 4FB784BA23F5","ARC-Seal":"i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1775155787; cv=none;\n b=o4UJs6XD81Azen31Pf+n3cUnoykxjhcPNt/sPsPFlK7Cb6uZwyrCv9GY0mBm5QaBEwNsz5/GKW/A1f+ymf7ODs20CanluNXrPg9pbIX4MSCs8lpMODvAzv/hfXaQLJpuCuCxGd+NuUv1mqv263NS7guw+LY4RmgkzCpxv+I6LEQ=","ARC-Message-Signature":"i=1; a=rsa-sha256; d=sourceware.org; s=key;\n t=1775155787; c=relaxed/simple;\n bh=lLPh+ycLav10Y2vuZ7Lo83dBky5fYvLkdv0jqIJcRhY=;\n h=To:From:Subject:Date:Message-ID:Mime-Version;\n b=WCtQpmjpkQaRsIO+H3ShZNdQW1Wt9L2hxN/73kQvwjLPqv/oo6WFCnQbKI0LTUkSKTpRiDaowYj3/WBEmhkvgFeOhlV8XROPs+mJ9Kum0T4unELKScvc1yBIDd37i1221NxfcIs+UjYeU7cTzVqf3Lzv1i4PDheB7xFhf2rCfis=","ARC-Authentication-Results":"i=1; server2.sourceware.org","X-Injected-Via-Gmane":"http://gmane.org/","To":"gcc-patches@gcc.gnu.org","From":"Harald Anlauf <anlauf@gmx.de>","Subject":"Re: [Patch, fortran] PR100155 - [13/14/15/16 Regression] ICE in\n gfc_conv_intrinsic_size, at fortran/trans-intrinsic.c:805","Date":"Thu, 2 Apr 2026 20:49:38 +0200","Message-ID":"<2a57a2f0-65ef-40b6-a2f4-dc6247f4c2de@gmx.de>","References":"\n <CAGkQGiKmQwMbBDBZpe-4+fHrZBUnPqgozd8s-wgpA+UQNZJH7A@mail.gmail.com>","Mime-Version":"1.0","Content-Type":"text/plain; charset=UTF-8; format=flowed","Content-Transfer-Encoding":"7bit","User-Agent":"Mozilla Thunderbird","Content-Language":"en-US","In-Reply-To":"\n <CAGkQGiKmQwMbBDBZpe-4+fHrZBUnPqgozd8s-wgpA+UQNZJH7A@mail.gmail.com>","Cc":"fortran@gcc.gnu.org","X-BeenThere":"gcc-patches@gcc.gnu.org","X-Mailman-Version":"2.1.30","Precedence":"list","List-Id":"Gcc-patches mailing list <gcc-patches.gcc.gnu.org>","List-Unsubscribe":"<https://gcc.gnu.org/mailman/options/gcc-patches>,\n <mailto:gcc-patches-request@gcc.gnu.org?subject=unsubscribe>","List-Archive":"<https://gcc.gnu.org/pipermail/gcc-patches/>","List-Post":"<mailto:gcc-patches@gcc.gnu.org>","List-Help":"<mailto:gcc-patches-request@gcc.gnu.org?subject=help>","List-Subscribe":"<https://gcc.gnu.org/mailman/listinfo/gcc-patches>,\n <mailto:gcc-patches-request@gcc.gnu.org?subject=subscribe>","Errors-To":"gcc-patches-bounces~incoming=patchwork.ozlabs.org@gcc.gnu.org"}}]