- if (count != sym->function->args)
- cf_error("Function %s takes %u arguments, got %u.", sym->name, sym->function->args, count);
-
- what->sym = sym;
- what->args = args;
- FID_DUMP_BODY
- debug("%scalling %s with following args\n", INDENT, item->sym->name);
- f_dump_line(item->args, indent + 1);
- FID_POSTFIXIFY_BODY
- item->args = f_postfixify(what->args);
- item->body = (item->sym = what->sym)->function;
- FID_SAME_BODY
- /* To be done better */
- if (strcmp(f1->sym->name, f2->sym->name)) return 0;
- if (!f_same(f1->args, f2->args)) return 0;
- if (!f_same(f1->body, f2->body)) return 0;
- FID_ALL
-
- /* First push the body on stack */
- LINEX(whati->body);