view target-utils/libc/atoi.c @ 951:297c7d5b57a2

doc/Rvinterf-logs: new document
author Mychaela Falconia <falcon@freecalypso.org>
date Wed, 07 Jun 2023 07:52:55 +0000
parents 7fb62fc724dc
children
line wrap: on
line source

atoi(p)
	register char *p;
{
	register int n;
	register int f;

	n = 0;
	f = 0;
	for(;;p++) {
		switch(*p) {
		case ' ':
		case '\t':
			continue;
		case '-':
			f++;
		case '+':
			p++;
		}
		break;
	}
	while(*p >= '0' && *p <= '9')
		n = n*10 + *p++ - '0';
	return(f? -n: n);
}