fprintf(fo, "%s %s=%s", return_type, name, m->name);
params_dump(fo, m->parameters, m->optional_parameters);
fprintf(fo, "(%d params, %d optional)\n", list_length(m->parameters), list_length(m->optional_parameters));
fprintf(fo, "%s %s=%s", return_type, name, m->name);
params_dump(fo, m->parameters, m->optional_parameters);
fprintf(fo, "(%d params, %d optional)\n", list_length(m->parameters), list_length(m->optional_parameters));