summaryrefslogtreecommitdiffstats
path: root/generic/regc_lex.c
diff options
context:
space:
mode:
authordkf <dkf@noemail.net>2008-04-27 22:21:26 (GMT)
committerdkf <dkf@noemail.net>2008-04-27 22:21:26 (GMT)
commita6ee7f7e74b9345ae2cb9407865230327d0d576a (patch)
tree4e7b1367d8eb030241db8325caa541ce387b7313 /generic/regc_lex.c
parent29b75f74f37139eb2b27dbcd0a6a1aa874c45517 (diff)
downloadtcl-a6ee7f7e74b9345ae2cb9407865230327d0d576a.zip
tcl-a6ee7f7e74b9345ae2cb9407865230327d0d576a.tar.gz
tcl-a6ee7f7e74b9345ae2cb9407865230327d0d576a.tar.bz2
Get rid of pre-C89-isms (esp. CONST vs const).
FossilOrigin-Name: 2d205c22fbe5def21ccd36bc6f7b2d3831f6122d
Diffstat (limited to 'generic/regc_lex.c')
-rw-r--r--generic/regc_lex.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/regc_lex.c b/generic/regc_lex.c
index bc61e14..4be02c6 100644
--- a/generic/regc_lex.c
+++ b/generic/regc_lex.c
@@ -63,7 +63,7 @@
/*
- lexstart - set up lexical stuff, scan leading options
- ^ static VOID lexstart(struct vars *);
+ ^ static void lexstart(struct vars *);
*/
static void
lexstart(
@@ -89,7 +89,7 @@ lexstart(
/*
- prefixes - implement various special prefixes
- ^ static VOID prefixes(struct vars *);
+ ^ static void prefixes(struct vars *);
*/
static void
prefixes(
@@ -207,7 +207,7 @@ prefixes(
- lexnest - "call a subroutine", interpolating string at the lexical level
* Note, this is not a very general facility. There are a number of
* implicit assumptions about what sorts of strings can be subroutines.
- ^ static VOID lexnest(struct vars *, const chr *, const chr *);
+ ^ static void lexnest(struct vars *, const chr *, const chr *);
*/
static void
lexnest(
@@ -275,7 +275,7 @@ static const chr brbackw[] = { /* \w within brackets */
/*
- lexword - interpolate a bracket expression for word characters
* Possibly ought to inquire whether there is a "word" character class.
- ^ static VOID lexword(struct vars *);
+ ^ static void lexword(struct vars *);
*/
static void
lexword(
@@ -922,7 +922,7 @@ lexdigits(
int len;
chr c;
int d;
- CONST uchr ub = (uchr) base;
+ const uchr ub = (uchr) base;
n = 0;
for (len = 0; len < maxlen && !ATEOS(); len++) {
@@ -1080,7 +1080,7 @@ brenext(
/*
- skip - skip white space and comments in expanded form
- ^ static VOID skip(struct vars *);
+ ^ static void skip(struct vars *);
*/
static void
skip(