diff options
| author | dgp <dgp@users.sourceforge.net> | 2002-01-08 17:14:38 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2002-01-08 17:14:38 (GMT) |
| commit | 57f48c1a4f24917520871197bce93aea499108d8 (patch) | |
| tree | 704e675d1c8b4d5b1a6ee3d518bb2334c10967d6 /generic/tclStringObj.c | |
| parent | 64d75f9d23874c04fa77962208a6ccbf0bcf8c0e (diff) | |
| download | tcl-57f48c1a4f24917520871197bce93aea499108d8.zip tcl-57f48c1a4f24917520871197bce93aea499108d8.tar.gz tcl-57f48c1a4f24917520871197bce93aea499108d8.tar.bz2 | |
* typos and formatting
Diffstat (limited to 'generic/tclStringObj.c')
| -rw-r--r-- | generic/tclStringObj.c | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index bd07208..659ef41 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -33,7 +33,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclStringObj.c,v 1.22 2001/12/28 23:36:31 dgp Exp $ */ + * RCS: @(#) $Id: tclStringObj.c,v 1.23 2002/01/08 17:14:38 dgp Exp $ */ #include "tclInt.h" @@ -287,7 +287,7 @@ Tcl_DbNewStringObj(bytes, length, file, line) /* *--------------------------------------------------------------------------- * - * TclNewUnicodeObj -- + * Tcl_NewUnicodeObj -- * * This procedure is creates a new String object and initializes * it from the given Unicode String. If the Utf String is the same size @@ -595,8 +595,7 @@ Tcl_GetUnicodeFromObj(objPtr, lengthPtr) Tcl_Obj * Tcl_GetRange(objPtr, first, last) - - Tcl_Obj *objPtr; /* The Tcl object to find the range of. */ + Tcl_Obj *objPtr; /* The Tcl object to find the range of. */ int first; /* First index of the range. */ int last; /* Last index of the range. */ { |