2010-06-25 Tristan Gingold <gingold@adacore.com>
* vms-alpha.c (alpha_vms_write_exec): Set linktime field.
This commit is contained in:
parent
f2c7657e9a
commit
9714ee4866
|
@ -1,3 +1,7 @@
|
||||||
|
2010-06-25 Tristan Gingold <gingold@adacore.com>
|
||||||
|
|
||||||
|
* vms-alpha.c (alpha_vms_write_exec): Set linktime field.
|
||||||
|
|
||||||
2010-06-25 Alan Modra <amodra@gmail.com>
|
2010-06-25 Alan Modra <amodra@gmail.com>
|
||||||
|
|
||||||
* elf64-ppc.c (toc_skip_enum): Define.
|
* elf64-ppc.c (toc_skip_enum): Define.
|
||||||
|
|
|
@ -3007,6 +3007,7 @@ alpha_vms_write_exec (bfd *abfd)
|
||||||
char *module;
|
char *module;
|
||||||
unsigned int len;
|
unsigned int len;
|
||||||
|
|
||||||
|
/* Set module name. */
|
||||||
module = vms_get_module_name (bfd_get_filename (abfd), TRUE);
|
module = vms_get_module_name (bfd_get_filename (abfd), TRUE);
|
||||||
len = strlen (module);
|
len = strlen (module);
|
||||||
if (len > sizeof (eihi->imgnam) - 1)
|
if (len > sizeof (eihi->imgnam) - 1)
|
||||||
|
@ -3015,8 +3016,15 @@ alpha_vms_write_exec (bfd *abfd)
|
||||||
memcpy (eihi->imgnam + 1, module, len);
|
memcpy (eihi->imgnam + 1, module, len);
|
||||||
free (module);
|
free (module);
|
||||||
}
|
}
|
||||||
bfd_putl32 (0, eihi->linktime + 0);
|
{
|
||||||
bfd_putl32 (0, eihi->linktime + 4);
|
unsigned int lo;
|
||||||
|
unsigned int hi;
|
||||||
|
|
||||||
|
/* Set time. */
|
||||||
|
vms_get_time (&hi, &lo);
|
||||||
|
bfd_putl32 (lo, eihi->linktime + 0);
|
||||||
|
bfd_putl32 (hi, eihi->linktime + 4);
|
||||||
|
}
|
||||||
eihi->imgid[0] = 0;
|
eihi->imgid[0] = 0;
|
||||||
eihi->linkid[0] = 0;
|
eihi->linkid[0] = 0;
|
||||||
eihi->imgbid[0] = 0;
|
eihi->imgbid[0] = 0;
|
||||||
|
|
Loading…
Reference in New Issue