2005-08-10 Thomas Koenig <Thomas.Koenig@online.de>
commit02ddb12a690f68ca90805e7e22cf4dcecee58060
authortkoenig <tkoenig@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 10 Aug 2005 20:16:29 +0000 (10 20:16 +0000)
committertkoenig <tkoenig@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 10 Aug 2005 20:16:29 +0000 (10 20:16 +0000)
tree192d52eb31c60fbe56e1909dc928b0c43d08c0ca
parent54b4278dc0b77ba87611adfcbc757b126a3c3277
2005-08-10  Thomas Koenig  <Thomas.Koenig@online.de>

PR libfortran/22143
gfortran.h:  Declare new function gfc_resolve_dim_arg.
resolve.c:  New function gfc_resolve_dim_arg.
iresolve.c (gfc_resolve_all):  Use gfc_resolve_dim_arg.
(gfc_resolve_any):  Likewise.
(gfc_resolve_count):  Likewise.
(gfc_resolve_cshift):  Likewise.  If the kind of shift is less
gfc_default_integer_kind, convert it to default integer type.
(gfc_resolve_eoshift):  Likewise.
(gfc_resolve_maxloc):  Use gfc_resolve_dim_arg.
(gfc_resolve_maxval):  Likewise.
(gfc_resolve_minloc):  Likewise.
(gfc_resolve_minval):  Likewise.
(gfc_resolve_product):  Likewise.
(gfc_resolve_spread):  Likewise.
(gfc_resolve_sum):  Likewise.

2005-08-10  Thomas Koenig  <Thomas.Koenig@online.de>

PR libfortran/22143
gfortran.dg/shift-kind.f90:  New testcase.

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