diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-05-24 19:18:21 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-05-24 19:18:21 (GMT) |
| commit | 53c90dd2dd157a577d263f199af9af9c2fb896d4 (patch) | |
| tree | bc6aef1f55064ed51245d79010b8eddf91ce01e6 /generic/tclStubInit.c | |
| parent | 6f812b4ccb74d0aebe4bbf520bd6710fa82cf549 (diff) | |
| download | tcl-53c90dd2dd157a577d263f199af9af9c2fb896d4.zip tcl-53c90dd2dd157a577d263f199af9af9c2fb896d4.tar.gz tcl-53c90dd2dd157a577d263f199af9af9c2fb896d4.tar.bz2 | |
Take cygwin handling of X11 into account
Implement TclpIsAtty, Cygwin only
doc/dde.n: doc fix
Diffstat (limited to 'generic/tclStubInit.c')
| -rw-r--r-- | generic/tclStubInit.c | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index e623fa6..b548b1d 100644 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -72,7 +72,9 @@ int TclSockMinimumBuffersOld(sock, size) #ifdef __WIN32__ # define TclUnixWaitForFile 0 # define TclpReaddir 0 +# define TclpIsAtty 0 #elif defined(__CYGWIN__) +# define TclpIsAtty TclPlatIsAtty # define TclWinSetInterfaces (void (*) (int)) doNothing # define TclWinAddProcess (void (*) (void *, unsigned int)) doNothing # define TclWinFlushDirtyChannels doNothing @@ -81,6 +83,12 @@ int TclSockMinimumBuffersOld(sock, size) static Tcl_Encoding winTCharEncoding; +static int +TclpIsAtty(int fd) +{ + return isatty(fd); +} + int TclWinGetPlatformId() { @@ -461,7 +469,7 @@ TclIntPlatStubs tclIntPlatStubs = { TclpCreateCommandChannel, /* 13 */ TclpCreatePipe, /* 14 */ TclpCreateProcess, /* 15 */ - NULL, /* 16 */ + TclpIsAtty, /* 16 */ NULL, /* 17 */ TclpMakeFile, /* 18 */ TclpOpenFile, /* 19 */ |