diff options
| author | Tobias Burnus <burnus@net-b.de> | 2018-10-16 20:37:08 +0200 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2018-10-16 20:37:08 +0200 |
| commit | c152593057a3315c3e11343efb2717d5fa8b5df0 (patch) | |
| tree | 494f41ed69baffeea88852147f7a3958480cd6ee /gcc/tree-call-cdce.c | |
| parent | 91ab2a1d6e137c2eaa6f8f5966b611bca700ef96 (diff) | |
| download | gcc-c152593057a3315c3e11343efb2717d5fa8b5df0.zip gcc-c152593057a3315c3e11343efb2717d5fa8b5df0.tar.gz gcc-c152593057a3315c3e11343efb2717d5fa8b5df0.tar.bz2 | |
Fix bounds with ALLOCATE with source-expr
PR fortran/67125
* trans-array.c (gfc_array_init_size, gfc_array_allocate):
Rename argument e3_is_array_constr to e3_has_nodescriptor
and update comments.
* trans-stmt.c (gfc_trans_allocate): Also fix lower bound
to 1 for nonalloc/nonpointer func results/vars besides
array constructors.
PR fortran/67125
* gfortran.dg/allocate_with_source_26.f90: New.
From-SVN: r265212
Diffstat (limited to 'gcc/tree-call-cdce.c')
0 files changed, 0 insertions, 0 deletions