diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2005-11-17 16:21:55 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2005-11-17 16:21:55 (GMT) |
| commit | e80eb01a0079da5a6ad2d524d67b8c8bdfb4fb7e (patch) | |
| tree | b00bf059149c4ea5557da85bf93c22a9b3735ded /generic/tkTextIndex.c | |
| parent | ade22ba319d8ff4395c82135981cc073804ce97a (diff) | |
| download | tk-e80eb01a0079da5a6ad2d524d67b8c8bdfb4fb7e.zip tk-e80eb01a0079da5a6ad2d524d67b8c8bdfb4fb7e.tar.gz tk-e80eb01a0079da5a6ad2d524d67b8c8bdfb4fb7e.tar.bz2 | |
ANSIfy and reduce casting of NULL to promote readability
Diffstat (limited to 'generic/tkTextIndex.c')
| -rw-r--r-- | generic/tkTextIndex.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tkTextIndex.c b/generic/tkTextIndex.c index c9ddab3..970c414 100644 --- a/generic/tkTextIndex.c +++ b/generic/tkTextIndex.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkTextIndex.c,v 1.23 2005/10/10 10:36:35 vincentdarley Exp $ + * RCS: @(#) $Id: tkTextIndex.c,v 1.24 2005/11/17 16:21:56 dkf Exp $ */ #include "default.h" @@ -839,7 +839,7 @@ GetIndex(interp, sharedPtr, textPtr, string, indexPtr, canCachePtr) Tcl_ResetResult(interp); Tcl_AppendResult(interp, "text doesn't contain any characters tagged with \"", - tagName, "\"", (char *) NULL); + tagName, "\"", NULL); Tcl_DStringFree(©); return TCL_ERROR; } @@ -1003,7 +1003,7 @@ GetIndex(interp, sharedPtr, textPtr, string, indexPtr, canCachePtr) error: Tcl_DStringFree(©); Tcl_ResetResult(interp); - Tcl_AppendResult(interp, "bad text index \"", string, "\"", (char *)NULL); + Tcl_AppendResult(interp, "bad text index \"", string, "\"", NULL); return TCL_ERROR; } |