66 	fldtab[0]->sval = record;  in recinit()
153 					xfree(fldtab[0]->sval);  in getrec()
154 				fldtab[0]->sval = buf;	/* buf == record */  in getrec()
156 				if (is_number(fldtab[0]->sval)) {  in getrec()
157 					fldtab[0]->fval = atof(fldtab[0]->sval);  in getrec()
256 	if (is_number(q->sval)) {  in setclvar()
257 		q->fval = atof(q->sval);  in setclvar()
277 	r = fldtab[0]->sval;  in fldbld()
302 				xfree(fldtab[i]->sval);  in fldbld()
303 			fldtab[i]->sval = fr;  in fldbld()
318 				xfree(fldtab[i]->sval);  in fldbld()
321 			fldtab[i]->sval = tostring(buf);  in fldbld()
338 				xfree(fldtab[i]->sval);  in fldbld()
339 			fldtab[i]->sval = fr;  in fldbld()
356 		if(is_number(p->sval)) {  in fldbld()
357 			p->fval = atof(p->sval);  in fldbld()
366 			printf("field %d (%s): |%s|\n", j, p->nval, p->sval);  in fldbld()
379 			xfree(p->sval);  in cleanfld()
380 		p->sval = "";  in cleanfld()
462 			xfree(fldtab[i]->sval);  in refldbld()
464 		fldtab[i]->sval = fr;  in refldbld()
511 		xfree(fldtab[0]->sval);  in recbld()
513 	fldtab[0]->sval = record;  in recbld()