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 | |
| 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)
| -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); |