ldiv.c 443 B

1234567891011121314151617181920212223
  1. /*
  2. * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
  3. * See the copyright notice in the ACK home directory, in the file "Copyright".
  4. */
  5. /* $Id$ */
  6. #include <stdlib.h>
  7. ldiv_t
  8. ldiv(register long numer, register long denom)
  9. {
  10. ldiv_t r;
  11. r.quot = numer / denom; /* might trap if denom == 0 */
  12. r.rem = numer % denom;
  13. if (r.rem != 0 && (numer > 0) != (r.rem > 0)) {
  14. r.quot++;
  15. r.rem -= denom;
  16. }
  17. return r;
  18. }