diff options
author | nijtmans <nijtmans> | 2010-09-20 14:28:13 (GMT) |
---|---|---|
committer | nijtmans <nijtmans> | 2010-09-20 14:28:13 (GMT) |
commit | d24e3a2febe9142596afe7c394f7bbc27b193eb6 (patch) | |
tree | 96204d0bbc6dfb2be47bad7394e64e6cc9ba34b1 /win/tclWinPipe.c | |
parent | 069e4bbf42e885f83b8bd9264b1e74d0aaf47c0a (diff) | |
download | tcl-d24e3a2febe9142596afe7c394f7bbc27b193eb6.zip tcl-d24e3a2febe9142596afe7c394f7bbc27b193eb6.tar.gz tcl-d24e3a2febe9142596afe7c394f7bbc27b193eb6.tar.bz2 |
Eliminate tclWinProcs->useWide everywhere, since the value is always "1" on platforms >win95dogeen_assembler_split
Diffstat (limited to 'win/tclWinPipe.c')
-rw-r--r-- | win/tclWinPipe.c | 32 |
1 files changed, 8 insertions, 24 deletions
diff --git a/win/tclWinPipe.c b/win/tclWinPipe.c index a71e5af..a41898d 100644 --- a/win/tclWinPipe.c +++ b/win/tclWinPipe.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: tclWinPipe.c,v 1.82 2010/09/09 14:30:20 nijtmans Exp $ + * RCS: @(#) $Id: tclWinPipe.c,v 1.83 2010/09/20 14:28:15 nijtmans Exp $ */ #include "tclWinInt.h" @@ -477,21 +477,14 @@ TempFileName( TCHAR name[MAX_PATH]) /* Buffer in which name for temporary file * gets stored. */ { - TCHAR *prefix; - - prefix = (tclWinProcs->useWide) ? (TCHAR *) L"TCL" : (TCHAR *) "TCL"; + TCHAR *prefix = TEXT("TCL"); if (tclWinProcs->getTempPathProc(MAX_PATH, name) != 0) { if (tclWinProcs->getTempFileNameProc(name, prefix, 0, name) != 0) { return 1; } } - if (tclWinProcs->useWide) { - ((WCHAR *) name)[0] = '.'; - ((WCHAR *) name)[1] = '\0'; - } else { - ((char *) name)[0] = '.'; - ((char *) name)[1] = '\0'; - } + name[0] = '.'; + name[1] = '\0'; return tclWinProcs->getTempFileNameProc(name, prefix, 0, name); } @@ -3115,11 +3108,7 @@ TclpOpenTemporaryFile( if (length == 0) { goto gotError; } - if (tclWinProcs->useWide) { - namePtr += length * sizeof(WCHAR); - } else { - namePtr += length; - } + namePtr += length * sizeof(TCHAR); if (basenameObj) { const char *string = Tcl_GetStringFromObj(basenameObj, &length); @@ -3128,9 +3117,8 @@ TclpOpenTemporaryFile( namePtr += Tcl_DStringLength(&buf); Tcl_DStringFree(&buf); } else { - TCHAR *baseStr = tclWinProcs->useWide ? - (TCHAR *) L"TCL" : (TCHAR *) "TCL"; - int length = tclWinProcs->useWide ? 3*sizeof(WCHAR) : 3; + TCHAR *baseStr = TEXT("TCL"); + int length = 3 * sizeof(TCHAR); memcpy(namePtr, baseStr, length); namePtr += length; @@ -3146,11 +3134,7 @@ TclpOpenTemporaryFile( counter = (unsigned short) (counter + 1); tclWinProcs->utf2tchar(number, strlen(number), &buf); memcpy(namePtr, Tcl_DStringValue(&buf), Tcl_DStringLength(&buf)); - if (tclWinProcs->useWide) { - *(WCHAR *)(namePtr + Tcl_DStringLength(&buf) + 1) = '\0'; - } else { - namePtr[Tcl_DStringLength(&buf) + 1] = '\0'; - } + *(WCHAR *)(namePtr + Tcl_DStringLength(&buf) + 1) = '\0'; Tcl_DStringFree(&buf); handle = tclWinProcs->createFileProc((TCHAR *) name, |