long
str·atoi(char *s)
{
    long n = 0;
    while(*s)
        n = 10*n + (*s++ - '0');

    return n;
}