[Python-checkins] CVS: python/dist/src/Modules audioop.c,1.41,1.42 tkappinit.c,1.8,1.9

[Moshe Zadka]

Update of /cvsroot/python/python/dist/src/Modules
In directory slayer.i.sourceforge.net:/tmp/cvs-serv24001/Modules

Modified Files:
	audioop.c tkappinit.c 
Log Message:
Removing warnings discovered by gcc -Wall


Index: audioop.c
===================================================================
RCS file: /cvsroot/python/python/dist/src/Modules/audioop.c,v
retrieving revision 1.41
retrieving revision 1.42
diff -C2 -r1.41 -r1.42
*** audioop.c	2000/07/31 15:28:04	1.41
--- audioop.c	2000/08/04 15:53:06	1.42
***************
*** 88,92 ****
  	56,     48,     40,     32,     24,     16,      8,      0 };
  
! /* #define ZEROTRAP    /* turn on the trap as per the MIL-STD */
  #define BIAS 0x84   /* define the add-in bias for 16 bit samples */
  #define CLIP 32635
--- 88,92 ----
  	56,     48,     40,     32,     24,     16,      8,      0 };
  
! /* #define ZEROTRAP */   /* turn on the trap as per the MIL-STD */
  #define BIAS 0x84   /* define the add-in bias for 16 bit samples */
  #define CLIP 32635

Index: tkappinit.c
===================================================================
RCS file: /cvsroot/python/python/dist/src/Modules/tkappinit.c,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -r1.8 -r1.9
*** tkappinit.c	2000/07/10 09:26:41	1.8
--- tkappinit.c	2000/08/04 15:53:06	1.9
***************
*** 19,23 ****
  Tcl_AppInit(Tcl_Interp *interp)
  {
! 	Tk_Window main;
  
  	if (Tcl_Init (interp) == TCL_ERROR)
--- 19,23 ----
  Tcl_AppInit(Tcl_Interp *interp)
  {
! 	Tk_Window main_window;
  
  	if (Tcl_Init (interp) == TCL_ERROR)
***************
*** 26,30 ****
  		return TCL_ERROR;
  
! 	main = Tk_MainWindow(interp);
  
  #ifdef WITH_MOREBUTTONS
--- 26,30 ----
  		return TCL_ERROR;
  
! 	main_window = Tk_MainWindow(interp);
  
  #ifdef WITH_MOREBUTTONS
***************
*** 34,40 ****
  
  		Tcl_CreateCommand(interp, "studbutton", studButtonCmd,
! 				  (ClientData) main, NULL);
  		Tcl_CreateCommand(interp, "tributton", triButtonCmd,
! 				  (ClientData) main, NULL);
  	}
  #endif
--- 34,40 ----
  
  		Tcl_CreateCommand(interp, "studbutton", studButtonCmd,
! 				  (ClientData) main_window, NULL);
  		Tcl_CreateCommand(interp, "tributton", triButtonCmd,
! 				  (ClientData) main_window, NULL);
  	}
  #endif