[Bug fortran/111321] New: Segmentation fault with associate construct

[Bug fortran/111321] New: Segmentation fault with associate construct

[alexandre.poux at coria dot fr]

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

            Bug ID: 111321
           Summary: Segmentation fault with associate construct
           Product: gcc
           Version: 13.2.1
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: alexandre.poux at coria dot fr
  Target Milestone: ---

The following program triggers a segmentation fault when compiling

```fortran
program buggy
    implicit none
    double precision, dimension(1) :: array
    integer :: i

    associate (assoc => array)

        assoc(1) = 1.5
        assoc = assoc*2

    end associate
contains

end program buggy
```

```
#> gfortran bug.f90
f951: internal compiler error: Segmentation fault
0x1a0e9c4 internal_error(char const*, ...)
        ???:0
0x77d375 gfc_expression_rank(gfc_expr*)
        ???:0
0x7392fc gfc_match_expr(gfc_expr**)
        ???:0
0x7397a8 gfc_match(char const*, ...)
        ???:0
0x739f59 gfc_match_assignment()
        ???:0
0x793a70 gfc_parse_file()
        ???:0
```

I'm using the latest version of gfortran from the archlinux repository
core/gcc-fortran 13.2.1-3

[Bug fortran/111321] Segmentation fault with associate construct

[alexandre.poux at coria dot fr]

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

--- Comment #1 from Alexandre Poux <alexandre.poux at coria dot fr> ---
Created attachment 55848
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=55848&action=edit
a program triggering the segmentation fault

[Bug fortran/111321] Segmentation fault with associate construct

[kopper at iag dot uni-stuttgart.de]

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

Patrick Kopper <kopper at iag dot uni-stuttgart.de> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |kopper at iag dot uni-stuttgart.de

--- Comment #2 from Patrick Kopper <kopper at iag dot uni-stuttgart.de> ---
Can reproduce both with the program by Alexandre and our own code base. Tested
with gfortran 13.1.1 (Arch), 13.2.1 (Arch) and 13.2.0 (Homebrew). gfortran
12.2.1 (Arch) confirmed to compile without error or warnings.

```
#> gfortran bug.f90
f951: internal compiler error: Segmentation fault: 11
#> gfortran --version
GNU Fortran (Homebrew GCC 13.2.0) 13.2.0
```

[Bug fortran/111321] Segmentation fault with associate construct

[anlauf at gcc dot gnu.org]

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

anlauf at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |anlauf at gcc dot gnu.org
             Status|UNCONFIRMED                 |RESOLVED
         Resolution|---                         |DUPLICATE

--- Comment #3 from anlauf at gcc dot gnu.org ---
Duplicate.

Fixed in 13.3.

*** This bug has been marked as a duplicate of bug 109948 ***