[Bug fortran/104143] [F2018] Accept scalar actual arguments to assumed-type assumed-size array dummies [type(*), dimension(*)]

[cvs-commit at gcc dot gnu.org]

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

--- Comment #1 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The master branch has been updated by Tobias Burnus <burnus@gcc.gnu.org>:

https://gcc.gnu.org/g:59f6dea963b5f7a6b9ced325200359b4831e7fa7

commit r13-2748-g59f6dea963b5f7a6b9ced325200359b4831e7fa7
Author: Tobias Burnus <tobias@codesourcery.com>
Date:   Tue Sep 20 23:06:19 2022 +0200

    Fortran: F2018 type(*),dimension(*) with scalars [PR104143]

    Assumed-size dummy arguments accept arrays and array elements as actual
    arguments. There are also a few exceptions when real scalars are permitted.
    Since F2018, this includes scalar arguments to assumed-type dummies; while
    type(*) was added in TS29113, this change is only in F2018 itself.

            PR fortran/104143

    gcc/fortran/ChangeLog:

            * interface.cc (compare_parameter): Permit scalar args to
            'type(*), dimension(*)'.

    gcc/testsuite/ChangeLog:

            * gfortran.dg/c-interop/c407b-2.f90: Remove dg-error.
            * gfortran.dg/assumed_type_16.f90: New test.
            * gfortran.dg/assumed_type_17.f90: New test.