src/stdlib/atol.c

#include <stdlib.h>
#include <ctype.h>

long atol(const char *s)
{
	long n=0;
	int neg=0;
	while (isspace(*s)) s++;
	switch (*s) {
	case '-': neg=1;
	case '+': s++;
	}
	while (isdigit(*s))
		n = 10*n + *s++ - '0';
	return neg ? -n : n;
}