key@ ( key hash -- array n ? )

Vocabulary

hash-sets.private

Inputs

key	an object
hash	an object

Outputs

array	an object
n	an object
?	an object

Definition

USING: accessors hashtables.private kernel ;

IN: hash-sets.private

: key@ ( key hash -- array n ? )
    array>> dup length>> 0 eq?
    [ no-key ] [ 2dup hash@ 0 (key@) ] if ; inline