URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [980816-1.c] - Rev 689
Compare with Previous | Blame | View Log
/* { dg-do compile } */ int div_and_round_double (lden_orig, hden_orig) int lden_orig, hden_orig; { int quo[4]; register int i; unsigned int work; register unsigned int carry = 0; int lden = lden_orig; int hden = hden_orig; neg_double (&lden, &hden); for (i = 4 - 1; i >= 0; i--) { quo[i] = work / (unsigned int ) lden; carry = work % (unsigned int ) lden; } return 0; }