2004-01-12 Ian Lance Taylor <ian@wasabisystems.com>

[pf3gnuchains/gcc-fork.git] / gcc / unwind-libunwind.c

diff --git a/gcc/unwind-libunwind.c b/gcc/unwind-libunwind.c
index 89e8417..054f983 100644 (file)
--- a/gcc/unwind-libunwind.c
+++ b/gcc/unwind-libunwind.c
@@ -124,6 +124,11 @@ _Unwind_SetGR (struct _Unwind_Context *context, int index, _Unwind_Word val)
   /* Note: here we depend on the fact that general registers are
      expected to start with register number 0!  */
   unw_set_reg (&context->cursor, index, val);
+#ifdef UNW_TARGET_IA64
+  if (index >= UNW_IA64_GR && index <= UNW_IA64_GR + 127)
+    /* Clear the NaT bit.  */
+    unw_set_reg (&context->cursor, UNW_IA64_NAT + (index - UNW_IA64_GR), 0);
+#endif
 }
 
 /* Retrieve the return address for CONTEXT.  */