diff options
| author | Thomas Koenig <tkoenig@gcc.gnu.org> | 2011-08-05 21:51:59 +0000 |
|---|---|---|
| committer | Thomas Koenig <tkoenig@gcc.gnu.org> | 2011-08-05 21:51:59 +0000 |
| commit | 86dbed7d1bbbee6c0a5304091e089c48a20c0142 (patch) | |
| tree | 355e022c7c1cbec05a02dc85dd3da5320674d598 /libobjc | |
| parent | 7cfea2ef26a3aab320c90d71c35c69a8c78404d7 (diff) | |
| download | gcc-86dbed7d1bbbee6c0a5304091e089c48a20c0142.zip gcc-86dbed7d1bbbee6c0a5304091e089c48a20c0142.tar.gz gcc-86dbed7d1bbbee6c0a5304091e089c48a20c0142.tar.bz2 | |
re PR fortran/37211 (TRANSFER to characters: Size checking)
2011-08-05 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/37221
* gfortran.h (gfc_calculate_transfer_sizes): Add prototype.
* target-memory.h (gfc_target_interpret_expr): Add boolean
argument wether to convert wide characters.
* target-memory.c (gfc_target_expr_size): Also return length
of characters for non-constant expressions if these can be
determined from the cl.
(interpret_array): Add argument for gfc_target_interpret_expr.
(gfc_interpret_derived): Likewise.
(gfc_target_interpret_expr): Likewise.
* check.c: Include target-memory.h.
(gfc_calculate_transfer_sizes): New function.
(gfc_check_transfer): When -Wsurprising is in force, calculate
sizes and warn if result is larger than size (check moved from
gfc_simplify_transfer).
* simplify.c (gfc_simplify_transfer): Use
gfc_calculate_transfer_sizes. Remove warning.
2011-08-05 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/37221
* gfortran.dg/transfer_check_2.f90: New test case.
From-SVN: r177486
Diffstat (limited to 'libobjc')
0 files changed, 0 insertions, 0 deletions