diff options
author | andreas_kupries <akupries@shaw.ca> | 2001-09-10 17:17:41 (GMT) |
---|---|---|
committer | andreas_kupries <akupries@shaw.ca> | 2001-09-10 17:17:41 (GMT) |
commit | 4b150f866b9cf91bb9974d7cd40a817c428d019e (patch) | |
tree | 192e2e551b9ccd4719de44b72ee348205dd2df89 /generic/tclIntPlatDecls.h | |
parent | 4d5d85ec3b978a2fdd3c1beb1107725a3df66803 (diff) | |
download | tcl-4b150f866b9cf91bb9974d7cd40a817c428d019e.zip tcl-4b150f866b9cf91bb9974d7cd40a817c428d019e.tar.gz tcl-4b150f866b9cf91bb9974d7cd40a817c428d019e.tar.bz2 |
* generic/tclInt.decls: Also added 'TclWinFlushDirtyChannels' to
the internal platform specific stub table.
* win/tclWinFile.c (TclpObjStat): Now added the call to
'TclWinFlushDirtyChannels' to this function. I don't know where
my head was last thursday (2001-09-06), but the call was
actually added to 'TclpObjChdir', i.e. the implementation of
[cd]. Corrected this now. Thanks to Vince Darley for spotting
this.
Diffstat (limited to 'generic/tclIntPlatDecls.h')
-rw-r--r-- | generic/tclIntPlatDecls.h | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/generic/tclIntPlatDecls.h b/generic/tclIntPlatDecls.h index 8c690c8..a81803b 100644 --- a/generic/tclIntPlatDecls.h +++ b/generic/tclIntPlatDecls.h @@ -9,7 +9,7 @@ * Copyright (c) 1998-1999 by Scriptics Corporation. * All rights reserved. * - * RCS: @(#) $Id: tclIntPlatDecls.h,v 1.11 2001/06/17 03:48:19 dgp Exp $ + * RCS: @(#) $Id: tclIntPlatDecls.h,v 1.12 2001/09/10 17:17:41 andreas_kupries Exp $ */ #ifndef _TCLINTPLATDECLS @@ -127,6 +127,8 @@ EXTERN char * TclWinNoBackslash _ANSI_ARGS_((char * path)); EXTERN TclPlatformType * TclWinGetPlatform _ANSI_ARGS_((void)); /* 26 */ EXTERN void TclWinSetInterfaces _ANSI_ARGS_((int wide)); +/* 27 */ +EXTERN void TclWinFlushDirtyChannels _ANSI_ARGS_((void)); #endif /* __WIN32__ */ #ifdef MAC_TCL /* 0 */ @@ -240,6 +242,7 @@ typedef struct TclIntPlatStubs { char * (*tclWinNoBackslash) _ANSI_ARGS_((char * path)); /* 24 */ TclPlatformType * (*tclWinGetPlatform) _ANSI_ARGS_((void)); /* 25 */ void (*tclWinSetInterfaces) _ANSI_ARGS_((int wide)); /* 26 */ + void (*tclWinFlushDirtyChannels) _ANSI_ARGS_((void)); /* 27 */ #endif /* __WIN32__ */ #ifdef MAC_TCL VOID * (*tclpSysAlloc) _ANSI_ARGS_((long size, int isBin)); /* 0 */ @@ -418,6 +421,10 @@ extern TclIntPlatStubs *tclIntPlatStubsPtr; #define TclWinSetInterfaces \ (tclIntPlatStubsPtr->tclWinSetInterfaces) /* 26 */ #endif +#ifndef TclWinFlushDirtyChannels +#define TclWinFlushDirtyChannels \ + (tclIntPlatStubsPtr->tclWinFlushDirtyChannels) /* 27 */ +#endif #endif /* __WIN32__ */ #ifdef MAC_TCL #ifndef TclpSysAlloc |