diff options
author | dkf <dkf@noemail.net> | 2008-05-02 10:27:03 (GMT) |
---|---|---|
committer | dkf <dkf@noemail.net> | 2008-05-02 10:27:03 (GMT) |
commit | 3a6f388db483516535cc4015ff7252ca64a280ec (patch) | |
tree | a2961d8a6ed11aa358d492acf28db69f5b9ea4a0 /generic/tclRegexp.h | |
parent | 3241dd8431b925f618db4959dc2f593aaabd34d2 (diff) | |
download | tcl-3a6f388db483516535cc4015ff7252ca64a280ec.zip tcl-3a6f388db483516535cc4015ff7252ca64a280ec.tar.gz tcl-3a6f388db483516535cc4015ff7252ca64a280ec.tar.bz2 |
More elimination of pre-C89-isms.
FossilOrigin-Name: 27caec3459c6d0a42da22078c41eb35bf4661ebf
Diffstat (limited to 'generic/tclRegexp.h')
-rw-r--r-- | generic/tclRegexp.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclRegexp.h b/generic/tclRegexp.h index af5a9ae..bd26b85 100644 --- a/generic/tclRegexp.h +++ b/generic/tclRegexp.h @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclRegexp.h,v 1.15 2007/12/13 15:23:20 dgp Exp $ + * RCS: @(#) $Id: tclRegexp.h,v 1.16 2008/05/02 10:27:08 dkf Exp $ */ #ifndef _TCLREGEXP @@ -30,7 +30,7 @@ typedef struct TclRegexp { int flags; /* Regexp compile flags. */ regex_t re; /* Compiled re, includes number of * subexpressions. */ - CONST char *string; /* Last string passed to Tcl_RegExpExec. */ + const char *string; /* Last string passed to Tcl_RegExpExec. */ Tcl_Obj *objPtr; /* Last object passed to Tcl_RegExpExecObj. */ Tcl_Obj *globObjPtr; /* Glob pattern rep of RE or NULL if none. */ regmatch_t *matches; /* Array of indices into the Tcl_UniChar |