#include <rpc/rpc.h>
#include "rdval.h"


bool_t
xdr_namelist(xdrs, objp)
	XDR *xdrs;
	namelist objp;
{
	if (!xdr_vector(xdrs, (char *)objp, 100, sizeof(int), xdr_int)) {
		return (FALSE);
	}
	return (TRUE);
}




bool_t
xdr_values(xdrs, objp)
	XDR *xdrs;
	values *objp;
{
/*	if (!xdr_int(xdrs, &objp->errno)) { */
	if (!xdr_int(xdrs, &objp->errrno)) {
		return (FALSE);
	}
	if (!xdr_vector(xdrs, (char *)objp->value, 10, sizeof(double), xdr_double)) {
		return (FALSE);
	}
	return (TRUE);
}