http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18918
--- Comment #45 from Tobias Burnus <burnus at gcc dot gnu.org> 2011-05-06 18:39:10 UTC --- Author: burnus Date: Fri May 6 18:39:08 2011 New Revision: 173506 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=173506 Log: 2011-05-06 Tobias Burnus <bur...@net-b.de> PR fortran/18918 * trans-array.c (gfc_walk_variable_expr): Continue walking for scalar coarrays. * trans-intrinsic.c (convert_element_to_coarray_ref): New * function. (trans_this_image, trans_image_index, conv_intrinsic_cobound): Use it. (trans_this_image): Fix algorithm. * trans-types.c (gfc_get_element_type, * gfc_get_array_descriptor_base, gfc_sym_type): Handle scalar coarrays. 2011-05-06 Tobias Burnus <bur...@net-b.de> PR fortran/18918 * gfortran.dg/coarray/this_image_2.f90: New. Added: trunk/gcc/testsuite/gfortran.dg/coarray/this_image_2.f90 Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/trans-array.c trunk/gcc/fortran/trans-intrinsic.c trunk/gcc/fortran/trans-types.c trunk/gcc/testsuite/ChangeLog