From 4857d29d810461f9eca00a0b677e850ebd1b432d Mon Sep 17 00:00:00 2001
From: Douglas B Rupp <rupp@gnat.com>
Date: Fri, 25 Jan 2002 18:49:58 -0500
Subject: [PATCH] x-vms (version): Make static.
* config/alpha/x-vms (version): Make static.
* config/alpha/vms.h (MD_FALLBACK_FRAME_STATE_FOR): Fix error
in previous checkin.
From-SVN: r49230
---
gcc/ChangeLog | 5 +++++
gcc/config/alpha/vms.h | 4 ++--
gcc/config/alpha/x-vms | 2 +-
3 files changed, 8 insertions(+), 3 deletions(-)
diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 8e71612da88f..d16404e21751 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,5 +1,10 @@
2002-01-25 Douglas B Rupp <rupp@gnat.com>
+ * config/alpha/x-vms (version): Make static.
+
+ * config/alpha/vms.h (MD_FALLBACK_FRAME_STATE_FOR): Fix error
+ in previous checkin.
+
* Makefile.in (install-headers-cp): New target.
* config.gcc (alpha-dec-*vms*): Install headers with
install-headers-cp
diff --git a/gcc/config/alpha/vms.h b/gcc/config/alpha/vms.h
index 2d1d7d643144..a01556ecc322 100644
--- a/gcc/config/alpha/vms.h
+++ b/gcc/config/alpha/vms.h
@@ -413,14 +413,14 @@ do { \
(FS)->regs.reg[27].loc.offset = -pv->pdsc$l_size; \
(FS)->regs.reg[27].how = REG_SAVED_OFFSET; \
(FS)->regs.reg[26].loc.offset \
- = pv->pdsc$w_rsa_offset - pv->pdsc$l_size; \
+ = -(pv->pdsc$l_size - pv->pdsc$w_rsa_offset); \
(FS)->regs.reg[26].how = REG_SAVED_OFFSET; \
\
for (i = 0, j = 0; i < 32; i++) \
if (1<<i & pv->pdsc$l_ireg_mask) \
{ \
(FS)->regs.reg[i].loc.offset \
- = pv->pdsc$l_size - pv->pdsc$w_rsa_offset - 8 * j++; \
+ = -(pv->pdsc$l_size - pv->pdsc$w_rsa_offset - 8 * ++j); \
(FS)->regs.reg[i].how = REG_SAVED_OFFSET; \
} \
\
diff --git a/gcc/config/alpha/x-vms b/gcc/config/alpha/x-vms
index b8fd74a504db..f53f1c795108 100644
--- a/gcc/config/alpha/x-vms
+++ b/gcc/config/alpha/x-vms
@@ -1,5 +1,5 @@
# Under VMS, directory names cannot contain dots.
-version=`echo $(gcc_version) | sed -e 's/\./_/g'`
+version:=$(shell echo $(gcc_version) | sed -e 's/\./_/g')
# Rules for linker and compiler wrappers. These are only useful on
# a VMS host.
--
GitLab