re PR debug/44112 (Revision 159354 causes Fortran test failures)

	PR debug/44112
	* dwarf2out.c (resolve_one_addr): Check TREE_ASM_WRITTEN
	for all SYMBOL_REF_DECLs.

	* gcc.dg/debug/dwarf2/const-1.c: Remove.
	* g++.dg/debug/dwarf2/const1.C: Remove.

From-SVN: r159429

gcc/ChangeLog

+2010-05-14  Jakub Jelinek  <jakub@redhat.com>
+
+	PR debug/44112
+	* dwarf2out.c (resolve_one_addr): Check TREE_ASM_WRITTEN
+	for all SYMBOL_REF_DECLs.
+
 2010-05-14  Jan Hubicka  <jh@suse.cz>
 
 	* cgraph.h (ipa_discover_readonly_nonaddressable_vars): Declare.

gcc/dwarf2out.c

@@ -21611,7 +21611,6 @@ resolve_one_addr (rtx *addr, void *data ATTRIBUTE_UNUSED)
 
   if (GET_CODE (rtl) == SYMBOL_REF
       && SYMBOL_REF_DECL (rtl)
-      && TREE_CODE (SYMBOL_REF_DECL (rtl)) == VAR_DECL
       && !TREE_ASM_WRITTEN (SYMBOL_REF_DECL (rtl)))
     return 1;
 

gcc/testsuite/ChangeLog

+2010-05-14  Jakub Jelinek  <jakub@redhat.com>
+
+	PR debug/44112
+	* gcc.dg/debug/dwarf2/const-1.c: Remove.
+	* g++.dg/debug/dwarf2/const1.C: Remove.
+
 2010-05-14  Jason Merrill  <jason@redhat.com>
 
 	* g++.dg/eh/cond4.C: New.

gcc/testsuite/g++.dg/debug/dwarf2/const1.C

-/* { dg-do compile } */
-/* { dg-options "-O -gdwarf-2 -dA -gno-strict-dwarf -fno-merge-debug-strings" } */
-/* { dg-require-visibility "" } */
-/* { dg-final { scan-assembler "DW_AT_location\[^\\r\\n\]*\[\\r\\n\]*\[^\\r\\n\]*DW_OP_addr\[^\\r\\n\]*\[\\r\\n\]*\[^\\r\\n\]*fnx\[^\\r\\n\]*\[\\r\\n\]*\[^\\r\\n\]*DW_OP_stack_value" } } */
-
-extern void fnx () __attribute__((visibility ("hidden")));
-void (* const f) () = fnx;

gcc/testsuite/gcc.dg/debug/dwarf2/const-1.c

-/* { dg-do compile } */
-/* { dg-options "-O -gdwarf-2 -dA -gno-strict-dwarf -fno-merge-debug-strings" } */
-/* { dg-require-visibility "" } */
-/* { dg-final { scan-assembler "DW_AT_location\[^\\r\\n\]*\[\\r\\n\]*\[^\\r\\n\]*DW_OP_addr\[^\\r\\n\]*\[\\r\\n\]*\[^\\r\\n\]*fnx\[^\\r\\n\]*\[\\r\\n\]*\[^\\r\\n\]*DW_OP_stack_value" } } */
-
-extern void fnx() __attribute__((visibility("hidden")));
-static void (*f)() = fnx;