diff options
author | Tristan Gingold <gingold@adacore.com> | 2011-12-20 08:35:12 +0000 |
---|---|---|
committer | Tristan Gingold <gingold@gcc.gnu.org> | 2011-12-20 08:35:12 +0000 |
commit | cf45cd09affe4caf3a045638e26df58ebfcebe42 (patch) | |
tree | f3ab7a7efc152092f8210793ebfab9fdde4144de | |
parent | 8c3db96e6425846bc1f7760c382369ff671e45c6 (diff) | |
download | gcc-cf45cd09affe4caf3a045638e26df58ebfcebe42.zip gcc-cf45cd09affe4caf3a045638e26df58ebfcebe42.tar.gz gcc-cf45cd09affe4caf3a045638e26df58ebfcebe42.tar.bz2 |
alpha.c (alpha_start_function): Adjust condition to create VMS trampoline entry point.
2011-12-20 Tristan Gingold <gingold@adacore.com>
* config/alpha/alpha.c (alpha_start_function): Adjust condition to
create VMS trampoline entry point.
From-SVN: r182521
-rw-r--r-- | gcc/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/config/alpha/alpha.c | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index feefdbc..32c1d24 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,8 @@ +2011-12-20 Tristan Gingold <gingold@adacore.com> + + * config/alpha/alpha.c (alpha_start_function): Adjust condition to + create VMS trampoline entry point. + 2011-12-19 Richard Sandiford <rdsandiford@googlemail.com> PR rtl-optimization/42839 diff --git a/gcc/config/alpha/alpha.c b/gcc/config/alpha/alpha.c index 9048aa4..2d3b62c 100644 --- a/gcc/config/alpha/alpha.c +++ b/gcc/config/alpha/alpha.c @@ -7935,7 +7935,8 @@ alpha_start_function (FILE *file, const char *fnname, if (TARGET_ABI_OPEN_VMS && !TREE_PUBLIC (decl) && DECL_CONTEXT (decl) - && !TYPE_P (DECL_CONTEXT (decl))) + && !TYPE_P (DECL_CONTEXT (decl)) + && TREE_CODE (DECL_CONTEXT (decl)) != TRANSLATION_UNIT_DECL) { strcpy (tramp_label, fnname); strcat (tramp_label, "..tr"); |