https://gcc.gnu.org/bugzilla/show_bug.cgi?id=91541
--- Comment #11 from Thomas Koenig <tkoenig at gcc dot gnu.org> --- Author: tkoenig Date: Mon Dec 30 10:43:38 2019 New Revision: 279763 URL: https://gcc.gnu.org/viewcvs?rev=279763&root=gcc&view=rev Log: Remove KIND argument from INDEX so it does not mess up scalarization. 2019-12-30 Thomas Koenig <tkoe...@gcc.gnu.org> PR fortran/91541 * intrinsic.c (add_sym_4ind): New function. (add_functions): Use it for INDEX. (resolve_intrinsic): Also call f1m for INDEX. * intrinsic.h (gfc_resolve_index_func): Adjust prototype to take a gfc_arglist instead of individual arguments. * iresolve.c (gfc_resolve_index_func): Adjust arguments. Remove KIND argument if present, and make sure this is not done twice. * trans-decl.c: Include "intrinsic.h". (gfc_get_extern_function_decl): Special case for resolving INDEX. 2019-12-30 Thomas Koenig <tkoe...@gcc.gnu.org> PR fortran/91541 * gfortran.dg/index_3.f90: New test. Added: trunk/gcc/testsuite/gfortran.dg/index_3.f90 Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/intrinsic.c trunk/gcc/fortran/intrinsic.h trunk/gcc/fortran/iresolve.c trunk/gcc/fortran/trans-decl.c trunk/gcc/testsuite/ChangeLog
