projects / gcc.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: e2bd3e8) | patch
re PR fortran/34817 (mixed-kind "any" and "all" intrinsics with expressions)
authorThomas Koenig <tkoenig@gcc.gnu.org>
Sat, 19 Jan 2008 22:47:47 +0000 (22:47 +0000)
committerThomas Koenig <tkoenig@gcc.gnu.org>
Sat, 19 Jan 2008 22:47:47 +0000 (22:47 +0000)
commitc613d54045e8d5d0b65a5163af59669d32cd3cf1
tree52d13c2f030fbf9ecaaf099b8f197b27f9038eb7tree
parente2bd3e81f541e16f83c5e73f23b0d93ceaf07952commit | diff
re PR fortran/34817 (mixed-kind "any" and "all" intrinsics with expressions)

2008-01-19  Thomas Koenig  <tkoenig@gcc.gnu.org>

PR fortran/34817
PR fortran/34838
* iresolve.c (gfc_resolve_all):  Remove conversion of mask
argument to kind=1 by removing call to resolve_mask_arg().
(gfc_resolve_any):  Likewise.

2008-01-19  Thomas Koenig  <tkoenig@gcc.gnu.org>

PR fortran/34817
PR fortran/34838
* gfortran.dg/any_all_1.f90:  New test.
* gfortran.dg/any_all_2.f90:  New test.

From-SVN: r131660
gcc/fortran/ChangeLog diff | blob | history
gcc/fortran/iresolve.c diff | blob | history
gcc/testsuite/ChangeLog diff | blob | history
gcc/testsuite/gfortran.dg/any_all_1.f90 [new file with mode: 0644] blob
gcc/testsuite/gfortran.dg/any_all_2.f90 [new file with mode: 0644] blob