diff options
| author | davygrvy <davygrvy@pobox.com> | 2001-09-06 01:38:02 (GMT) |
|---|---|---|
| committer | davygrvy <davygrvy@pobox.com> | 2001-09-06 01:38:02 (GMT) |
| commit | 56a5d3c5b07bd3d3920a6063f2e2bcaf575d62fd (patch) | |
| tree | d4b544d85f95ddd7955fd2b11044fdfb55b9334c | |
| parent | 3031ef9606514f959dc9b55b6863092beba22e0f (diff) | |
| download | tcl-56a5d3c5b07bd3d3920a6063f2e2bcaf575d62fd.zip tcl-56a5d3c5b07bd3d3920a6063f2e2bcaf575d62fd.tar.gz tcl-56a5d3c5b07bd3d3920a6063f2e2bcaf575d62fd.tar.bz2 | |
* win/tclWinPipe.c: More Borland compatibility fixes.
[Patch: 436116]
| -rw-r--r-- | win/tclWinPipe.c | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/win/tclWinPipe.c b/win/tclWinPipe.c index 578d7eb..703f568 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.19 2001/08/23 21:15:59 andreas_kupries Exp $ + * RCS: @(#) $Id: tclWinPipe.c,v 1.20 2001/09/06 01:38:02 davygrvy Exp $ */ #include "tclWinInt.h" @@ -2739,9 +2739,12 @@ PipeReaderThread(LPVOID arg) HANDLE *handle = ((WinFile *) infoPtr->readFile)->handle; DWORD count, err; int done = 0; - HANDLE wEvents[2] = {infoPtr->stopReader, infoPtr->startReader}; + HANDLE wEvents[2]; DWORD dwWait; + wEvents[0] = infoPtr->stopReader; + wEvents[1] = infoPtr->startReader; + while (!done) { /* * Wait for the main thread to signal before attempting to wait |