https://gcc.gnu.org/bugzilla/show_bug.cgi?id=78238
--- Comment #14 from Thomas Koenig <tkoenig at gcc dot gnu.org> --- Author: tkoenig Date: Sun Feb 25 09:30:04 2018 New Revision: 257969 URL: https://gcc.gnu.org/viewcvs?rev=257969&root=gcc&view=rev Log: 2018-02-25 Thomas Koenig <tkoe...@gcc.gnu.org> PR fortran/78238 Backport from trunk * 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 Backport from trunk * gfortran.dg/select_type_40.f90: New test. Added: branches/gcc-7-branch/gcc/testsuite/gfortran.dg/select_type_40.f90 Modified: branches/gcc-7-branch/gcc/fortran/ChangeLog branches/gcc-7-branch/gcc/fortran/gfortran.h branches/gcc-7-branch/gcc/fortran/resolve.c branches/gcc-7-branch/gcc/testsuite/ChangeLog