15.4.1688  src/lib/x-kit/xclient/src/wire/xsequencer-to-outbuf.pkg

## xsequencer-to-outbuf.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




                                                                                                # xevent_types                          is from   src/lib/x-kit/xclient/src/wire/xevent-types.pkg
                                                                                                # xerrors                               is from   src/lib/x-kit/xclient/src/wire/xerrors.pkg

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/outbuf-ximp.pkg
    #
    package xsequencer_to_outbuf {
        #
        Xsequencer_To_Outbuf
          =
          {
            put_value:                v1u::Vector    -> Void,                                   # Write bytevector to socket.
            put_values:         List( v1u::Vector )  -> Void,                                   # Write bytevectors to socket.
            flush_outbuf:       (Void -> Void)       -> Void                                    # Call given signal_fn when all preceding bytevectors have been written to socket.
          };
    };                                                                                          # pkg xsequencer_to_outbuf
end;