<mdb-killcursors-msg> ( object -- mdb-killcursors-msg )

Vocabulary

mongodb.msg

Inputs

object

an object

Outputs

mdb-killcursors-msg

an object

Definition

IN: mongodb.msg

GENERIC: <mdb-killcursors-msg> ( object -- mdb-killcursors-msg )

Methods

USING: kernel math mongodb.msg sequences ;

M: integer <mdb-killcursors-msg>
    V{ } clone [ push ] keep <mdb-killcursors-msg> ;


USING: accessors kernel mongodb.msg sequences ;

M: sequence <mdb-killcursors-msg>
    [ mdb-killcursors-msg new ] dip [ length >>cursors# ] keep
    >>cursors OP_KillCursors >>opcode ; inline