diff options
| author | jan.nijtmans <jan.nijtmans@noemail.net> | 2012-11-16 11:41:45 (GMT) |
|---|---|---|
| committer | jan.nijtmans <jan.nijtmans@noemail.net> | 2012-11-16 11:41:45 (GMT) |
| commit | 1b03f6618efe0baab9a728219e2452eaf2c10586 (patch) | |
| tree | a845e3facaa1edcd61641704e890dee0f22cddcf /tools | |
| parent | 2ad7039f0601a3a8df3f8a422f73119f0679908f (diff) | |
| download | tcl-1b03f6618efe0baab9a728219e2452eaf2c10586.zip tcl-1b03f6618efe0baab9a728219e2452eaf2c10586.tar.gz tcl-1b03f6618efe0baab9a728219e2452eaf2c10586.tar.bz2 | |
A few unneeded internal CONST/CONST86's
FossilOrigin-Name: b86be725585009ddbb0fe1a1aa3cb677fa241c0c
Diffstat (limited to 'tools')
| -rw-r--r-- | tools/str2c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tools/str2c b/tools/str2c index 971e552..cff7ba2 100644 --- a/tools/str2c +++ b/tools/str2c @@ -36,7 +36,7 @@ static char data\[\]=\"[translate $r]\";" puts "/* * Multi parts read only string generated by str2c */ -static CONST char * CONST data\[\]= {" +static const char * const data\[\]= {" set n 1 for {set i 0} {$i<$lg} {incr i $MAX} { set part [string range $r $i [expr $i+$MAX-1]] @@ -48,7 +48,7 @@ static CONST char * CONST data\[\]= {" } puts "\tNULL\t/* End of data marker */\n};" puts "\n/* use for instance with: - CONST char * CONST *chunk; + const char * const *chunk; for (chunk=data; *chunk; chunk++) { Tcl_AppendResult(interp, *chunk, (char *) NULL); } |