diff options
| author | mikael <mikael@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-06-15 21:20:29 +0000 |
|---|---|---|
| committer | mikael <mikael@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-06-15 21:20:29 +0000 |
| commit | 144602866ff7535e4f44596dda238755a2f6a93c (patch) | |
| tree | 8461b05815615ef20ed87a04ea2f823645bc0f09 /gcc/fortran/dependency.c | |
| parent | 341de017d77ba2a92b265446516b472cb46ec7f4 (diff) | |
| download | gcc-144602866ff7535e4f44596dda238755a2f6a93c.tar.gz | |
fortran/
PR fortran/49074
PR fortran/56136
* dependency.c (gfc_check_argument_var_dependency): Return 0 in the
array constructor case.
testsuite/
PR fortran/49074
PR fortran/56136
* gfortran.dg/typebound_assignment_5.f03: Check the absence of any
packing.
* gfortran.dg/typebound_assignment_6.f03: New.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@200128 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/dependency.c')
| -rw-r--r-- | gcc/fortran/dependency.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gcc/fortran/dependency.c b/gcc/fortran/dependency.c index 38921b1993f..fcdc1e50177 100644 --- a/gcc/fortran/dependency.c +++ b/gcc/fortran/dependency.c @@ -990,7 +990,9 @@ gfc_check_argument_var_dependency (gfc_expr *var, sym_intent intent, return 0; case EXPR_ARRAY: - return gfc_check_dependency (var, expr, 1); + /* the scalarizer always generates a temporary for array constructors, + so there is no dependency. */ + return 0; case EXPR_FUNCTION: if (intent != INTENT_IN) |