[Plplot-cvs] SF.net SVN: plplot:[12014] trunk/examples/tk

[<and...@us...>]

Revision: 12014
          http://plplot.svn.sourceforge.net/plplot/?rev=12014&view=rev
Author:   andrewross
Date:     2011-10-28 19:02:53 +0000 (Fri, 28 Oct 2011)
Log Message:
-----------
Update tk examples to fix a few compiler warnings.

Modified Paths:
--------------
    trunk/examples/tk/xtk01.c
    trunk/examples/tk/xtk02.c
    trunk/examples/tk/xtk04.c

Modified: trunk/examples/tk/xtk01.c
===================================================================
--- trunk/examples/tk/xtk01.c	2011-10-28 18:07:43 UTC (rev 12013)
+++ trunk/examples/tk/xtk01.c	2011-10-28 19:02:53 UTC (rev 12014)
@@ -341,7 +341,7 @@
 { XSPA, 0.0, -1.0, 0.0, YSPA, -1.0 };
 
 static void
-mypltr( PLFLT xloc, PLFLT yloc, PLFLT *tx, PLFLT *ty, void *pltr_data )
+mypltr( PLFLT xloc, PLFLT yloc, PLFLT *tx, PLFLT *ty, void * PL_UNUSED( pltr_data ) )
 {
     *tx = tr[0] * xloc + tr[1] * yloc + tr[2];
     *ty = tr[3] * xloc + tr[4] * yloc + tr[5];
@@ -489,7 +489,7 @@
 }
 //--------------------------------------------------------------------------
 
-int   myplotCmd( ClientData cd, Tcl_Interp *interp, int argc, char **argv )
+int   myplotCmd( ClientData PL_UNUSED( cd ), Tcl_Interp *PL_UNUSED( interp ), int PL_UNUSED( argc ), char **argv )
 {
     if ( !strcmp( argv[1], "1" ) )
         myplot1();

Modified: trunk/examples/tk/xtk02.c
===================================================================
--- trunk/examples/tk/xtk02.c	2011-10-28 18:07:43 UTC (rev 12013)
+++ trunk/examples/tk/xtk02.c	2011-10-28 19:02:53 UTC (rev 12014)
@@ -37,7 +37,7 @@
 //--------------------------------------------------------------------------
 
 int stuff( tclMatrix *pm, Tcl_Interp *interp,
-           int argc, const char *argv[] )
+           int PL_UNUSED( argc ), const char * PL_UNUSED( argv []) )
 {
     int   i;
     PLFLT x, y;
@@ -335,7 +335,7 @@
     plline( 101, x, y );
 }
 
-int   myplotCmd( ClientData cd, Tcl_Interp *interp, int argc, char **argv )
+int   myplotCmd( ClientData PL_UNUSED( cd ), Tcl_Interp *PL_UNUSED( interp ), int PL_UNUSED( argc ), char **argv )
 {
     if ( !strcmp( argv[1], "1" ) )
         myplot1();

Modified: trunk/examples/tk/xtk04.c
===================================================================
--- trunk/examples/tk/xtk04.c	2011-10-28 18:07:43 UTC (rev 12013)
+++ trunk/examples/tk/xtk04.c	2011-10-28 19:02:53 UTC (rev 12014)
@@ -30,7 +30,7 @@
 int mat_min( tclMatrix *pm, Tcl_Interp *interp, int argc, const char *argv[] );
 
 int mat_max( tclMatrix *pm, Tcl_Interp *interp,
-             int argc, const char *argv[] )
+             int PL_UNUSED( argc ), const char *PL_UNUSED( argv[] ) )
 {
     PLFLT max = pm->fdata[0];
     int   i;
@@ -43,7 +43,7 @@
 }
 
 int mat_min( tclMatrix *pm, Tcl_Interp *interp,
-             int argc, const char *argv[] )
+             int PL_UNUSED( argc ), const char *PL_UNUSED( argv[] ) )
 {
     PLFLT min = pm->fdata[0];
     int   i;
@@ -112,7 +112,7 @@
 //--------------------------------------------------------------------------
 //
 
-int   get_dataCmd( ClientData, Tcl_Interp *, int, char ** );
+int get_dataCmd( ClientData, Tcl_Interp *, int, char ** );
 
 static int
 AppInit( Tcl_Interp *interp )
@@ -149,7 +149,8 @@
     return TCL_OK;
 }
 
-int   get_dataCmd( ClientData cd, Tcl_Interp *interp, int argc, char **argv )
+int   
+get_dataCmd( ClientData PL_UNUSED( cd ), Tcl_Interp *interp, int PL_UNUSED( argc ), char **argv )
 {
     tclMatrix *pm, *matPtr;
     int       nx, ny, i, j;

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.