diff options
Diffstat (limited to 'gcc/fortran/trans-expr.c')
| -rw-r--r-- | gcc/fortran/trans-expr.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/gcc/fortran/trans-expr.c b/gcc/fortran/trans-expr.c index f8e4df8..7bdcc72 100644 --- a/gcc/fortran/trans-expr.c +++ b/gcc/fortran/trans-expr.c @@ -1112,10 +1112,12 @@ static void realloc_lhs_warning (bt type, bool array, locus *where) { if (array && type != BT_CLASS && type != BT_DERIVED && warn_realloc_lhs) - gfc_warning ("Code for reallocating the allocatable array at %L will " + gfc_warning (OPT_Wrealloc_lhs, + "Code for reallocating the allocatable array at %L will " "be added", where); else if (warn_realloc_lhs_all) - gfc_warning ("Code for reallocating the allocatable variable at %L " + gfc_warning (OPT_Wrealloc_lhs_all, + "Code for reallocating the allocatable variable at %L " "will be added", where); } |