74 	proc_list *proc;  local
77 		for (proc = vp->procs; proc != NULL; proc = proc->next) {
79 			ptype(proc->res_prefix, proc->res_type, 1);
81 			pvname(proc->proc_name, vp->vers_num);
82 			printarglist(proc, "clnt", "CLIENT *");
84 			printbody(proc);
98 void printarglist(proc, addargname, addargtype)  in printarglist()  argument
99 	proc_list *proc;  in printarglist()
107 			ptype(proc->args.decls->decl.prefix,
108 			    proc->args.decls->decl.type, 1);
113 			ptype(proc->args.decls->decl.prefix,
114 			    proc->args.decls->decl.type, 1);
117 	} else if (streq(proc->args.decls->decl.type, "void")) {
127 			for (l = proc->args.decls; l != NULL; l = l->next)
130 			for (l = proc->args.decls; l != NULL; l = l->next)
131 				pdeclaration(proc->args.argname, &l->decl, 1, ";\n");
134 			for (l = proc->args.decls; l != NULL; l = l->next)
135 				pdeclaration(proc->args.argname, &l->decl, 0, ", ");
155 printbody(proc)  in printbody()  argument
156 	proc_list *proc;  in printbody()
159 	bool_t args2 = (proc->arg_num > 1);
166 		fprintf(fout, "\t%s", proc->args.argname);
170 	if (streq(proc->res_type, "void")) {
173 		ptype(proc->res_prefix, proc->res_type, 0);
178 	    ampr(proc->res_type), RESULT, RESULT);
179 	if (newstyle && !args2 && (streq(proc->args.decls->decl.type, "void"))) {
182 		    "\tif (clnt_call(clnt, %s, xdr_void", proc->proc_name);
185 		    stringfix(proc->res_type), ampr(proc->res_type), RESULT);
188 		for (l = proc->args.decls;  l != NULL; l = l->next) {
193 		    "\tif (clnt_call(clnt, %s, xdr_%s", proc->proc_name,
194 		    proc->args.argname);
197 		    stringfix(proc->res_type),
198 		    ampr(proc->res_type), RESULT);
203 		    proc->proc_name,
204 		    stringfix(proc->args.decls->decl.type),
206 		    (newstyle ? proc->args.decls->decl.name : "argp"),
207 		    stringfix(proc->res_type),
208 		    ampr(proc->res_type),RESULT);
212 	if (streq(proc->res_type, "void")) {
214 		    ampr(proc->res_type),RESULT);
216 		fprintf(fout, "\treturn (%s%s);\n", ampr(proc->res_type),RESULT);