int myplotCmd( ClientData cd, Tcl_Interp *interp, int argc, char **argv ) { if (!strcmp(argv[1],"1")) myplot1(); if (!strcmp(argv[1],"2")) myplot2(); if (!strcmp(argv[1],"3")) myplot3(); if (!strcmp(argv[1],"4")) shade(); plflush(); return TCL_OK; }
int myplotCmd( ClientData PL_UNUSED( cd ), Tcl_Interp *PL_UNUSED( interp ), int PL_UNUSED( argc ), char **argv ) { if ( !strcmp( argv[1], "1" ) ) myplot1(); if ( !strcmp( argv[1], "2" ) ) myplot2(); if ( !strcmp( argv[1], "3" ) ) myplot3(); if ( !strcmp( argv[1], "4" ) ) shade(); plflush(); return TCL_OK; }