From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 48) id 63472385354A; Tue, 6 Sep 2022 17:13:36 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 63472385354A DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gcc.gnu.org; s=default; t=1662484416; bh=e0RhYBVWu5r/HcwfkvsiFPJ5KnFQ2a/Rku5DR6yjSgY=; h=From:To:Subject:Date:From; b=Xu4lpAPvjHBDPlb3yPyxKaEPaJpWxwwQ3vuFFRQt+ZnO+CmEfWkifil+mo/76Wwh2 p1htux0B40YqqpAobOBg90UDwSwyVtPQfOPbQtJx7GKHCWkcKfFHpweLMOVFVKA7Fu 7z8Z4VXgA/r1A1FMd0m/hE2Xn1c/fCZp+BhNxFug= From: "gscfq@t-online.de" To: gcc-bugs@gcc.gnu.org Subject: [Bug fortran/106857] New: [10/11/12/13 Regression] ICE in gfc_simplify_pack, at fortran/simplify.cc:6438 Date: Tue, 06 Sep 2022 17:13:35 +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: 13.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 List-Id: https://gcc.gnu.org/bugzilla/show_bug.cgi?id=3D106857 Bug ID: 106857 Summary: [10/11/12/13 Regression] ICE in gfc_simplify_pack, at fortran/simplify.cc:6438 Product: gcc Version: 13.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran Assignee: unassigned at gcc dot gnu.org Reporter: gscfq@t-online.de Target Milestone: --- Started between 20211003 and 20211010 : $ cat z1.f90 program p type t integer :: n end type type(t), parameter :: a(2,2) =3D t(1) type(t), parameter :: b(4) =3D reshape(a, [2]) type(t), parameter :: c(2) =3D pack(b, [.false.,.true.,.false.,.true.]) end $ gfortran-12-20211003 -c z1.f90 z1.f90:6:29: 6 | type(t), parameter :: b(4) =3D reshape(a, [2]) | 1 Error: Different shape for array assignment at (1) on dimension 1 (4 and 2) $ gfortran-13-20220904 -c z1.f90 f951: internal compiler error: Segmentation fault 0xd8a29f crash_signal ../../gcc/toplev.cc:314 0x84695d gfc_simplify_pack(gfc_expr*, gfc_expr*, gfc_expr*) ../../gcc/fortran/simplify.cc:6438 0x7c2f2a do_simplify ../../gcc/fortran/intrinsic.cc:4677 0x7cde0a gfc_intrinsic_func_interface(gfc_expr*, int) ../../gcc/fortran/intrinsic.cc:5056 0x8230c8 resolve_unknown_f ../../gcc/fortran/resolve.cc:2990 0x8230c8 resolve_function ../../gcc/fortran/resolve.cc:3347 0x8230c8 gfc_resolve_expr(gfc_expr*) ../../gcc/fortran/resolve.cc:7194 0x7b2de4 gfc_reduce_init_expr(gfc_expr*) ../../gcc/fortran/expr.cc:3163 0x7b5d70 gfc_match_init_expr(gfc_expr**) ../../gcc/fortran/expr.cc:3211 0x79ff6b variable_decl ../../gcc/fortran/decl.cc:3028 0x79ff6b gfc_match_data_decl() ../../gcc/fortran/decl.cc:6331 0x80b513 match_word ../../gcc/fortran/parse.cc:67 0x80b513 decode_statement ../../gcc/fortran/parse.cc:378 0x80cf5a next_free ../../gcc/fortran/parse.cc:1398 0x80cf5a next_statement ../../gcc/fortran/parse.cc:1630 0x80e4fb parse_spec ../../gcc/fortran/parse.cc:4169 0x8116bc parse_progunit ../../gcc/fortran/parse.cc:6211 0x812d81 gfc_parse_file() ../../gcc/fortran/parse.cc:6756 0x860b1f gfc_be_parse_file ../../gcc/fortran/f95-lang.cc:229=