diff options
author | dkf <dkf@noemail.net> | 2002-07-19 12:31:09 (GMT) |
---|---|---|
committer | dkf <dkf@noemail.net> | 2002-07-19 12:31:09 (GMT) |
commit | d9241d70c77cf4405d75c8dbb53e90e41b2bb2f9 (patch) | |
tree | 4bf2d4935b5e97743834dba726fe88543f867664 /generic/tclUtf.c | |
parent | 1d75b3aadbe5415be2db82c8226e5431c51b7947 (diff) | |
download | tcl-d9241d70c77cf4405d75c8dbb53e90e41b2bb2f9.zip tcl-d9241d70c77cf4405d75c8dbb53e90e41b2bb2f9.tar.gz tcl-d9241d70c77cf4405d75c8dbb53e90e41b2bb2f9.tar.bz2 |
Global symbols are now all either prefixed with 'tcl' (or 'Tcl' or ...) or have file-scope.
FossilOrigin-Name: 86e27ff753182370088914b09b67faefe53a8d37
Diffstat (limited to 'generic/tclUtf.c')
-rw-r--r-- | generic/tclUtf.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclUtf.c b/generic/tclUtf.c index 522b835..897d743 100644 --- a/generic/tclUtf.c +++ b/generic/tclUtf.c @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclUtf.c,v 1.26 2002/05/30 03:27:09 hobbs Exp $ + * RCS: @(#) $Id: tclUtf.c,v 1.27 2002/07/19 12:31:10 dkf Exp $ */ #include "tclInt.h" @@ -61,8 +61,8 @@ * The following structures are used when mapping between Unicode (UCS-2) * and UTF-8. */ - -CONST unsigned char totalBytes[256] = { + +static CONST unsigned char totalBytes[256] = { 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, |