From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gcc-bugzilla@gcc.gnu.org>
Received: by sourceware.org (Postfix, from userid 48)
	id 5E4F83858407; Tue, 24 Jan 2023 17:52:10 +0000 (GMT)
DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 5E4F83858407
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gcc.gnu.org;
	s=default; t=1674582730;
	bh=VfXqKdPqga4HB/sL2h5cQt+JJA+IVfaOJOMj+ZjqC9o=;
	h=From:To:Subject:Date:From;
	b=E3ZunonuEykYFOxPAxgPHfX6qk8a7BJLoVToD57MZ7T6qx9Pgd1CNCOvZoJdCnVin
	 6Q/pyyxF1XqQrkfcjsm0tQ2IhRG9oqo1JKcGC8ZNKUn94xrbmOPnWU9li+2lKCNPIX
	 jD6RmX/0ic6N0R+mYTEo4ziLhSIDoR8LFLxwtKnU=
From: "gscfq@t-online.de" <gcc-bugzilla@gcc.gnu.org>
To: gcc-bugs@gcc.gnu.org
Subject: [Bug fortran/108528] New: [13 Regression] ICE in
 gfc_compare_array_spec(): Array spec clobbered
Date: Tue, 24 Jan 2023 17:52:10 +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: <bug-108528-4@http.gcc.gnu.org/bugzilla/>
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: <gcc-bugs.sourceware.org>

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=3D108528

            Bug ID: 108528
           Summary: [13 Regression] ICE in gfc_compare_array_spec(): Array
                    spec clobbered
           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 20221218 and 20230108 :


$ cat z1.f90
function f()
integer :: f((2.))
integer :: g((2))
entry g()
end


$ cat z2.f90
function f()
integer :: f(real(2))
integer :: g((2))
entry g()
end


$ gfortran-13-20230122 -c z1.f90
f951: internal compiler error: gfc_compare_array_spec(): Array spec clobber=
ed
0x7c17e9 gfc_report_diagnostic
        ../../gcc/fortran/error.cc:883
0x7c3387 gfc_internal_error(char const*, ...)
        ../../gcc/fortran/error.cc:1503
0x78dda4 compare_bounds
        ../../gcc/fortran/array.cc:982
0x78f73c gfc_compare_array_spec(gfc_array_spec*, gfc_array_spec*)
        ../../gcc/fortran/array.cc:1026
0x8333ff resolve_entries
        ../../gcc/fortran/resolve.cc:799
0x8461ef resolve_types
        ../../gcc/fortran/resolve.cc:17531
0x84175c gfc_resolve(gfc_namespace*)
        ../../gcc/fortran/resolve.cc:17662
0x8294d4 resolve_all_program_units
        ../../gcc/fortran/parse.cc:6656
0x8294d4 gfc_parse_file()
        ../../gcc/fortran/parse.cc:6912
0x8774bf gfc_be_parse_file
        ../../gcc/fortran/f95-lang.cc:229=