cursor-key-value-unsafe ( cursor -- key value )

Vocabulary

cursors.private

Inputs

cursor

an object

Outputs

key	an object
value	an object

Definition

IN: cursors.private

GENERIC: cursor-key-value-unsafe ( cursor -- key value )

Methods

USING: accessors cursors cursors.private kernel
sequences.private ;

M: hash-set-cursor cursor-key-value-unsafe
    [ n>> dup ] [ hash-set>> array>> ] bi nth-unsafe ; inline


USING: accessors cursors cursors.private kernel math
sequences.private ;

M: hashtable-cursor cursor-key-value-unsafe
    [ n>> ] [ hashtable>> array>> ] bi
    [ nth-unsafe ] [ [ 1 + ] dip nth-unsafe ] 2bi ; inline


USING: cursors cursors.private ;

M: input-cursor cursor-key-value-unsafe cursor-key-value ;
    inline


USING: accessors cursors cursors.private kernel
sequences.private ;

M: sequence-cursor cursor-key-value-unsafe
    [ n>> dup ] [ seq>> ] bi nth-unsafe ; inline