# Module Rpc_packer

    module Rpc_packer: sig .. end

    type packed_value

    val pack_call : Rpc_program.t ->
           Rtypes.uint4 ->
           string ->
           string ->
           string -> string -> string -> Xdr.xdr_value -> packed_value

    val unpack_call : Rpc_program.t ->
           string ->
           packed_value ->
           Rtypes.uint4 * Rtypes.uint4 * Rtypes.uint4 * Rtypes.uint4 * string *
           string * string * string * Xdr.xdr_value

    val unpack_call_frame : packed_value ->
           Rtypes.uint4 * Rtypes.uint4 * Rtypes.uint4 * Rtypes.uint4 * string *
           string * string * string

    val unpack_call_frame_l : packed_value ->
           Rtypes.uint4 * Rtypes.uint4 * Rtypes.uint4 * Rtypes.uint4 * string *
           string * string * string * int

    val unpack_call_body : Rpc_program.t -> string -> packed_value -> int -> Xdr.xdr_value

    val pack_successful_reply : Rpc_program.t ->
           string ->
           Rtypes.uint4 -> string -> string -> Xdr.xdr_value -> packed_value

    val pack_accepting_reply : Rtypes.uint4 ->
           string -> string -> Rpc.server_error -> packed_value

    val pack_rejecting_reply : Rtypes.uint4 -> Rpc.server_error -> packed_value

    val unpack_reply : Rpc_program.t ->
           string ->
           packed_value -> Rtypes.uint4 * string * string * Xdr.xdr_value

    val unpack_reply_verifier : Rpc_program.t -> string -> packed_value -> string * string

    val peek_xid : packed_value -> Rtypes.uint4

    val peek_auth_error : packed_value -> Rpc.server_error option

    val length_of_packed_value : packed_value -> int

    val string_of_packed_value : packed_value -> string

    val packed_value_of_string : string -> packed_value

    val rm_string_of_packed_value : packed_value -> string