2004-06-10 Stefan Jones <stefan.jones@multigig.com>

* src/tclspice.c:
	test for FILE in tcl_printf being stdout/stderr
	Could be more than one fd for stdout/stderr
This commit is contained in:
stefanjones 2004-06-10 22:24:07 +00:00
parent 44d907a570
commit d0b3c7c13e
2 changed files with 6 additions and 1 deletions

View File

@ -1,5 +1,9 @@
2004-06-10 Stefan Jones <stefan.jones@multigig.com>
* src/tclspice.c:
test for FILE in tcl_printf being stdout/stderr
Could be more than one fd for stdout/stderr
* src/tclspice.c:
Do not join worker thread when using TCL_Threads as it causes
lockups on W32

View File

@ -1961,7 +1961,8 @@ int tcl_vfprintf(FILE *f, const char *fmt, va_list args_in)
char *outptr, *bigstr = NULL, *finalstr = NULL;
int i, nchars, result, escapes = 0;
if((fileno(f) != STDOUT_FILENO && fileno(f) != STDERR_FILENO)
if((fileno(f) != STDOUT_FILENO && fileno(f) != STDERR_FILENO &&
f != stderr && f != stdout )
#ifdef THREADS
|| ( fl_running && bgtid == thread_self())
#endif