vms.h: (MD_FALLBACK_FRAME_STATE_FOR): Fix errors.

	* config/alpha/vms.h: (MD_FALLBACK_FRAME_STATE_FOR): Fix errors.
	Protect with IN_LIBGCC.
	(LINK_EH_SPEC): Add required trailing space.

From-SVN: r48773

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 1c794ace22310444023e7c447ae38f57fe565831..c2de8ae14da5ad776977b7a15cc5c630dfc83182 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,9 @@
+Fri Jan 11 07:35:12 2002  Douglas B Rupp  <rupp@gnat.com>
+
+       * config/alpha/vms.h: (MD_FALLBACK_FRAME_STATE_FOR): Fix errors.
+       Protect with IN_LIBGCC.
+       (LINK_EH_SPEC): Add required trailing space.
+
 Fri Jan 11 09:25:05 2002  Nicola Pero  <n.pero@mi.flashnet.it>
 
        * c-tree.h: Move function declarations so that they are listed 

diff --git a/gcc/config/alpha/vms.h b/gcc/config/alpha/vms.h
index 2c93e15e4337669dded36e1e9c9b1afd05d4adb3..2d1d7d6431443fac5101f10a24a9ac6c1515a8df 100644 (file)
--- a/gcc/config/alpha/vms.h
+++ b/gcc/config/alpha/vms.h
@@ -382,12 +382,11 @@ do {                                                                      \
 #define EH_RETURN_HANDLER_RTX \
   gen_rtx_MEM (Pmode, plus_constant (stack_pointer_rtx, 8))
 
-#define LINK_EH_SPEC "vms-dwarf2eh.o%s"
+#define LINK_EH_SPEC "vms-dwarf2eh.o%s "
 
 #ifdef IN_LIBGCC2
 #include <libicb.h>
 #include <pdscdef.h>
-#endif
 
 #define MD_FALLBACK_FRAME_STATE_FOR(CONTEXT, FS, SUCCESS)              \
  do {                                                                  \
@@ -395,10 +394,10 @@ do {                                                                      \
   PDSCDEF *pv;                                                         \
   INVO_CONTEXT_BLK invo;                                               \
                                                                        \
-  memset (&invo, 0, sizeof INVO_CONTEXT_BLK);                          \
+  memset (&invo, 0, sizeof (INVO_CONTEXT_BLK));                                \
                                                                        \
   invo.libicb$q_ireg [29] = *((long long *) (CONTEXT)->reg [29]);      \
-  invo.libicb$q_ireg [30] = (long long) (CONTEXT)->cfa                 \
+  invo.libicb$q_ireg [30] = (long long) (CONTEXT)->cfa;                        \
   handle = LIB$GET_INVO_HANDLE (&invo);                                        \
   LIB$GET_INVO_CONTEXT (handle, &invo);                                        \
   pv = (PDSCDEF *) invo.libicb$ph_procedure_descriptor;                        \
@@ -408,13 +407,13 @@ do {                                                                      \
       int i, j;                                                                \
                                                                        \
       (FS)->cfa_offset = pv->pdsc$l_size;                              \
-      (FS)->cfg_reg = pv->pdsc$w_flags & PDSC$M_BASE_REG_IS_FP ? 29 : 30; \
+      (FS)->cfa_reg = pv->pdsc$w_flags & PDSC$M_BASE_REG_IS_FP ? 29 : 30; \
       (FS)->retaddr_column = 26;                                       \
       (FS)->cfa_how = CFA_REG_OFFSET;                                  \
       (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$w_rsa_offset - pv->pdsc$l_size;                     \
       (FS)->regs.reg[26].how = REG_SAVED_OFFSET;                       \
                                                                        \
       for (i = 0, j = 0; i < 32; i++)                                  \
@@ -428,6 +427,7 @@ do {                                                                        \
       goto SUCCESS;                                                    \
     }                                                                  \
 } while (0)
+#endif
 
 /* This is how to output an assembler line
    that says to advance the location counter