gen_rtx_CONST_DOUBLE typo

[Richard Henderson]

Ho hum.  Cures mysterious bootstrap death on Alpha.


r~


        * emit-rtl.c (gen_rtx_CONST_DOUBLE): Use XWINT not XINT.
        Clear third and following slots, if they exist.

Index: emit-rtl.c
===================================================================
RCS file: /egcs/carton/cvsfiles/egcs/gcc/emit-rtl.c,v
retrieving revision 1.55
diff -c -p -d -r1.55 emit-rtl.c
*** emit-rtl.c	1999/04/01 17:06:06	1.55
--- emit-rtl.c	1999/04/06 22:43:46
*************** gen_rtx_CONST_DOUBLE (mode, arg0, arg1, 
*** 273,282 ****
       HOST_WIDE_INT arg1, arg2;
  {
    rtx r = rtx_alloc (CONST_DOUBLE);
    PUT_MODE (r, mode);
    XEXP (r, 0) = arg0;
!   XINT (r, 2) = arg1;
!   XINT (r, 3) = arg2;
    return r;
  }
  
--- 273,289 ----
       HOST_WIDE_INT arg1, arg2;
  {
    rtx r = rtx_alloc (CONST_DOUBLE);
+   int i;
+ 
    PUT_MODE (r, mode);
    XEXP (r, 0) = arg0;
!   XEXP (r, 1) = NULL_RTX;
!   XWINT (r, 2) = arg1;
!   XWINT (r, 3) = arg2;
! 
!   for (i = GET_RTX_LENGTH (CONST_DOUBLE) - 1; i > 3; --i)
!     XWINT (r, i) = 0;
! 
    return r;
  }