home *** CD-ROM | disk | FTP | other *** search
- /****************************************************************************
- *
- * $Source: /unixb/home/unixlib/source/unixlib37/src/c/RCS/div,v $
- * $Date: 1996/04/19 21:26:42 $
- * $Revision: 1.1 $
- * $State: Rel $
- * $Author: simon $
- *
- * $Log: div,v $
- * Revision 1.1 1996/04/19 21:26:42 simon
- * Initial revision
- *
- ***************************************************************************/
-
- static const char rcs_id[] = "$Id: div,v 1.1 1996/04/19 21:26:42 simon Rel $";
-
- #include <stdlib.h>
-
- div_t
- div (register int numer, register int denom)
-
- {
- register div_t r;
- register int i;
-
- r.quot = i = numer / denom;
- r.rem = numer - (i * denom);
-
- return (r);
- }
-
- ldiv_t
- ldiv (register long numer, register long denom)
-
- {
- register ldiv_t r;
- register long i;
-
- r.quot = i = numer / denom;
- r.rem = numer - (i * denom);
-
- return (r);
- }
-