diff options
author | andreask <andreask> | 2011-08-16 16:04:28 (GMT) |
---|---|---|
committer | andreask <andreask> | 2011-08-16 16:04:28 (GMT) |
commit | 3323723916d6dd4a6fa97bec7fb95f9299cadf22 (patch) | |
tree | fc1beb7486cce238f18def61fa020af8b50d34bc /generic/tclMain.c | |
parent | 754781a8ca6a7ff2617e2dea8f8fc569c868445e (diff) | |
download | tcl-3323723916d6dd4a6fa97bec7fb95f9299cadf22.zip tcl-3323723916d6dd4a6fa97bec7fb95f9299cadf22.tar.gz tcl-3323723916d6dd4a6fa97bec7fb95f9299cadf22.tar.bz2 |
Fixed the C99/C++ comments introduced by [8d3f0fb215] which break strict C89 compilers (AIX, cough, cough)
Diffstat (limited to 'generic/tclMain.c')
-rw-r--r-- | generic/tclMain.c | 4 |
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); |