diff options
Diffstat (limited to 'compat/strtoul.c')
| -rw-r--r-- | compat/strtoul.c | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/compat/strtoul.c b/compat/strtoul.c index 64f95a6..d572c2b 100644 --- a/compat/strtoul.c +++ b/compat/strtoul.c @@ -8,8 +8,6 @@ * * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. - * - * RCS: @(#) $Id: strtoul.c,v 1.7 2007/04/16 13:36:34 dkf Exp $ */ #include "tclInt.h" @@ -20,7 +18,7 @@ * characters). */ -static char cvtIn[] = { +static const char cvtIn[] = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, /* '0' - '9' */ 100, 100, 100, 100, 100, 100, 100, /* punctuation */ 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, /* 'A' - 'Z' */ @@ -52,7 +50,7 @@ static char cvtIn[] = { unsigned long int strtoul( - CONST char *string, /* String of ASCII digits, possibly preceded + const char *string, /* String of ASCII digits, possibly preceded * by white space. For bases greater than 10, * either lower- or upper-case digits may be * used. */ @@ -64,7 +62,7 @@ strtoul( * hex, "0" means octal, anything else means * decimal. */ { - register CONST char *p; + register const char *p; register unsigned long int result = 0; register unsigned digit; int anyDigits = 0; |