[Bug fortran/103789] ICE when providing kind argument to mask{l,r}

[cvs-commit at gcc dot gnu.org via Gcc-bugs]

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

--- Comment #4 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The master branch has been updated by Mikael Morin <mik...@gcc.gnu.org>:

https://gcc.gnu.org/g:c1c17a43e172ebc28f2cd247f6e83c5fdbc6219f

commit r12-6386-gc1c17a43e172ebc28f2cd247f6e83c5fdbc6219f
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Fri Jan 7 22:34:59 2022 +0100

    Fortran: Ignore KIND argument of a few more intrinsics. [PR103789]

    After PR97896 for which some code was added to ignore the KIND argument
    of the INDEX intrinsics, and PR87711 for which that was extended to
LEN_TRIM
    as well, this propagates it further to MASKL, MASKR, SCAN and VERIFY.

            PR fortran/103789

    gcc/fortran/ChangeLog:

            * trans-array.c (arg_evaluated_for_scalarization): Add MASKL,
MASKR,
            SCAN and VERIFY to the list of intrinsics whose KIND argument is to
be
            ignored.

    gcc/testsuite/ChangeLog:

            * gfortran.dg/maskl_1.f90: New test.
            * gfortran.dg/maskr_1.f90: New test.
            * gfortran.dg/scan_3.f90: New test.
            * gfortran.dg/verify_3.f90: New test.