| # | Line 10 | Line 10 | static char SCCSid[] = "$SunId$ LBL"; | |
|---|---|---|
| 10 | ||
| 11 | #include <stdio.h> | |
| 12 | ||
| 13 | + | #include "fvect.h" |
| 14 | + | |
| 15 | #include "object.h" | |
| 16 | ||
| 17 | ||
| 18 | extern char *savestr(), *malloc(), *fgetword(); | |
| 19 | + | #ifndef atof |
| 20 | extern double atof(); | |
| 21 | + | #endif |
| 22 | extern int atoi(); | |
| 23 | extern long atol(); | |
| 24 | ||
| # | Line 69 | Line 73 | FILE *fp; | |
| 73 | if (!getint() || (n = atoi(sbuf)) < 0) | |
| 74 | return(0); | |
| 75 | if (fa->nfargs = n) { | |
| 76 | < | fa->farg = (double *)bmalloc(n*sizeof(double)); |
| 76 | > | fa->farg = (FLOAT *)bmalloc(n*sizeof(FLOAT)); |
| 77 | if (fa->farg == NULL) | |
| 78 | return(-1); | |
| 79 | for (i = 0; i < n; i++) { | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines (old) |
| > | Changed lines (new) |