start writing functions for extracting and inserting unusual operands

[deliverable/binutils-gdb.git] / gas / read.c

diff --git a/gas/read.c b/gas/read.c
index 3eee05502c54db7bae36b5588a691a567fcf6fe1..2bf064d5b428048eb5d193d06f9d05e5fbe0d18c 100644 (file)
--- a/gas/read.c
+++ b/gas/read.c
@@ -1821,6 +1821,11 @@ s_lcomm (needs_align)
        {
          bss_seg = subseg_new (".sbss", 1);
          seg_info (bss_seg)->bss = 1;
+#ifdef BFD_ASSEMBLER
+         if (! bfd_set_section_flags (stdoutput, bss_seg, SEC_ALLOC))
+           as_warn ("error setting flags for \".sbss\": %s",
+                    bfd_errmsg (bfd_get_error ()));
+#endif
        }
     }
 #endif