From: Jakub Jelinek Date: Thu, 6 Dec 2012 20:34:55 +0000 (+0100) Subject: re PR fortran/55395 (libgfortran bootstrap failure on powerpc-linux-gnu and arm-linux... X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=789b6d0559b6f89b5c755fe1bea435698962f224;p=gcc.git re PR fortran/55395 (libgfortran bootstrap failure on powerpc-linux-gnu and arm-linux-gnueabi) PR fortran/55395 * varpool.c (varpool_remove_node): Don't drop DECL_INITIAL if -g and emitting DWARF2+. From-SVN: r194272 --- diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 3045f2b2e32..0989c488e61 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,9 @@ +2012-12-06 Jakub Jelinek + + PR fortran/55395 + * varpool.c (varpool_remove_node): Don't drop DECL_INITIAL + if -g and emitting DWARF2+. + 2012-12-06 Pat Haugen * config/rs6000/rs6000.c (rs6000_option_override_internal): Set diff --git a/gcc/varpool.c b/gcc/varpool.c index 87f29a02f09..7f4cfe7b459 100644 --- a/gcc/varpool.c +++ b/gcc/varpool.c @@ -65,7 +65,10 @@ varpool_remove_node (struct varpool_node *node) && !DECL_VIRTUAL_P (node->symbol.decl) /* dbxout output constant initializers for readonly vars. */ && (!host_integerp (DECL_INITIAL (node->symbol.decl), 0) - || !TREE_READONLY (node->symbol.decl))) + || !TREE_READONLY (node->symbol.decl)) + /* dwarf2out can use most of the initializers. */ + && write_symbols != DWARF2_DEBUG + && write_symbols != VMS_AND_DWARF2_DEBUG) DECL_INITIAL (node->symbol.decl) = error_mark_node; ggc_free (node); }