2018-02-25 Thomas Koenig <tkoenig@gcc.gnu.org>
commit831f6bcc5690e206e55a7244065ff89a0863ca6b
authortkoenig <tkoenig@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 25 Feb 2018 09:02:32 +0000 (25 09:02 +0000)
committertkoenig <tkoenig@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 25 Feb 2018 09:02:32 +0000 (25 09:02 +0000)
treebefc8dea5057c1f1971a4e3fae6cb2061f649b52
parent81f9853c0e555be366787f9042e5c03c339fb80c
2018-02-25  Thomas Koenig  <tkoenig@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  <tkoenig@gcc.gnu.org>

PR fortran/78238
* gfortran.dg/select_type_40.f90: New test.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@257968 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/gfortran.h
gcc/fortran/resolve.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/select_type_40.f90 [new file with mode: 0644]