diff options
| author | Bernard Giroud <bgiroud@free.fr> | 2004-04-27 08:35:17 +0200 |
|---|---|---|
| committer | Jim Wilson <wilson@gcc.gnu.org> | 2004-04-26 23:35:17 -0700 |
| commit | 7053a0e246978516c62d3bc328d026ed1e3a94e1 (patch) | |
| tree | 8695065cf1b93c60f255188f91efbc44ba744b74 | |
| parent | 80dc6aa0624cdcc69759f95132637d8af5262c56 (diff) | |
| download | gcc-7053a0e246978516c62d3bc328d026ed1e3a94e1.zip gcc-7053a0e246978516c62d3bc328d026ed1e3a94e1.tar.gz gcc-7053a0e246978516c62d3bc328d026ed1e3a94e1.tar.bz2 | |
Patch from Bernard Giroud.
* config/alpha.c (alpha_end_function): For OpenVMS gas,
correctly output .pdesc directive before .end.
From-SVN: r81214
| -rw-r--r-- | gcc/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/config/alpha/alpha.c | 8 |
2 files changed, 9 insertions, 4 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index f44efd7..d6e0148 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,8 @@ +2004-04-26 Bernard Giroud <bgiroud@free.fr> + + * config/alpha.c (alpha_end_function): For OpenVMS gas, + correctly output .pdesc directive before .end. + 2004-04-26 James E Wilson <wilson@specifixinc.com> Bug 14927 diff --git a/gcc/config/alpha/alpha.c b/gcc/config/alpha/alpha.c index b37b311..dd306d5 100644 --- a/gcc/config/alpha/alpha.c +++ b/gcc/config/alpha/alpha.c @@ -7855,6 +7855,10 @@ alpha_expand_epilogue (void) void alpha_end_function (FILE *file, const char *fnname, tree decl ATTRIBUTE_UNUSED) { +#if TARGET_ABI_OPEN_VMS + alpha_write_linkage (file, fnname, decl); +#endif + /* End the function. */ if (!TARGET_ABI_UNICOSMK && !flag_inhibit_size_directive) { @@ -7864,10 +7868,6 @@ alpha_end_function (FILE *file, const char *fnname, tree decl ATTRIBUTE_UNUSED) } inside_function = FALSE; -#if TARGET_ABI_OPEN_VMS - alpha_write_linkage (file, fnname, decl); -#endif - /* Output jump tables and the static subroutine information block. */ if (TARGET_ABI_UNICOSMK) { |