d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Fixed div() and ldiv() for machines with -1/2 = -1

Browse source
This commit is contained in:
ceriel 1993-10-26 13:58:04 +00:00
parent a71ae473ac
commit 067ad0cc22
2 changed files with 14 additions and 30 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

22
lang/cem/libcc.ansi/stdlib/div.c
View file

@ -6,26 +6,18 @@
#include <stdlib.h>
static int tmp = -1;
div_t
div(register int numer, register int denom)
{
div_t r;
/* The assignment of tmp should not be optimized !! */
if (tmp == -1) {
tmp = (tmp / 2 == 0);
}
if (numer == 0) {
r.quot = numer / denom; /* might trap if denom == 0 */
r.rem = numer % denom;
} else if ( !tmp && ((numer < 0) != (denom < 0))) {
r.quot = (numer / denom) + 1;
r.rem = numer - (numer / denom + 1) * denom;
} else {
r.quot = numer / denom;
r.rem = numer % denom;
r.quot = numer / denom; /* might trap if denom == 0 */
r.rem = numer % denom;
if (r.rem != 0 && (numer > 0) != (r.rem > 0)) {
r.quot++;
r.rem -= denom;
}
return r;
}

22
lang/cem/libcc.ansi/stdlib/ldiv.c
View file

@ -6,26 +6,18 @@
#include <stdlib.h>
static long tmp = -1;
ldiv_t
ldiv(register long numer, register long denom)
{
ldiv_t r;
/* The assignment of tmp should not be optimized !! */
if (tmp == -1) {
tmp = (tmp / 2 == 0);
}
if (numer == 0) {
r.quot = numer / denom; /* might trap if denom == 0 */
r.rem = numer % denom;
} else if ( !tmp && ((numer < 0) != (denom < 0))) {
r.quot = (numer / denom) + 1;
r.rem = numer - (numer / denom + 1) * denom;
} else {
r.quot = numer / denom;
r.rem = numer % denom;
r.quot = numer / denom; /* might trap if denom == 0 */
r.rem = numer % denom;
if (r.rem != 0 && (numer > 0) != (r.rem > 0)) {
r.quot++;
r.rem -= denom;
}
return r;
}