home *** CD-ROM | disk | FTP | other *** search
/ Dream 48 / Amiga_Dream_48.iso / Atari / c / sozobon-v2 / dlibsrc.lha / ATOL.C < prev    next >
C/C++ Source or Header  |  1988-10-06  |  425b  |  28 lines
  1. #include <stdio.h>
  2. #include <ctype.h>
  3.  
  4. long atol(number)
  5.     register char *number;
  6.     {
  7.     register long n = 0, neg = 0;
  8.  
  9.     while(isspace(*number))
  10.         ++number;
  11.     if(*number == '-')
  12.         {
  13.         neg = 1;
  14.         ++number;
  15.         }
  16.     else if(*number == '+')
  17.         ++number;
  18.     while(isdigit(*number))
  19.         n = (n * 10) + ((*number++) - '0');
  20.     return(neg ? -n : n);
  21.     }
  22.  
  23. int atoi(number)
  24.     char *number;
  25.     {
  26.     return((int) atol(number));
  27.     }
  28.