ggc-simple.c (ggc_free_rtx): Poison the correct amount for the rtx length.

        * ggc-simple.c (ggc_free_rtx): Poison the correct amount
        for the rtx length.

From-SVN: r29215

gcc/ChangeLog

-Wed Sep  8 15:23:54 1999  Ricahrd Henderson  <rth@cygnus.com>
+Wed Sep  8 16:01:14 1999  Richard Henderson  <rth@cygnus.com>
+
+	* ggc-simple.c (ggc_free_rtx): Poison the correct amount
+	for the rtx length.
+
+Wed Sep  8 15:23:54 1999  Richard Henderson  <rth@cygnus.com>
 
 	* alpha.md (call value patterns): Remove the result predicates.
 

gcc/ggc-simple.c

@@ -300,7 +300,8 @@ ggc_free_rtx (r)
   fprintf (dump, "collect rtx %p\n", &r->rtx);
 #endif
 #ifdef GGC_POISON
-  memset (r, 0xAA, sizeof(*r));
+  memset (r, 0xAA, sizeof(*r) + ((GET_RTX_LENGTH (r->rtx.code) -1)
+				 * sizeof(rtunion)));
 #endif
 
   free (r);