alpha.c (alpha_end_function): Always generate .end directive on VMS.

2011-06-27  Tristan Gingold  <gingold@adacore.com>

	* config/alpha/alpha.c (alpha_end_function): Always generate .end
	directive on VMS.

From-SVN: r175522

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index ba26774f152ad8745e67d6e361b153972b5fcf8e..c687dbc5a3e108906bf1305d0bb29ab90918e8be 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2011-06-27  Tristan Gingold  <gingold@adacore.com>
+
+       * config/alpha/alpha.c (alpha_end_function): Always generate .end
+       directive on VMS.
+
 2011-06-27  Eric Botcazou  <ebotcazou@adacore.com>
 
        * config/sparc/sparc.c (sparc_frame_pointer_required): Return true if

diff --git a/gcc/config/alpha/alpha.c b/gcc/config/alpha/alpha.c
index ffe9fc0bce403ca698ec729086bc367a4014cff4..510c1a8156893108e5b9bf466b0567feea52870b 100644 (file)
--- a/gcc/config/alpha/alpha.c
+++ b/gcc/config/alpha/alpha.c
@@ -8159,7 +8159,8 @@ alpha_end_function (FILE *file, const char *fnname, tree decl ATTRIBUTE_UNUSED)
 #endif
 
   /* End the function.  */
-  if (!flag_inhibit_size_directive)
+  if (TARGET_ABI_OPEN_VMS
+      || !flag_inhibit_size_directive)
     {
       fputs ("\t.end ", file);
       assemble_name (file, fnname);