OSDN Git Service

PR fortran/13010
authorpbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 16 Nov 2004 02:02:37 +0000 (02:02 +0000)
committerpbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 16 Nov 2004 02:02:37 +0000 (02:02 +0000)
commit18c38a9b0dd430ad9df866cddfdc5cc1fd9740a4
tree0b302faf5d83b8618c58bea7ea7eb3ca99221e10
parent91688ed7e8021a979dd9e97efa3291995d3623a7
PR fortran/13010
* trans-array.c (gfc_trans_allocate_temp_array): Use gfc_get_dtype.
(gfc_array_init_size, gfc_conv_expr_descriptor): Ditto.
* trans-types.c (gfc_get_dtype): Accept array type rather than element
type.
(gfc_get_nodesc_array_type): Don't set GFC_TYPE_ARRAY_DTYPE.
(gfc_get_array_type_bounds): Ditto.
(gfc_get_derived_type): Recurse into derived type pointers.
* trans-types.h (gfc_get_dtype): Add prototype.
* trans.h (GFC_TYPE_ARRAY_DTYPE): Add comment.
testsuite/
* gfortran.dg/der_pointer_1.f90: New test.

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