1 files changed, 0 insertions, 14 deletions
diff --git a/win/tclWinInit.c b/win/tclWinInit.c
index 64b3b5a..1ddd518 100644
--- a/win/tclWinInit.c
+++ b/win/tclWinInit.c
@@ -493,20 +493,6 @@ TclpSetVariables(
 		TCL_GLOBAL_ONLY);
     }
 
-#if !defined(NDEBUG) && !defined(TCL_NO_DEPRECATED) && TCL_MAJOR_VERSION < 9
-
-    /*
-     * The existence of the "debug" element of the tcl_platform array
-     * indicates that this particular Tcl shell has been compiled with debug
-     * information. Using "info exists tcl_platform(debug)" a Tcl script can
-     * direct the interpreter to load debug versions of DLLs with the load
-     * command.
-     */
-
-    Tcl_SetVar2(interp, "tcl_platform", "debug", "1",
-	    TCL_GLOBAL_ONLY);
-#endif
-
     /*
      * Set up the HOME environment variable from the HOMEDRIVE & HOMEPATH
      * environment variables, if necessary.