From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 48) id 9189D385DC39; Mon, 6 Jul 2020 17:56:05 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 9189D385DC39 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gcc.gnu.org; s=default; t=1594058165; bh=qRVHWOGegjTjVnoL+K1Dtff1gZ6pj/uCkKrcVsNsYko=; h=From:To:Subject:Date:From; b=dG4HCDBk6ARKgFxsY5bfXABpdk5nWJzLiaLoiNALy7GV2qp5UhSzilPMm+Y4Ms7Db vQoNkg+pMNHQXgz4z9XEv+RKtC+naXkHenlWRV4Cwv7vyQqqSvnAUlCUgiendV34GU tKj3/TNGT2T78QAyD1wUTIr9j+FDOp0plCdddgkw= From: "gscfq@t-online.de" To: gcc-bugs@gcc.gnu.org Subject: [Bug fortran/96084] New: ICE in free_expr0, at fortran/expr.c:446 Date: Mon, 06 Jul 2020 17:56:05 +0000 X-Bugzilla-Reason: CC X-Bugzilla-Type: new X-Bugzilla-Watch-Reason: None X-Bugzilla-Product: gcc X-Bugzilla-Component: fortran X-Bugzilla-Version: 11.0 X-Bugzilla-Keywords: X-Bugzilla-Severity: normal X-Bugzilla-Who: gscfq@t-online.de X-Bugzilla-Status: UNCONFIRMED X-Bugzilla-Resolution: X-Bugzilla-Priority: P3 X-Bugzilla-Assigned-To: unassigned at gcc dot gnu.org X-Bugzilla-Target-Milestone: --- X-Bugzilla-Flags: X-Bugzilla-Changed-Fields: bug_id short_desc product version bug_status bug_severity priority component assigned_to reporter target_milestone Message-ID: Content-Type: text/plain; charset="UTF-8" Content-Transfer-Encoding: quoted-printable X-Bugzilla-URL: http://gcc.gnu.org/bugzilla/ Auto-Submitted: auto-generated MIME-Version: 1.0 X-BeenThere: gcc-bugs@gcc.gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Gcc-bugs mailing list List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Mon, 06 Jul 2020 17:56:05 -0000 https://gcc.gnu.org/bugzilla/show_bug.cgi?id=3D96084 Bug ID: 96084 Summary: ICE in free_expr0, at fortran/expr.c:446 Product: gcc Version: 11.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran Assignee: unassigned at gcc dot gnu.org Reporter: gscfq@t-online.de Target Milestone: --- This invalid code produces errors up to name length 61, and gives an ICE (or bailing out) for 62/63. To get a traceback it's better to use a test version (configured with --enable-checking=3Dyes). $ cat z1_61.f90 program p type n234567890123456789012345678901234567890123456789012345678901 integer :: i234567890123456789012345678901234567890123456789012345678= 901 end type dimension a234567890123456789012345678901234567890123456789012345678901(= 1) class (n234567890123456789012345678901234567890123456789012345678901), allocatable :: & a234567890123456789012345678901234567890123456789012345678901, & b234567890123456789012345678901234567890123456789012345678901 call s(b234567890123456789012345678901234567890123456789012345678901 % & j234567890123456789012345678901234567890123456789012345678901) end $ cat z1_62.f90 program p type n2345678901234567890123456789012345678901234567890123456789012 integer :: i234567890123456789012345678901234567890123456789012345678= 9012 end type dimension a2345678901234567890123456789012345678901234567890123456789012= (1) class (n2345678901234567890123456789012345678901234567890123456789012), allocatable :: & a2345678901234567890123456789012345678901234567890123456789012, & b2345678901234567890123456789012345678901234567890123456789012 call s(b2345678901234567890123456789012345678901234567890123456789012 % & j2345678901234567890123456789012345678901234567890123456789012) end $ cat z1_63.f90 program p type n23456789012345678901234567890123456789012345678901234567890123 integer :: i23456789012345678901234567890123456789012345678901234567890123 end type dimension a2345678901234567890123456789012345678901234567890123456789012= 3(1) class (n23456789012345678901234567890123456789012345678901234567890123), allocatable :: & a23456789012345678901234567890123456789012345678901234567890123, & b23456789012345678901234567890123456789012345678901234567890123 call s(b23456789012345678901234567890123456789012345678901234567890123 %= & j23456789012345678901234567890123456789012345678901234567890123) end $ gfortran-11-20200705 -c z1_63.f90 z1_63.f90:10:74: 10 |=20=20=20=20=20=20=20=20=20=20 j23456789012345678901234567890123456789012345678901234567890123) |=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20= =20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20= =20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20 1 Error: 'j23456789012345678901234567890123456789012345678901234567890123' at= (1) is not a member of the 'n23456789012345678901234567890123456789012345678901234567890123' structure; did you mean 'i234567890123456789012345678901234567890123456789012345678901= 23'? z1_63.f90:5:76: 5 | dimension a23456789012345678901234567890123456789012345678901234567890123(1) |=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20= =20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20= =20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20 1 Error: Allocatable array 'a23456789012345678901234567890123456789012345678901234567890123' at (1) mu= st have a deferred shape or assumed rank f951: internal compiler error: Segmentation fault 0xd6980f crash_signal ../../gcc/toplev.c:328 0x699981 free_expr0 ../../gcc/fortran/expr.c:446 0x699ae8 gfc_free_expr(gfc_expr*) ../../gcc/fortran/expr.c:530 0x666721 gfc_free_array_spec(gfc_array_spec*) ../../gcc/fortran/array.c:351 0x73364f free_components ../../gcc/fortran/symbol.c:2605 0x73364f gfc_free_symbol(gfc_symbol*) ../../gcc/fortran/symbol.c:3077 0x73383e free_sym_tree ../../gcc/fortran/symbol.c:3902 0x73382c free_sym_tree ../../gcc/fortran/symbol.c:3899 0x73382c free_sym_tree ../../gcc/fortran/symbol.c:3899 0x73382c free_sym_tree ../../gcc/fortran/symbol.c:3899 0x73382c free_sym_tree ../../gcc/fortran/symbol.c:3899 0x7334b1 gfc_free_namespace(gfc_namespace*) ../../gcc/fortran/symbol.c:4041 0x733aea gfc_symbol_done_2() ../../gcc/fortran/symbol.c:4101 0x6d1e18 gfc_done_2() ../../gcc/fortran/misc.c:358 0x6f5fa0 translate_all_program_units ../../gcc/fortran/parse.c:6326 0x6f5fa0 gfc_parse_file() ../../gcc/fortran/parse.c:6546 0x74269f gfc_be_parse_file ../../gcc/fortran/f95-lang.c:212=