]> git.ipfire.org Git - thirdparty/gcc.git/commit
Fortran: allow RESTRICT qualifier also for optional arguments [PR100988]
authorHarald Anlauf <anlauf@gmx.de>
Mon, 4 Dec 2023 21:44:53 +0000 (22:44 +0100)
committerHarald Anlauf <anlauf@gmx.de>
Tue, 5 Dec 2023 18:16:19 +0000 (19:16 +0100)
commit9c3a880feecf81c310b4ade210fbd7004c9aece7
tree89b8ee691086d727fad4c35cf767f40880c94df5
parent1dad3df1e7f3fd73f157f88561ef424b6853d960
Fortran: allow RESTRICT qualifier also for optional arguments [PR100988]

gcc/fortran/ChangeLog:

PR fortran/100988
* gfortran.h (IS_PROC_POINTER): New macro.
* trans-types.cc (gfc_sym_type): Use macro in determination if the
restrict qualifier can be used for a dummy variable.  Fix logic to
allow the restrict qualifier also for optional arguments, and to
not apply it to pointer or proc_pointer arguments.

gcc/testsuite/ChangeLog:

PR fortran/100988
* gfortran.dg/coarray_poly_6.f90: Adjust pattern.
* gfortran.dg/coarray_poly_7.f90: Likewise.
* gfortran.dg/coarray_poly_8.f90: Likewise.
* gfortran.dg/missing_optional_dummy_6a.f90: Likewise.
* gfortran.dg/pr100988.f90: New test.

Co-authored-by: Tobias Burnus <tobias@codesourcery.com>
gcc/fortran/gfortran.h
gcc/fortran/trans-types.cc
gcc/testsuite/gfortran.dg/coarray_poly_6.f90
gcc/testsuite/gfortran.dg/coarray_poly_7.f90
gcc/testsuite/gfortran.dg/coarray_poly_8.f90
gcc/testsuite/gfortran.dg/missing_optional_dummy_6a.f90
gcc/testsuite/gfortran.dg/pr100988.f90 [new file with mode: 0644]