write_program(def) definition *def;
write_program(definition *def)
write_program(def)	definition *def;{	version_list *vp;	proc_list *proc;	for (vp = def->def.pr.versions; vp != NULL; vp = vp->next) {		for (proc = vp->procs; proc != NULL; proc = proc->next) {			f_print(fout, "\n");			ptype(proc->res_prefix, proc->res_type, 1);			f_print(fout, "*\n");			pvname(proc->proc_name, vp->vers_num);			f_print(fout, "(argp, clnt)\n");			f_print(fout, "\t");			ptype(proc->arg_prefix, proc->arg_type, 1);			f_print(fout, "*argp;\n");			f_print(fout, "\tCLIENT *clnt;\n");			f_print(fout, "{\n");			printbody(proc);			f_print(fout, "}\n\n");		}	}}