summaryrefslogtreecommitdiffstats
path: root/generic/tclMain.c
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclMain.c')
-rw-r--r--generic/tclMain.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclMain.c b/generic/tclMain.c
index 652074e..114d2c3 100644
--- a/generic/tclMain.c
+++ b/generic/tclMain.c
@@ -392,7 +392,7 @@ Tcl_MainEx(
/*
* Arrange for final deletion of the main interp
*/
- // ARGH Munchhausen effect
+ /* ARGH Munchhausen effect */
Tcl_CreateExitHandler(FreeMainInterp, (ClientData)interp);
}
@@ -928,7 +928,7 @@ FreeMainInterp(
{
Tcl_Interp *interp = (Tcl_Interp *) clientData;
- //if (TclInExit()) return;
+ /*if (TclInExit()) return;*/
if (!Tcl_InterpDeleted(interp)) {
Tcl_DeleteInterp(interp);