real.c warning removal

[Richard Henderson]

        * real.c (do_fix_trunc): Static.
        (encode_ieee_single, encode_ieee_double, encode_ieee_extended,
        encode_ieee_quad, encode_vax_f, encode_vax_d, encode_vax_g,
        encode_i370_single, encode_i370_double, encode_c4x_single,
        encode_c4x_extended): Add default abort case.

Index: real.c
===================================================================
RCS file: /cvs/gcc/gcc/gcc/real.c,v
retrieving revision 1.87
diff -c -p -d -r1.87 real.c
*** real.c	20 Sep 2002 07:33:24 -0000	1.87
--- real.c	20 Sep 2002 07:55:13 -0000
*************** do_compare (a, b, nan_result)
*** 993,999 ****
  
  /* Return A truncated to an integral value toward zero.  */
  
! void
  do_fix_trunc (r, a)
       REAL_VALUE_TYPE *r;
       const REAL_VALUE_TYPE *a;
--- 993,999 ----
  
  /* Return A truncated to an integral value toward zero.  */
  
! static void
  do_fix_trunc (r, a)
       REAL_VALUE_TYPE *r;
       const REAL_VALUE_TYPE *a;
*************** encode_ieee_single (fmt, buf, r)
*** 2366,2371 ****
--- 2366,2374 ----
        image |= exp << 23;
        image |= sig;
        break;
+ 
+     default:
+       abort ();
      }
  
    buf[0] = image;
*************** encode_ieee_double (fmt, buf, r)
*** 2516,2521 ****
--- 2519,2527 ----
        image_hi |= sig_hi;
        image_lo = sig_lo;
        break;
+ 
+     default:
+       abort ();
      }
  
    if (FLOAT_WORDS_BIG_ENDIAN)
*************** encode_ieee_extended (fmt, buf, r)
*** 2746,2751 ****
--- 2752,2760 ----
  	  }
        }
        break;
+ 
+     default:
+       abort ();
      }
  
    if (FLOAT_WORDS_BIG_ENDIAN)
*************** encode_ieee_quad (fmt, buf, r)
*** 3016,3021 ****
--- 3025,3033 ----
  	  image2 &= 0xffffffff;
  	}
        break;
+ 
+     default:
+       abort ();
      }
  
    if (FLOAT_WORDS_BIG_ENDIAN)
*************** encode_vax_f (fmt, buf, r)
*** 3209,3214 ****
--- 3221,3229 ----
        image |= exp << 7;
        image |= sig >> 16;
        break;
+ 
+     default:
+       abort ();
      }
  
    buf[0] = image;
*************** encode_vax_d (fmt, buf, r)
*** 3281,3286 ****
--- 3296,3304 ----
        image0 |= sign;
        image0 |= (r->exp + 128) << 7;
        break;
+ 
+     default:
+       abort ();
      }
  
    if (FLOAT_WORDS_BIG_ENDIAN)
*************** encode_vax_g (fmt, buf, r)
*** 3382,3387 ****
--- 3400,3408 ----
        image0 |= sign;
        image0 |= (r->exp + 1024) << 4;
        break;
+ 
+     default:
+       abort ();
      }
  
    if (FLOAT_WORDS_BIG_ENDIAN)
*************** encode_i370_single (fmt, buf, r)
*** 3529,3534 ****
--- 3550,3558 ----
        exp = ((r->exp / 4) + 64) << 24;
        image = sign | exp | sig;
        break;
+ 
+     default:
+       abort ();
      }
  
    buf[0] = image;
*************** encode_i370_double (fmt, buf, r)
*** 3599,3604 ****
--- 3623,3631 ----
        exp = ((r->exp / 4) + 64) << 24;
        image_hi |= sign | exp;
        break;
+ 
+     default:
+       abort ();
      }
  
    if (FLOAT_WORDS_BIG_ENDIAN)
*************** encode_c4x_single (fmt, buf, r)
*** 3723,3728 ****
--- 3750,3758 ----
  	  sig |= 0x800000;
  	}
        break;
+ 
+     default:
+       abort ();
      }
  
    image = ((exp & 0xff) << 24) | (sig & 0xffffff);
*************** encode_c4x_extended (fmt, buf, r)
*** 3802,3807 ****
--- 3832,3840 ----
  	  sig |= 0x80000000;
  	}
        break;
+ 
+     default:
+       abort ();
      }
  
    exp = (exp & 0xff) << 24;