diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-01-07 09:45:47 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-01-07 09:45:47 (GMT) |
| commit | 631c17942ee182c4f6c613d03b1ab591b749c01e (patch) | |
| tree | b0c47f6103d7ff6fa7ddfccb256b3cec68db8c0d /generic/tclMain.c | |
| parent | 98496f3c16803ba8c85d80543724bf231b2de1cf (diff) | |
| parent | d92cffaa0cf757cfcd982b7b82199eb6149f2ad4 (diff) | |
| download | tcl-631c17942ee182c4f6c613d03b1ab591b749c01e.zip tcl-631c17942ee182c4f6c613d03b1ab591b749c01e.tar.gz tcl-631c17942ee182c4f6c613d03b1ab591b749c01e.tar.bz2 | |
Merge 8.7
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(); |