| commit | 019a51196acb4a2a188280c6ec558966ec49103f | |
| author | tobi <tobi@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Thu, 15 Jul 2004 14:53:28 +0000 (15 14:53 +0000) | ||
| committer | tobi <tobi@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Thu, 15 Jul 2004 14:53:28 +0000 (15 14:53 +0000) | ||
| tree | 54f96d6b707d2be4133c619d8edf4b68d3546d14 | treesnapshot (tar.gz zip) |
| parent | 3c29018f359bfe8f36d9ef02baa28c7f6388d302 | commitdiff |
PR fortran/15234
* trans-array.c gfc_trans_g77_array,
gfc_trans_dummy_array_bias): Don't call gfc_trans_string_init
for assumed length characters.
(gfc_conv_expr_descriptor): Set se->string_length if dealing
with a character expression.
(gfc_cvonv_array_parameter): Pass string length when passing
character array according to g77 conventions.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@84752 138bc75d-0d04-0410-961f-82ee72b054a4
* trans-array.c gfc_trans_g77_array,
gfc_trans_dummy_array_bias): Don't call gfc_trans_string_init
for assumed length characters.
(gfc_conv_expr_descriptor): Set se->string_length if dealing
with a character expression.
(gfc_cvonv_array_parameter): Pass string length when passing
character array according to g77 conventions.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@84752 138bc75d-0d04-0410-961f-82ee72b054a4
| gcc/fortran/ChangeLog | diffblobblamehistory | |
| gcc/fortran/trans-array.c | diffblobblamehistory |