pvname (proc->proc_name, vp->vers_num); printarglist (proc, RQSTP, "struct svc_req *");
pvname(proc->proc_name, vp->vers_num); printarglist(proc, "result", RQSTP, "struct svc_req *"); f_print(fout, "{\n"); if (!mtflag) { f_print(fout, "\tstatic "); if(!streq(proc->res_type, "void")) return_type(proc); else f_print(fout, "char *");   f_print(fout, " result;\n"); } else f_print(fout, "\tbool_t retval;\n"); fprintf (fout, "\n\t/*\n\t * insert server code here\n\t */\n\n");
write_sample_server (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");/*                      if( Cflag )   f_print( fout, "extern \"C\"{\n"); */	  return_type (proc);	  f_print (fout, "* \n");	  if (Cflag)	    pvname_svc (proc->proc_name, vp->vers_num);	  else	    pvname (proc->proc_name, vp->vers_num);	  printarglist (proc, RQSTP, "struct svc_req *");	  f_print (fout, "{\n");	  f_print (fout, "\n\tstatic ");	  if (!streq (proc->res_type, "void"))	    return_type (proc);	  else	    f_print (fout, "char*");	/* cannot have void type */	  f_print (fout, " result;\n" /*, proc->res_type *//*? */ );	  f_print (fout,		   "\n\t/*\n\t * insert server code here\n\t */\n\n");	  if (!streq (proc->res_type, "void"))	    f_print (fout, "\treturn(&result);\n}\n");	  else			/* cast back to void * */	    f_print (fout, "\treturn((void*) &result);\n}\n");/*                      if( Cflag)   f_print( fout, "};\n"); */	}    }}