gcc/testsuite/gcc.dg/980816-1.c

   1 /* { dg-do compile } */
   2
   3 int
   4 div_and_round_double (lden_orig, hden_orig)
   5      int lden_orig, hden_orig;
   6 {
   7   int quo[4];
   8   register int i;
   9   unsigned int  work;
  10   register unsigned int  carry = 0;
  11   int  lden = lden_orig;
  12   int  hden = hden_orig;
  13   neg_double (&lden, &hden);
  14   for (i = 4 - 1; i >= 0; i--)
  15     {
  16       quo[i] = work / (unsigned int ) lden;
  17       carry = work % (unsigned int ) lden;
  18     }
  19   return 0;
  20 }