#include <stdio.h>
#include <rpc/rpc.h>
#include "xdrs.h"

extern XDR_element xdrfile[MAX_NUM_XDR_FILES];

#ifdef cray
     XDR_REWIND (int *ixdrid)
#else
     void xdr_rewind_(int *ixdrid)
#endif

{
    XDR 	*xdrs;
    u_int	position;

    xdrs     = xdrfile[*ixdrid].xdrs;
    position = 0;

    if (!xdr_setpos(xdrs, position)) {
	fprintf (stderr, "XDR error rewinding file %s\n",
		 xdrfile[*ixdrid].filename );
	exit (-1);
    }
}
