From c6410375c4529e798dfdef177ee755680007fe58 Mon Sep 17 00:00:00 2001 From: "jan.nijtmans" Date: Wed, 10 Apr 2024 12:02:17 +0000 Subject: Tcl_NewBooleanObj() is better here than Tcl_NewIntObj --- generic/tclMain.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/generic/tclMain.c b/generic/tclMain.c index 3e89664..4f31924 100644 --- a/generic/tclMain.c +++ b/generic/tclMain.c @@ -361,7 +361,7 @@ Tcl_MainEx( is.tty = isatty(0); Tcl_SetVar2Ex(interp, "tcl_interactive", NULL, - Tcl_NewIntObj(!path && is.tty), TCL_GLOBAL_ONLY); + Tcl_NewBooleanObj(!path && is.tty), TCL_GLOBAL_ONLY); /* * Invoke application-specific initialization. -- cgit v0.12