diff options
| author | nijtmans <nijtmans> | 2009-02-03 23:10:57 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2009-02-03 23:10:57 (GMT) |
| commit | 6b40f13d26013e672072cb794817a2d322d8127e (patch) | |
| tree | a72237070484512e9aa19c3f44b7ed7313fe1086 /macosx/tclMacOSXFCmd.c | |
| parent | 78da1e5f1b89986ba2526d799110ffc708040c21 (diff) | |
| download | tcl-6b40f13d26013e672072cb794817a2d322d8127e.zip tcl-6b40f13d26013e672072cb794817a2d322d8127e.tar.gz tcl-6b40f13d26013e672072cb794817a2d322d8127e.tar.bz2 | |
- eliminate some unnessary type casts
- some internal const decorations
- spacing
Diffstat (limited to 'macosx/tclMacOSXFCmd.c')
| -rw-r--r-- | macosx/tclMacOSXFCmd.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/macosx/tclMacOSXFCmd.c b/macosx/tclMacOSXFCmd.c index d1bab28..9d4e1a1 100644 --- a/macosx/tclMacOSXFCmd.c +++ b/macosx/tclMacOSXFCmd.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclMacOSXFCmd.c,v 1.16 2009/01/09 11:21:46 dkf Exp $ + * RCS: @(#) $Id: tclMacOSXFCmd.c,v 1.17 2009/02/03 23:10:57 nijtmans Exp $ */ #include "tclInt.h" @@ -624,7 +624,7 @@ SetOSTypeFromAny( Tcl_Interp *interp, /* Tcl interpreter */ Tcl_Obj *objPtr) /* Pointer to the object to convert */ { - char *string; + const char *string; int length, result = TCL_OK; Tcl_DString ds; Tcl_Encoding encoding = Tcl_GetEncoding(NULL, "macRoman"); |