diff options
Diffstat (limited to 'gcc/fortran/trans-common.c')
| -rw-r--r-- | gcc/fortran/trans-common.c | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/gcc/fortran/trans-common.c b/gcc/fortran/trans-common.c index 92edd20..6cf9d5b 100644 --- a/gcc/fortran/trans-common.c +++ b/gcc/fortran/trans-common.c @@ -1124,11 +1124,6 @@ translate_common (gfc_common_head *common, gfc_symbol *var_list) s->sym->name, &common->where); } } - else - { - /* Offset the whole common block. */ - apply_segment_offset (common_segment, offset); - } /* Apply the offset to the new segments. */ apply_segment_offset (current_segment, offset); |