Lines Matching refs:fcn
225 int freed = 0; /* handles potential double freeing when fcn & param share a tempcell */
228 Cell *y, *z, *fcn;
231 fcn = execute(a[0]); /* the function itself */
232 s = fcn->nval;
233 if (!isfcn(fcn))
242 ndef = (int) fcn->fval; /* args in defn */
276 fp->fcncell = fcn;
282 y = execute((Node *)(fcn->sval)); /* execute body */
309 tempfree(fcn);
