diff options
| author | pbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-05-30 14:37:25 +0000 |
|---|---|---|
| committer | pbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-05-30 14:37:25 +0000 |
| commit | dbe603430d8925eb27f586333e14f95dc86db7af (patch) | |
| tree | 00a8818dcf5ba37c109c3fc7ee836662eddd859e /libjava/java/lang/reflect/InvocationHandler.java | |
| parent | 6c4d3b20f9730a4cd48d43dff1e30ba781cab365 (diff) | |
| download | ppe42-gcc-dbe603430d8925eb27f586333e14f95dc86db7af.tar.gz ppe42-gcc-dbe603430d8925eb27f586333e14f95dc86db7af.zip | |
PR fortran/15620
* trans-decl.c (gfc_shadow_sym, gfc_restore_sym): New functions.
* trans-expr.c (gfc_trans_string_copy): New function.
(gfc_conv_statement_function): Use them. Create temp vars. Enforce
character lengths.
(gfc_conv_string_parameter): Use gfc_trans_string_copy.
* trans-stmt.c (gfc_trans_forall_1): Use gfc_{shadow,restore}_sym.
* trans.h (struct gfc_saved_var): Define.
(gfc_shadow_sym, gfc_restore_sym): Add prototypes.
testsuite/
* gfortran.fortran-torture/execute/st_function_1.f90: New test.
* gfortran.fortran-torture/execute/st_function_2.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@82452 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libjava/java/lang/reflect/InvocationHandler.java')
0 files changed, 0 insertions, 0 deletions
