summaryrefslogtreecommitdiffstats
path: root/generic/tkDecls.h
diff options
context:
space:
mode:
authorredman <redman>1999-04-28 18:18:06 (GMT)
committerredman <redman>1999-04-28 18:18:06 (GMT)
commit078cc495bf6393b45f891a351a85f1c0e6aaba45 (patch)
treeaace0c7be2665947b15b36259f712838915a9611 /generic/tkDecls.h
parent33b9462f0016ef41b6c303739ad7f53bc697430f (diff)
downloadtk-078cc495bf6393b45f891a351a85f1c0e6aaba45.zip
tk-078cc495bf6393b45f891a351a85f1c0e6aaba45.tar.gz
tk-078cc495bf6393b45f891a351a85f1c0e6aaba45.tar.bz2
Rename TkConsoleCreate_() to Tk_InitConsoleChannels() and make the
function public. Add an interp argument and init the Tcl stubs. Rename TkConsoleInit() to Tk_CreateConsoleWindow() Remove TkConsoleCreate() (no underbar)
Diffstat (limited to 'generic/tkDecls.h')
-rw-r--r--generic/tkDecls.h18
1 files changed, 17 insertions, 1 deletions
diff --git a/generic/tkDecls.h b/generic/tkDecls.h
index f0bf66f..8051955 100644
--- a/generic/tkDecls.h
+++ b/generic/tkDecls.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: tkDecls.h,v 1.3 1999/04/16 01:51:13 stanton Exp $
+ * RCS: @(#) $Id: tkDecls.h,v 1.4 1999/04/28 18:18:06 redman Exp $
*/
#ifndef _TKDECLS
@@ -742,6 +742,12 @@ EXTERN int Tk_SetOptions _ANSI_ARGS_((Tcl_Interp * interp,
int objc, Tcl_Obj *CONST objv[],
Tk_Window tkwin, Tk_SavedOptions * savePtr,
int * maskPtr));
+/* 215 */
+EXTERN void Tk_InitConsoleChannels _ANSI_ARGS_((
+ Tcl_Interp * interp));
+/* 216 */
+EXTERN int Tk_CreateConsoleWindow _ANSI_ARGS_((
+ Tcl_Interp * interp));
typedef struct TkStubHooks {
struct TkPlatStubs *tkPlatStubs;
@@ -969,6 +975,8 @@ typedef struct TkStubs {
void (*tk_MainEx) _ANSI_ARGS_((int argc, char ** argv, Tcl_AppInitProc * appInitProc, Tcl_Interp * interp)); /* 212 */
void (*tk_RestoreSavedOptions) _ANSI_ARGS_((Tk_SavedOptions * savePtr)); /* 213 */
int (*tk_SetOptions) _ANSI_ARGS_((Tcl_Interp * interp, char * recordPtr, Tk_OptionTable optionTable, int objc, Tcl_Obj *CONST objv[], Tk_Window tkwin, Tk_SavedOptions * savePtr, int * maskPtr)); /* 214 */
+ void (*tk_InitConsoleChannels) _ANSI_ARGS_((Tcl_Interp * interp)); /* 215 */
+ int (*tk_CreateConsoleWindow) _ANSI_ARGS_((Tcl_Interp * interp)); /* 216 */
} TkStubs;
extern TkStubs *tkStubsPtr;
@@ -1839,6 +1847,14 @@ extern TkStubs *tkStubsPtr;
#define Tk_SetOptions \
(tkStubsPtr->tk_SetOptions) /* 214 */
#endif
+#ifndef Tk_InitConsoleChannels
+#define Tk_InitConsoleChannels \
+ (tkStubsPtr->tk_InitConsoleChannels) /* 215 */
+#endif
+#ifndef Tk_CreateConsoleWindow
+#define Tk_CreateConsoleWindow \
+ (tkStubsPtr->tk_CreateConsoleWindow) /* 216 */
+#endif
#endif /* defined(USE_TK_STUBS) && !defined(USE_TK_STUB_PROCS) */