diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2001-09-06 09:35:38 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2001-09-06 09:35:38 (GMT) |
| commit | 00fa35903e2fbdfd338272cca5a688e72cfa2fe5 (patch) | |
| tree | 93416be5c270a49dbdaf6d13f37789d57f26b257 /generic/tclDecls.h | |
| parent | c8fdd3bc2f632161150acc34eba0e6904ada0e9c (diff) | |
| download | tcl-00fa35903e2fbdfd338272cca5a688e72cfa2fe5.zip tcl-00fa35903e2fbdfd338272cca5a688e72cfa2fe5.tar.gz tcl-00fa35903e2fbdfd338272cca5a688e72cfa2fe5.tar.bz2 | |
Changes due to TIP#49 "Tcl_OutputBuffered" from Rolf Schroedter
Diffstat (limited to 'generic/tclDecls.h')
| -rw-r--r-- | generic/tclDecls.h | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/generic/tclDecls.h b/generic/tclDecls.h index e7c744a..a0c3a73 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclDecls.h,v 1.55 2001/09/04 18:06:34 vincentdarley Exp $ + * RCS: @(#) $Id: tclDecls.h,v 1.56 2001/09/06 09:35:38 dkf Exp $ */ #ifndef _TCLDECLS @@ -1495,6 +1495,8 @@ EXTERN Tcl_Filesystem* Tcl_FSGetFileSystemForPath _ANSI_ARGS_(( Tcl_Obj* pathObjPtr)); /* 478 */ EXTERN Tcl_PathType Tcl_FSGetPathType _ANSI_ARGS_((Tcl_Obj * pathObjPtr)); +/* 479 */ +EXTERN int Tcl_OutputBuffered _ANSI_ARGS_((Tcl_Channel chan)); typedef struct TclStubHooks { struct TclPlatStubs *tclPlatStubs; @@ -2033,6 +2035,7 @@ typedef struct TclStubs { char* (*tcl_FSGetTranslatedStringPath) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj* pathPtr)); /* 476 */ Tcl_Filesystem* (*tcl_FSGetFileSystemForPath) _ANSI_ARGS_((Tcl_Obj* pathObjPtr)); /* 477 */ Tcl_PathType (*tcl_FSGetPathType) _ANSI_ARGS_((Tcl_Obj * pathObjPtr)); /* 478 */ + int (*tcl_OutputBuffered) _ANSI_ARGS_((Tcl_Channel chan)); /* 479 */ } TclStubs; #ifdef __cplusplus @@ -3989,6 +3992,10 @@ extern TclStubs *tclStubsPtr; #define Tcl_FSGetPathType \ (tclStubsPtr->tcl_FSGetPathType) /* 478 */ #endif +#ifndef Tcl_OutputBuffered +#define Tcl_OutputBuffered \ + (tclStubsPtr->tcl_OutputBuffered) /* 479 */ +#endif #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */ |