diff options
| author | dgp <dgp@users.sourceforge.net> | 2020-01-10 17:40:55 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2020-01-10 17:40:55 (GMT) |
| commit | 5953233f3b74bd690e8861983c58c4be7d05c1ee (patch) | |
| tree | 36868edb789bac2a3752dedb88224afdbee800e7 /generic/tclMain.c | |
| parent | fd4b052c0d6d912177890c1990f506e959cdea5c (diff) | |
| parent | 034fad8f6abf4c938b5384c63b605e25385047e1 (diff) | |
| download | tcl-5953233f3b74bd690e8861983c58c4be7d05c1ee.zip tcl-5953233f3b74bd690e8861983c58c4be7d05c1ee.tar.gz tcl-5953233f3b74bd690e8861983c58c4be7d05c1ee.tar.bz2 | |
merge trunk
Diffstat (limited to 'generic/tclMain.c')
| -rw-r--r-- | generic/tclMain.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclMain.c b/generic/tclMain.c index e2389b0..8b1ee3e 100644 --- a/generic/tclMain.c +++ b/generic/tclMain.c @@ -446,7 +446,7 @@ Tcl_MainEx( * Get a new value for tty if anyone writes to ::tcl_interactive */ - Tcl_LinkVar(interp, "tcl_interactive", (char *) &is.tty, TCL_LINK_BOOLEAN); + Tcl_LinkVar(interp, "tcl_interactive", &is.tty, TCL_LINK_BOOLEAN); is.input = Tcl_GetStdChannel(TCL_STDIN); while ((is.input != NULL) && !Tcl_InterpDeleted(interp)) { mainLoopProc = TclGetMainLoop(); |