72 	fldtab[0]->sval = record;  in recinit()
189 					xfree(fldtab[0]->sval);  in getrec()
190 				fldtab[0]->sval = buf;	/* buf == record */  in getrec()
192 				if (is_number(fldtab[0]->sval, & result)) {  in getrec()
308 	if (is_number(q->sval, & result)) {  in setclvar()
329 	r = fldtab[0]->sval;  in fldbld()
353 				xfree(fldtab[i]->sval);  in fldbld()
354 			fldtab[i]->sval = fr;  in fldbld()
370 				xfree(fldtab[i]->sval);  in fldbld()
376 			fldtab[i]->sval = tostring(buf);  in fldbld()
393 				xfree(fldtab[i]->sval);  in fldbld()
394 			fldtab[i]->sval = fr;  in fldbld()
413 		if(is_number(p->sval, & result)) {  in fldbld()
423 			printf("field %d (%s): |%s|\n", j, p->nval, p->sval);  in fldbld()
436 			xfree(p->sval);  in cleanfld()
437 		p->sval = EMPTY,  in cleanfld()
519 			xfree(fldtab[i]->sval);  in refldbld()
521 		fldtab[i]->sval = fr;  in refldbld()
568 		xfree(fldtab[0]->sval);  in recbld()
570 	fldtab[0]->sval = record;  in recbld()