From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 48) id 479ED3858C62; Tue, 24 Jan 2023 17:53:41 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 479ED3858C62 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gcc.gnu.org; s=default; t=1674582821; bh=q6hp8Gvom//+BrDm+buyRcXspD/2G6yRm4BqkPxsGd4=; h=From:To:Subject:Date:From; b=FhORBbucPI5TWan8cf+Nvj8fpVPc9hPdmOvc0NnNfYZIeS2k8EhKlSL0wnVCwUDft xcsvDStxQMy9ioBA9FC/RAUjB4tB5txxk++c0BvphqkkJaPZc68r0dV7W4z0O3IVS4 lZRdgJQ9pUGYTLwSZfAfSxqBrXd+Ir91J7o0cnQ8= From: "gscfq@t-online.de" To: gcc-bugs@gcc.gnu.org Subject: [Bug fortran/108529] New: [10/11/12/13 Regression] ICE in transformational_result, at fortran/simplify.cc:478 Date: Tue, 24 Jan 2023 17:53:40 +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=3D108529 Bug ID: 108529 Summary: [10/11/12/13 Regression] ICE in transformational_result, at fortran/simplify.cc:478 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 20211031 and 20211107 : $ cat z1.f90 program p integer, parameter :: a(*,*) =3D reshape([1, 2, 3, 4], [2, 2]) logical, parameter :: b(2,*) =3D a > 2 logical, parameter :: c(*) =3D all(b, 1) end $ cat z2.f90 program p integer, parameter :: a(*,*) =3D reshape([1, 2, 3, 4], [2, 2]) logical, parameter :: b(*,*) =3D a > 2 logical, parameter :: c(*) =3D all(b, 1) print *, c end $ gfortran-13-20230122 z2.f90 && ./a.out # for reference only F T $ gfortran-12-20211031 -c z1.f90 z1.f90:3:31: 3 | logical, parameter :: b(2,*) =3D a > 2 | 1 Error: Assumed size array at (1) must be a dummy argument $ gfortran-13-20230122 -c z1.f90 f951: internal compiler error: Segmentation fault 0xf8a79f crash_signal ../../gcc/toplev.cc:314 0x8c98f5 __gmpz_get_ui /usr/include/gmp.h:1778 0x8c98f5 transformational_result ../../gcc/fortran/simplify.cc:478 0x8d0f09 simplify_transformation ../../gcc/fortran/simplify.cc:731 0x84cee6 do_simplify ../../gcc/fortran/intrinsic.cc:4670 0x857eaa gfc_intrinsic_func_interface(gfc_expr*, int) ../../gcc/fortran/intrinsic.cc:5056 0x8af508 resolve_unknown_f ../../gcc/fortran/resolve.cc:2990 0x8af508 resolve_function ../../gcc/fortran/resolve.cc:3347 0x8af508 gfc_resolve_expr(gfc_expr*) ../../gcc/fortran/resolve.cc:7195 0x83cb14 gfc_reduce_init_expr(gfc_expr*) ../../gcc/fortran/expr.cc:3168 0x83fa70 gfc_match_init_expr(gfc_expr**) ../../gcc/fortran/expr.cc:3216 0x82949b variable_decl ../../gcc/fortran/decl.cc:3036 0x82949b gfc_match_data_decl() ../../gcc/fortran/decl.cc:6343 0x897303 match_word ../../gcc/fortran/parse.cc:67 0x897303 decode_statement ../../gcc/fortran/parse.cc:378 0x898d4a next_free ../../gcc/fortran/parse.cc:1403 0x898d4a next_statement ../../gcc/fortran/parse.cc:1635 0x89a78b parse_spec ../../gcc/fortran/parse.cc:4191 0x89da8c parse_progunit ../../gcc/fortran/parse.cc:6262 0x89f191 gfc_parse_file() ../../gcc/fortran/parse.cc:6807=