15.4.1687  src/lib/x-kit/xclient/src/wire/xpacket-sink.pkg

## xpacket-sink.pkg
#
# For the big picture see the imp dataflow diagrams in
#
#     src/lib/x-kit/xclient/src/window/xclient-ximps.pkg
#

# Compiled by:
#     src/lib/x-kit/xclient/xclient-internals.sublib



stipulate
    include package   threadkit;                                                                # threadkit                                     is from   src/lib/src/lib/thread-kit/src/core-thread-kit/threadkit.pkg
    #
    package v1u =  vector_of_one_byte_unts;                                                     # vector_of_one_byte_unts                       is from   src/lib/std/src/vector-of-one-byte-unts.pkg
herein


    # This port is implemented in:
    #
    #     src/lib/x-kit/xclient/src/wire/xsequencer-ximp.pkg
    #     src/lib/x-kit/xclient/src/wire/decode-xpackets-ximp.pkg
    #
    package xpacket_sink {
        #
        Xpacket    = { code: v1u::Element,  packet: v1u::Vector };                              # packet-bytecode, packet-bytes.
                                                                                                # code is first byte from message.
                                                                                                # 'packet' is complete message, including code.
        Xpacket_Sink
          =
          {
            put_value:    Xpacket -> Void
          };
    };                                                                                          # package Xpacket_Sink
end;