|
From: <ai...@us...> - 2013-12-19 01:25:18
|
Revision: 12881
http://sourceforge.net/p/plplot/code/12881
Author: airwin
Date: 2013-12-19 01:25:14 +0000 (Thu, 19 Dec 2013)
Log Message:
-----------
Comment out debug print statements that somehow got into a recent
commit.
Modified Paths:
--------------
trunk/bindings/tk/tkMain.c
Modified: trunk/bindings/tk/tkMain.c
===================================================================
--- trunk/bindings/tk/tkMain.c 2013-12-19 00:46:00 UTC (rev 12880)
+++ trunk/bindings/tk/tkMain.c 2013-12-19 01:25:14 UTC (rev 12881)
@@ -204,7 +204,7 @@
//
// Parse command-line arguments.
//
- fprintf( stderr, "Before Tk_ParseArgv\n" );
+ //fprintf( stderr, "Before Tk_ParseArgv\n" );
if ( Tk_ParseArgv( interp, (Tk_Window) NULL, &argc, argv, argTable, 0 )
!= TCL_OK )
@@ -212,7 +212,7 @@
fprintf( stderr, "%s\n", Tcl_GetStringResult( interp ) );
exit( 1 );
}
- fprintf( stderr, "After Tk_ParseArgv\n" );
+ //fprintf( stderr, "After Tk_ParseArgv\n" );
if ( name == NULL )
{
if ( fileName != NULL )
@@ -315,7 +315,7 @@
// and "argv". Also set the "geometry" variable from the geometry
// specified on the command line.
//
- fprintf( stderr, "Before Tcl_Merge\n" );
+ //fprintf( stderr, "Before Tcl_Merge\n" );
args = Tcl_Merge( argc - 1, ( CONST char * CONST * )argv + 1 );
Tcl_SetVar( interp, "argv", args, TCL_GLOBAL_ONLY );
@@ -323,7 +323,7 @@
sprintf( buf, "%d", argc - 1 );
Tcl_SetVar( interp, "argc", buf, TCL_GLOBAL_ONLY );
- fprintf( stderr, "After Tcl_Merge\n" );
+ //fprintf( stderr, "After Tcl_Merge\n" );
if ( geometry != NULL )
{
Tcl_SetVar( interp, "geometry", geometry, TCL_GLOBAL_ONLY );
@@ -345,7 +345,7 @@
//
// Invoke application-specific initialization.
//
- fprintf( stderr, "Before AppInit\n" );
+ //fprintf( stderr, "Before AppInit\n" );
if ( ( *AppInit )( interp ) != TCL_OK )
{
@@ -369,7 +369,7 @@
//
// Process the startup script, if any.
//
- fprintf( stderr, "Before startup\n" );
+ //fprintf( stderr, "Before startup\n" );
if ( script != NULL )
{
@@ -384,7 +384,7 @@
//
// Invoke the script specified on the command line, if any.
//
- fprintf( stderr, "Before source\n" );
+ //fprintf( stderr, "Before source\n" );
if ( fileName != NULL )
{
@@ -448,7 +448,7 @@
// are no windows left, Tk_MainLoop returns and we exit.
//
- fprintf( stderr, "Before Tk_MainLoop\n" );
+ //fprintf( stderr, "Before Tk_MainLoop\n" );
Tk_MainLoop();
//
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|