source: buchla-68k/orig/IOLIB/ATOI.C@ 9519422

/*
   =============================================================================
        atoi.c -- ascii to integer conversion
        Version 4 -- 1987-07-09 -- D.N. Lynx Crowe
   =============================================================================
*/

#include "stddefs.h"
#include "ctype.h"

int
atoi(cp)
register char *cp;
{
        register unsigned i;
        register short sign;

        sign = 0;

        if ( *cp EQ '-' ) {

                ++cp;
                sign = 1;

        } else {

                if (*cp EQ '+')
                        ++cp;
        }

        for (i = 0; isdigit(*cp); )
                i = i * 10 + (0x7F & *cp++) - '0';

        return(sign ? -i : i);
}