@@ -325,11 +325,11 @@ Tcl_AppInit(interp)
325325
326326 main = Tk_MainWindow (interp );
327327 if (Tcl_Init (interp ) == TCL_ERROR ) {
328- fprintf ( stderr , "Tcl_Init error: %s\n" , interp -> result );
328+ PySys_WriteStderr ( "Tcl_Init error: %s\n" , interp -> result );
329329 return TCL_ERROR ;
330330 }
331331 if (Tk_Init (interp ) == TCL_ERROR ) {
332- fprintf ( stderr , "Tk_Init error: %s\n" , interp -> result );
332+ PySys_WriteStderr ( "Tk_Init error: %s\n" , interp -> result );
333333 return TCL_ERROR ;
334334 }
335335 return TCL_OK ;
@@ -464,15 +464,15 @@ Tkapp_Call(self, args)
464464 to Tcl_SplitList() inside Tcl_Eval()... It can save a bundle! */
465465 if (Py_VerboseFlag >= 2 ) {
466466 for (i = 0 ; i < argc ; i ++ )
467- fprintf ( stderr , "%s " , argv [i ]);
467+ PySys_WriteStderr ( "%s " , argv [i ]);
468468 }
469469 if (argc < 1 ||
470470 !Tcl_GetCommandInfo (interp , argv [0 ], & info ) ||
471471 info .proc == NULL )
472472 {
473473 char * cmd ;
474474 if (Py_VerboseFlag >= 2 )
475- fprintf ( stderr , "... use TclEval " );
475+ PySys_WriteStderr ( "... use TclEval " );
476476 cmd = Tcl_Merge (argc , argv );
477477 i = Tcl_Eval (interp , cmd );
478478 ckfree (cmd );
@@ -483,13 +483,13 @@ Tkapp_Call(self, args)
483483 }
484484 if (i == TCL_ERROR ) {
485485 if (Py_VerboseFlag >= 2 )
486- fprintf ( stderr , "... error: '%s'\n" ,
486+ PySys_WriteStderr ( "... error: '%s'\n" ,
487487 interp -> result );
488488 Tkinter_Error (self );
489489 }
490490 else {
491491 if (Py_VerboseFlag >= 2 )
492- fprintf ( stderr , "-> '%s'\n" , interp -> result );
492+ PySys_WriteStderr ( "-> '%s'\n" , interp -> result );
493493 res = PyString_FromString (interp -> result );
494494 }
495495
@@ -1714,7 +1714,7 @@ panic(char * format, ...)
17141714
17151715 va_start (varg , format );
17161716
1717- vfprintf ( stderr , format , varg );
1717+ vPySys_WriteStderr ( format , varg );
17181718 (void ) fflush (stderr );
17191719
17201720 va_end (varg );
0 commit comments