]> gcc.gnu.org Git - gcc.git/commit
fortran: Set name for *LOC default BACK argument [PR108450]
authorMikael Morin <mikael@gcc.gnu.org>
Sun, 29 Jan 2023 20:57:24 +0000 (21:57 +0100)
committerMikael Morin <mikael@gcc.gnu.org>
Sun, 5 Feb 2023 21:30:51 +0000 (22:30 +0100)
commit32502d82a5b54ca5b8e524df9fcad851727dc54a
treeba9687f9758f361520e1a46d6cff380491c13cec
parent1e60e9124543fd002f3e6dad8172cff8aa1b24b3
fortran: Set name for *LOC default BACK argument [PR108450]

This change fixes an ICE caused by the double resolution of MINLOC,
MAXLOC and FINDLOC expressions which get a default value for the BACK
argument at resolution time.  That argument  is added without name,
and argument reordering code is not prepared to handle unnamed arguments
coming after named ones, so the second resolution causes a NULL pointer
dereference.
The problem is fixed by explicitly setting the argument name.

PR fortran/108450

gcc/fortran/ChangeLog:

* check.cc (gfc_check_minloc_maxloc): Explicitly set argument name.
(gfc_check_findloc): Ditto.

gcc/testsuite/ChangeLog:

* gfortran.dg/gomp/minmaxloc_1.f90: New test.

(cherry picked from commit 2e32a12c04c72f692a7bd119fd3e4e5b74392c9d)
gcc/fortran/check.cc
gcc/testsuite/gfortran.dg/gomp/minmaxloc_1.f90 [new file with mode: 0644]
This page took 0.068452 seconds and 5 git commands to generate.