request - Factor Documentation

IN: msgpack.rpc

TUPLE: request msgid method params ;

USING: accessors assocs combinators msgpack.rpc
msgpack.rpc.private ;

M:: request feed-packet ( session request -- )
request msgid>> :> id session incoming-requests>>
:> requests request requests check-request-id-absent
request id requests set-at
request session request-callback>> ( request -- )
call-effect ;

USING: accessors arrays kernel msgpack msgpack.rpc ;

M: request write-msgpack
0 swap [ msgid>> ] [ method>> ] [ params>> ] tri 4array
write-msgpack ;