diff options
Diffstat (limited to 'gcc/fortran/resolve.c')
| -rw-r--r-- | gcc/fortran/resolve.c | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index 28fec7d..1d8a7b6 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -6417,12 +6417,6 @@ resolve_deallocate_expr (gfc_expr *e) if (gfc_check_vardef_context (e, false, _("DEALLOCATE object")) == FAILURE) return FAILURE; - if (e->ts.type == BT_CLASS) - { - /* Only deallocate the DATA component. */ - gfc_add_data_component (e); - } - return SUCCESS; } |