diff options
| author | Tristan Gingold <gingold@adacore.com> | 2010-05-24 10:24:36 +0000 |
|---|---|---|
| committer | Tristan Gingold <gingold@adacore.com> | 2010-05-24 10:24:36 +0000 |
| commit | 5fe88cfb8602d9d9e474bc0c6a53907ed3796d76 (patch) | |
| tree | 70c910c6726c4768d65ea581e8911a7e6434d654 /bfd/vms-alpha.c | |
| parent | 212983c2b1e3466595c57d8ec13fa0a10e154eab (diff) | |
| download | gdb-5fe88cfb8602d9d9e474bc0c6a53907ed3796d76.zip gdb-5fe88cfb8602d9d9e474bc0c6a53907ed3796d76.tar.gz gdb-5fe88cfb8602d9d9e474bc0c6a53907ed3796d76.tar.bz2 | |
2010-05-24 Tristan Gingold <gingold@adacore.com>
* vms-alpha.c (_bfd_vms_slurp_egsd): Fix indentation.
(alpha_vms_write_exec): Add a comment.
(_bfd_vms_write_egsd): Ditto.
(alpha_vms_convert_symbol): Remove a blank line.
Diffstat (limited to 'bfd/vms-alpha.c')
| -rw-r--r-- | bfd/vms-alpha.c | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/bfd/vms-alpha.c b/bfd/vms-alpha.c index f4804b4..5c519b0 100644 --- a/bfd/vms-alpha.c +++ b/bfd/vms-alpha.c @@ -1083,7 +1083,7 @@ add_symbol (bfd *abfd, const unsigned char *ascic) /* Read and process EGSD. Return FALSE on failure. */ static bfd_boolean -_bfd_vms_slurp_egsd (bfd * abfd) +_bfd_vms_slurp_egsd (bfd *abfd) { int gsd_type, gsd_size; asection *section; @@ -1116,10 +1116,12 @@ _bfd_vms_slurp_egsd (bfd * abfd) { /* Program section definition. */ struct vms_egps *egps = (struct vms_egps *)vms_rec; + name = _bfd_vms_save_counted_string (&egps->namlng); section = bfd_make_section (abfd, name); if (!section) return FALSE; + old_flags = bfd_getl16 (egps->flags); vms_section_data (section)->flags = old_flags; vms_section_data (section)->no_flags = 0; @@ -3075,6 +3077,7 @@ alpha_vms_write_exec (bfd *abfd) PRIV (file_pos) += sec->size; } + /* Update EIHS. */ if (eihs != NULL && dst != NULL) { bfd_putl32 ((dst->filepos / VMS_BLOCK_SIZE) + 1, eihs->dstvbn); @@ -3210,10 +3213,11 @@ _bfd_vms_write_egsd (bfd *abfd) } /* Don't know if this is necessary for the linker but for now it keeps - vms_slurp_gsd happy */ + vms_slurp_gsd happy. */ sname = (char *)section->name; if (*sname == '.') { + /* Remove leading dot. */ sname++; if ((*sname == 't') && (strcmp (sname, "text") == 0)) sname = EVAX_CODE_NAME; @@ -3359,7 +3363,6 @@ done: _bfd_vms_output_counted (recwr, hash); _bfd_vms_output_end_subrec (recwr); - } _bfd_vms_output_alignment (recwr, 8); @@ -4663,7 +4666,6 @@ alpha_vms_convert_symbol (bfd *abfd, struct vms_symbol_entry *e, asymbol *sym) value -= sbase; } #endif - break; default: |