/[ascend]/trunk/tcltk98/generic/interface/Integrators.c
ViewVC logotype

Diff of /trunk/tcltk98/generic/interface/Integrators.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 389 by johnpye, Thu Mar 30 06:24:10 2006 UTC revision 411 by ben.allan, Sun Apr 2 07:05:54 2006 UTC
# Line 647  int Asc_IntegGetXSamplesCmd(ClientData c Line 647  int Asc_IntegGetXSamplesCmd(ClientData c
647    double *uvalues = NULL;    double *uvalues = NULL;
648    char *ustring;    char *ustring;
649    double *uv;    double *uv;
650    int trydu=0, prec,stat;    int trydu=0, prec, stat=0;
651    
652    (void)cdata;    /* stop gcc whine about unused parameter */    (void)cdata;    /* stop gcc whine about unused parameter */
653    
# Line 1699  static int Integ_setup(enum Integrator_t Line 1699  static int Integ_setup(enum Integrator_t
1699  int Asc_IntegSetupCmd(ClientData cdata,Tcl_Interp *interp,  int Asc_IntegSetupCmd(ClientData cdata,Tcl_Interp *interp,
1700                     int argc, CONST84 char *argv[])                     int argc, CONST84 char *argv[])
1701  {  {
1702    enum Integrator_type integrator;    enum Integrator_type integrator = UNKNOWN;
1703    char buf[MAXIMUM_NUMERIC_LENGTH];         /* string to hold integer */    char buf[MAXIMUM_NUMERIC_LENGTH];         /* string to hold integer */
1704    CONST84 char *engine = NULL;    CONST84 char *engine = NULL;
1705    int result = 0;         /* 0 = FALSE; 1 = TRUE */    int result = 0;         /* 0 = FALSE; 1 = TRUE */

Legend:
Removed from v.389  
changed lines
  Added in v.411

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22