compiler/clib/ldiv.c

   1 /*
   2     Copyright © 1995-2002, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: ISO C function ldiv
   6 */
   7
   8 /*****************************************************************************
   9
  10     NAME */
  11 #include <stdlib.h>
  12
  13         ldiv_t ldiv (
  14
  15 /*  SYNOPSIS */
  16         long int numer,
  17         long int denom)
  18
  19 /*  FUNCTION
  20         Compute quotient en remainder of two long variables
  21
  22     INPUTS
  23         numer = the numerator
  24         denom = the denominator
  25
  26     RESULT
  27         a struct with two long ints quot and rem with
  28         quot = numer / denom and rem = numer % denom.
  29
  30         typedef struct ldiv_t {
  31             long int quot;
  32             long int rem;
  33         } ldiv_t;
  34
  35     NOTES
  36
  37     EXAMPLE
  38
  39     BUGS
  40
  41     SEE ALSO
  42         div()
  43
  44     INTERNALS
  45
  46 ******************************************************************************/
  47 {
  48     ldiv_t ret;
  49
  50     ret.quot = numer / denom;
  51     ret.rem  = numer % denom;
  52
  53     /* See div() for why we do this */
  54     if (numer >= 0 && ret.rem < 0)
  55     {
  56         ret.quot++;
  57         ret.rem -= denom;
  58     }
  59     return ret;
  60 }