diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-11-16 12:02:11 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-11-16 12:02:11 (GMT) |
commit | 11731e63db46dac617e84a0273750a7a6d434ea2 (patch) | |
tree | 5105b6b8d9f9e3c3ce5e6084e8d8644f4818067c /tools | |
parent | 39fcae2844fcf9588b9fc5825623b50bf941b62a (diff) | |
parent | a5e261f15f06a283ad8a648611f1a9eb5b8127e1 (diff) | |
download | tcl-11731e63db46dac617e84a0273750a7a6d434ea2.zip tcl-11731e63db46dac617e84a0273750a7a6d434ea2.tar.gz tcl-11731e63db46dac617e84a0273750a7a6d434ea2.tar.bz2 |
eliminate CONST/CONST84/CONST86
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); } |