2006-03-22 Paul Thomas <pault@gcc.gnu.org>
authorpault <pault@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 22 Mar 2006 05:13:13 +0000 (05:13 +0000)
committerpault <pault@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 22 Mar 2006 05:13:13 +0000 (05:13 +0000)
commit4eaa93a513db04d1b09d5f2a27aa6203fbacb82d
tree160547b8a0cbfdbccc504f41d26d8910f3255691
parente82d310b739fb50364a818858d32f8bc74b61c45
2006-03-22  Paul Thomas  <pault@gcc.gnu.org>

PR fortran/17298
*trans-intrinsic.c (gfc_conv_intrinsic_array_transfer): New
function to implement array valued TRANSFER intrinsic.
(gfc_conv_intrinsic_function): Call the new function if TRANSFER
and non-null se->ss.
(gfc_walk_intrinsic_function): Treat TRANSFER as one of the
special cases by calling gfc_walk_intrinsic_libfunc directly.

2006-03-22  Paul Thomas  <pault@gcc.gnu.org>

PR fortran/17298
* gfortran.dg/transfer_array_intrinsic_1.f90: New test.
* gfortran.dg/transfer_array_intrinsic_2.f90: New test.

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