alpha.c (alpha_start_function, VMS): Cast shift arg to HOST_WIDE_INT, not long.

	* config/alpha/alpha.c (alpha_start_function, VMS): Cast shift
	arg to HOST_WIDE_INT, not long.

From-SVN: r47146

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 8f3db2130f7e46aa6053b97d049f000695e7f2b4..b4ed1c413e70c12a9cee73aed65a2f7e34fb4882 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,5 +1,8 @@
 Sun Nov 18 07:40:07 2001  Douglas B. Rupp  <rupp@gnat.com>
 
+       * config/alpha/alpha.c (alpha_start_function, VMS): Cast shift
+       arg to HOST_WIDE_INT, not long.
+
        * config/alpha/vms.h (DIR_SEPARATOR, PREFIX). Don't define.
        (HAS_INIT_SECTION): Define.
        (REAL_ARITHMETIC): Don't undefine.

diff --git a/gcc/config/alpha/alpha.c b/gcc/config/alpha/alpha.c
index ca9c0e7ee9a60fbba89ac76d37a6f0c4e97da521..c112450fb698bd2d9c405381d726bdfb1b39ddfb 100644 (file)
--- a/gcc/config/alpha/alpha.c
+++ b/gcc/config/alpha/alpha.c
@@ -6334,7 +6334,7 @@ alpha_start_function (file, fnname, decl)
     {
       fprintf (file, "\t.frame $%d,", vms_unwind_regno);
       fprintf (file, HOST_WIDE_INT_PRINT_DEC,
-              frame_size >= (1l << 31) ? 0 : frame_size);
+              frame_size >= ((HOST_WIDE_INT) 1 << 31) ? 0 : frame_size);
       fputs (",$26,", file);
       fprintf (file, HOST_WIDE_INT_PRINT_DEC, reg_offset);
       fputs ("\n", file);