https://gcc.gnu.org/bugzilla/show_bug.cgi?id=78238
--- Comment #13 from Thomas Koenig <tkoenig at gcc dot gnu.org> --- Author: tkoenig Date: Sun Feb 25 09:02:32 2018 New Revision: 257968 URL: https://gcc.gnu.org/viewcvs?rev=257968&root=gcc&view=rev Log: 2018-02-25 Thomas Koenig <tkoe...@gcc.gnu.org> PR fortran/78238 * gfortran.h (gfc_integer_4_kind): Define. * resolve.c (resolve_select_type): Make sure that the kind of c->high is gfc_integer_4_kind. 2018-02-25 Thomas Koenig <tkoe...@gcc.gnu.org> PR fortran/78238 * gfortran.dg/select_type_40.f90: New test. Added: trunk/gcc/testsuite/gfortran.dg/select_type_40.f90 Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/gfortran.h trunk/gcc/fortran/resolve.c trunk/gcc/testsuite/ChangeLog