wrapper@ ( key wrapped-hash -- wrapped-key hash-set )

Vocabulary

hash-sets.wrapped.private

Inputs

key	an object
wrapped-hash	an object

Outputs

wrapped-key	an object
hash-set	an object

Definition

USING: accessors hash-sets.wrapped kernel ;

IN: hash-sets.wrapped.private

: wrapper@ ( key wrapped-hash -- wrapped-key hash-set )
    [ wrap-key ] [ nip underlying>> ] 2bi ; inline