From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 48) id 6D684393BC2F; Tue, 12 May 2020 16:37:45 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 6D684393BC2F DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gcc.gnu.org; s=default; t=1589301465; bh=F+vGiuQbbEr3vo4g8K6v0K4uJlkkWN/b3mqd9ru63zI=; h=From:To:Subject:Date:From; b=iSxq7h5x3uAh9kj3NK+IIgyH/NR2sUG2m4r7KsvlUTPYWH8FFPvgDiPVZ5sEyiUh1 rHyA88ZkS6SyJqolceBQ3vr4YlHERUEmwNehUY7lqjEbohB56S9GT0kP7lEQVynVvH hBiPhjBzVXuyCbrqoD25xhCazniXn8PCA0pds3es= From: "gscfq@t-online.de" To: gcc-bugs@gcc.gnu.org Subject: [Bug fortran/95088] New: ICE in gfc_build_class_symbol, at fortran/class.c:653 Date: Tue, 12 May 2020 16:37:45 +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: Tue, 12 May 2020 16:37:45 -0000 https://gcc.gnu.org/bugzilla/show_bug.cgi?id=3D95088 Bug ID: 95088 Summary: ICE in gfc_build_class_symbol, at fortran/class.c:653 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: --- The search for internal restrictions of names has brought to light=20 a few critical cases, in the following case the change occurs between=20 61 (ok) and 62 (ICE) : $ cat z1_61.f90 module m234567890123456789012345678901234567890123456789012345678901 type t234567890123456789012345678901234567890123456789012345678901 & (n234567890123456789012345678901234567890123456789012345678901) integer, kind :: n234567890123456789012345678901234567890123456789012345678901 end type type, extends (t234567890123456789012345678901234567890123456789012345678901) :: & a234567890123456789012345678901234567890123456789012345678901 end type interface module subroutine s234567890123456789012345678901234567890123456789012345678901 & (x234567890123456789012345678901234567890123456789012345678901) =20=20=20=20=20=20=20=20 class(a234567890123456789012345678901234567890123456789012345678901(8)) :: & x234567890123456789012345678901234567890123456789012345678901 end end interface end $ cat z1_62.f90 module m2345678901234567890123456789012345678901234567890123456789012 type t2345678901234567890123456789012345678901234567890123456789012 & (n2345678901234567890123456789012345678901234567890123456789012) integer, kind :: n2345678901234567890123456789012345678901234567890123456789012 end type type, extends (t2345678901234567890123456789012345678901234567890123456789012) :: & a2345678901234567890123456789012345678901234567890123456789012 end type interface module subroutine s2345678901234567890123456789012345678901234567890123456789012 & (x2345678901234567890123456789012345678901234567890123456789012) =20=20=20=20=20=20=20=20 class(a2345678901234567890123456789012345678901234567890123456789012(8)) ::= & x2345678901234567890123456789012345678901234567890123456789012 end end interface end $ cat z1_63.f90 module m23456789012345678901234567890123456789012345678901234567890123 type t23456789012345678901234567890123456789012345678901234567890123 & (n23456789012345678901234567890123456789012345678901234567890123) integer, kind :: n23456789012345678901234567890123456789012345678901234567890123 end type type, extends (t23456789012345678901234567890123456789012345678901234567890123) :: & a23456789012345678901234567890123456789012345678901234567890123 end type interface module subroutine s23456789012345678901234567890123456789012345678901234567890123 & (x23456789012345678901234567890123456789012345678901234567890123) =20=20=20=20=20=20=20=20 class(a23456789012345678901234567890123456789012345678901234567890123(8)) := : & x23456789012345678901234567890123456789012345678901234567890123 end end interface end $ gfortran-11-20200510 -c z1_61.f90 $ $ gfortran-11-20200510 -c z1_62.f90 f951: internal compiler error: Segmentation fault 0xbb93cf crash_signal ../../gcc/toplev.c:328 0x62fcb8 gfc_build_class_symbol(gfc_typespec*, symbol_attribute*, gfc_array_spec**) ../../gcc/fortran/class.c:653 0x6365ac build_sym ../../gcc/fortran/decl.c:1746 0x640e09 variable_decl ../../gcc/fortran/decl.c:2780 0x640e09 gfc_match_data_decl() ../../gcc/fortran/decl.c:6170 0x6a4533 match_word ../../gcc/fortran/parse.c:65 0x6a4533 decode_statement ../../gcc/fortran/parse.c:376 0x6a5f7a next_free ../../gcc/fortran/parse.c:1279 0x6a5f7a next_statement ../../gcc/fortran/parse.c:1511 0x6a8324 parse_spec ../../gcc/fortran/parse.c:3738 0x6a7cce parse_interface ../../gcc/fortran/parse.c:3601 0x6a7cce parse_spec ../../gcc/fortran/parse.c:3875 0x6ab59e parse_module ../../gcc/fortran/parse.c:6115 0x6ab8e7 gfc_parse_file() ../../gcc/fortran/parse.c:6428 0x6f7a7f gfc_be_parse_file ../../gcc/fortran/f95-lang.c:210=