From: Andrew R. <and...@us...> - 2005-03-11 18:53:46
|
Update of /cvsroot/plplot/plplot/bindings/f77 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11534/bindings/f77 Modified Files: scstubs.c Log Message: Fix PLINT / int error in PLPARSEOPTS7 - plParseOpts takes an int value for the number of arguments. Index: scstubs.c =================================================================== RCS file: /cvsroot/plplot/plplot/bindings/f77/scstubs.c,v retrieving revision 1.37 retrieving revision 1.38 diff -u -d -r1.37 -r1.38 --- scstubs.c 11 Mar 2005 18:44:47 -0000 1.37 +++ scstubs.c 11 Mar 2005 18:53:34 -0000 1.38 @@ -429,13 +429,13 @@ } void -PLPARSEOPTS7(PLINT *numargs, char *iargs, PLINT *mode, PLINT *maxindex) +PLPARSEOPTS7(int *numargs, char *iargs, PLINT *mode, PLINT *maxindex) { /* Same as in plparseopts fortran subroutine that calls this one. */ #define MAXARGS 20 if(*numargs <= MAXARGS) { char *argv[MAXARGS]; - PLINT i; + int i; for(i = 0; i < *numargs; i++) { argv[i] = iargs + (i* *maxindex); /* fprintf(stderr, "%s\n", argv[i]); */ |