/* XDR long integers same as xdr_u_long - open coded to save a proc call!  */
bool_t xdr_long(XDR *xdrs, long *lp)
/* XDR long integers same as xdr_u_long - open coded to save a proc call!  */
bool_t xdr_long(XDR *xdrs, long *lp)
{
    if (xdrs->x_op == XDR_ENCODE
        && (sizeof(int32_t) == sizeof(long)
            || (int32_t) *lp == *lp))
        return (XDR_PUTLONG(xdrs, lp));
    if (xdrs->x_op == XDR_DECODE)
        return (XDR_GETLONG(xdrs, lp));
    if (xdrs->x_op == XDR_FREE)
        return (TRUE);
    return (FALSE);
}