Line | |
---|
1 | /*
|
---|
2 | * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
|
---|
3 | * See the copyright notice in the ACK home directory, in the file "Copyright".
|
---|
4 | */
|
---|
5 | /* $Header: /cvsup/minix/src/lib/ansi/atol.c,v 1.1.1.1 2005/04/21 14:56:04 beng Exp $ */
|
---|
6 |
|
---|
7 | #include <ctype.h>
|
---|
8 | #include <stdlib.h>
|
---|
9 |
|
---|
10 | /* We do not use strtol here for backwards compatibility in behaviour on
|
---|
11 | overflow.
|
---|
12 | */
|
---|
13 | long
|
---|
14 | atol(register const char *nptr)
|
---|
15 | {
|
---|
16 | long total = 0;
|
---|
17 | int minus = 0;
|
---|
18 |
|
---|
19 | while (isspace(*nptr)) nptr++;
|
---|
20 | if (*nptr == '+') nptr++;
|
---|
21 | else if (*nptr == '-') {
|
---|
22 | minus = 1;
|
---|
23 | nptr++;
|
---|
24 | }
|
---|
25 | while (isdigit(*nptr)) {
|
---|
26 | total *= 10;
|
---|
27 | total += (*nptr++ - '0');
|
---|
28 | }
|
---|
29 | return minus ? -total : total;
|
---|
30 | }
|
---|
Note:
See
TracBrowser
for help on using the repository browser.