mirror of git://gcc.gnu.org/git/gcc.git
vms-c.c (vms_pragma_nomember_alignment): Handle 'byte' alignment.
2012-04-03 Tristan Gingold <gingold@adacore.com> * config/vms/vms-c.c (vms_pragma_nomember_alignment): Handle 'byte' alignment. (vms_c_common_override_options): Allow parameterless variadic functions. From-SVN: r186102
This commit is contained in:
parent
8a1da63435
commit
90b2952fa4
|
|
@ -1,3 +1,10 @@
|
||||||
|
2012-04-03 Tristan Gingold <gingold@adacore.com>
|
||||||
|
|
||||||
|
* config/vms/vms-c.c (vms_pragma_nomember_alignment): Handle
|
||||||
|
'byte' alignment.
|
||||||
|
(vms_c_common_override_options): Allow parameterless variadic
|
||||||
|
functions.
|
||||||
|
|
||||||
2012-04-03 Jakub Jelinek <jakub@redhat.com>
|
2012-04-03 Jakub Jelinek <jakub@redhat.com>
|
||||||
|
|
||||||
PR tree-optimization/52835
|
PR tree-optimization/52835
|
||||||
|
|
|
||||||
|
|
@ -120,7 +120,9 @@ vms_pragma_nomember_alignment (cpp_reader *pfile ATTRIBUTE_UNUSED)
|
||||||
if (arg[0] == '_' && arg[1] == '_')
|
if (arg[0] == '_' && arg[1] == '_')
|
||||||
arg += 2;
|
arg += 2;
|
||||||
|
|
||||||
if (strcmp (arg, "word") == 0)
|
if (strcmp (arg, "byte") == 0)
|
||||||
|
maximum_field_alignment = 1 * BITS_PER_UNIT;
|
||||||
|
else if (strcmp (arg, "word") == 0)
|
||||||
maximum_field_alignment = 2 * BITS_PER_UNIT;
|
maximum_field_alignment = 2 * BITS_PER_UNIT;
|
||||||
else if (strcmp (arg, "longword") == 0)
|
else if (strcmp (arg, "longword") == 0)
|
||||||
maximum_field_alignment = 4 * BITS_PER_UNIT;
|
maximum_field_alignment = 4 * BITS_PER_UNIT;
|
||||||
|
|
@ -453,6 +455,9 @@ vms_c_register_includes (const char *sysroot,
|
||||||
void
|
void
|
||||||
vms_c_common_override_options (void)
|
vms_c_common_override_options (void)
|
||||||
{
|
{
|
||||||
|
/* Allow variadic functions without parameters (as declared in starlet). */
|
||||||
|
flag_allow_parameterless_variadic_functions = TRUE;
|
||||||
|
|
||||||
/* Initialize c_default_pointer_mode. */
|
/* Initialize c_default_pointer_mode. */
|
||||||
switch (flag_vms_pointer_size)
|
switch (flag_vms_pointer_size)
|
||||||
{
|
{
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue