diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2005-11-04 00:06:49 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2005-11-04 00:06:49 (GMT) |
| commit | 1917d75e5fe50a58035bc8a2a47fdca8338ec9d7 (patch) | |
| tree | 86211e81a05bc3c61493644f91017b9b65f71771 /win/tclWinFile.c | |
| parent | 169a78358af41a6e77a814a0a73f663542c51a6f (diff) | |
| download | tcl-1917d75e5fe50a58035bc8a2a47fdca8338ec9d7.zip tcl-1917d75e5fe50a58035bc8a2a47fdca8338ec9d7.tar.gz tcl-1917d75e5fe50a58035bc8a2a47fdca8338ec9d7.tar.bz2 | |
ANSIfy
Diffstat (limited to 'win/tclWinFile.c')
| -rw-r--r-- | win/tclWinFile.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/win/tclWinFile.c b/win/tclWinFile.c index 10d242a..eb88bb1 100644 --- a/win/tclWinFile.c +++ b/win/tclWinFile.c @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclWinFile.c,v 1.79 2005/10/31 15:59:41 dkf Exp $ + * RCS: @(#) $Id: tclWinFile.c,v 1.80 2005/11/04 00:06:50 dkf Exp $ */ /* #define _WIN32_WINNT 0x0500 */ @@ -1024,7 +1024,7 @@ TclpMatchInDirectory( Tcl_ResetResult(interp); Tcl_AppendResult(interp, "couldn't read directory \"", Tcl_DStringValue(&dsOrig), "\": ", - Tcl_PosixError(interp), (char *) NULL); + Tcl_PosixError(interp), NULL); } Tcl_DStringFree(&dsOrig); return TCL_ERROR; @@ -1916,7 +1916,7 @@ TclpGetCwd( TclWinConvertError(GetLastError()); if (interp != NULL) { Tcl_AppendResult(interp, "error getting working directory name: ", - Tcl_PosixError(interp), (char *) NULL); + Tcl_PosixError(interp), NULL); } return NULL; } |