From 7053a0e246978516c62d3bc328d026ed1e3a94e1 Mon Sep 17 00:00:00 2001 From: Bernard Giroud Date: Tue, 27 Apr 2004 08:35:17 +0200 Subject: [PATCH] Patch from Bernard Giroud. * config/alpha.c (alpha_end_function): For OpenVMS gas, correctly output .pdesc directive before .end. From-SVN: r81214 --- gcc/ChangeLog | 5 +++++ gcc/config/alpha/alpha.c | 8 ++++---- 2 files changed, 9 insertions(+), 4 deletions(-) diff --git a/gcc/ChangeLog b/gcc/ChangeLog index f44efd79bd7..d6e014847f4 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,8 @@ +2004-04-26 Bernard Giroud + + * config/alpha.c (alpha_end_function): For OpenVMS gas, + correctly output .pdesc directive before .end. + 2004-04-26 James E Wilson Bug 14927 diff --git a/gcc/config/alpha/alpha.c b/gcc/config/alpha/alpha.c index b37b311d55f..dd306d520db 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) { -- 2.30.2