+2004-05-29  Alan Modra  <amodra@bigpond.net.au>
+
+       * ldlang.c (gc_section_callback): Move SEC_EXCLUDE twiddles..
+       (lang_gc_sections): .. to a LANG_FOR_EACH_INPUT_STATEMENT loop here.
+
 2004-05-28  Andrew Stubbs <andrew.stubbs@superh.com>
 
        * testsuite/ld-sh/arch/arch.exp: New test script.
 
                     lang_input_statement_type *file ATTRIBUTE_UNUSED,
                     void *data ATTRIBUTE_UNUSED)
 {
-  /* SEC_EXCLUDE is ignored when doing a relocatable link, except in
-     the special case of debug info.  (See bfd/stabs.c)
-     Twiddle the flag here, to simplify later linker code.  */
-  if (link_info.relocatable && (section->flags & SEC_DEBUGGING) == 0)
-    section->flags &= ~SEC_EXCLUDE;
-
   /* If the wild pattern was marked KEEP, the member sections
      should be as well.  */
   if (ptr->keep_sections)
        }
     }
 
+  /* SEC_EXCLUDE is ignored when doing a relocatable link, except in
+     the special case of debug info.  (See bfd/stabs.c)
+     Twiddle the flag here, to simplify later linker code.  */
+  if (link_info.relocatable)
+    {
+      LANG_FOR_EACH_INPUT_STATEMENT (f)
+       {
+         asection *sec;
+         for (sec = f->the_bfd->sections; sec != NULL; sec = sec->next)
+           if ((sec->flags & SEC_DEBUGGING) == 0)
+             sec->flags &= ~SEC_EXCLUDE;
+       }
+    }
+
   if (command_line.gc_sections)
     bfd_gc_sections (output_bfd, &link_info);
 }