diff options
| author | dgp@users.sourceforge.net <dgp> | 2002-01-08 17:14:38 (GMT) |
|---|---|---|
| committer | dgp@users.sourceforge.net <dgp> | 2002-01-08 17:14:38 (GMT) |
| commit | b2a5038777e4776c6007b96e0160f5505680abed (patch) | |
| tree | 704e675d1c8b4d5b1a6ee3d518bb2334c10967d6 /generic/tclStringObj.c | |
| parent | b7e6ea79ad90d9ac83c1b64e1e93f4a43348dc9b (diff) | |
| download | tcl-b2a5038777e4776c6007b96e0160f5505680abed.zip tcl-b2a5038777e4776c6007b96e0160f5505680abed.tar.gz tcl-b2a5038777e4776c6007b96e0160f5505680abed.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. */ { |