identity-wrapper

Vocabulary

hash-sets.identity.private

Definition

IN: hash-sets.identity.private

TUPLE: identity-wrapper
    { underlying read-only } identity-hashcode ;

Methods

USING: accessors hash-sets.identity.private kernel ;

M: identity-wrapper equal?
    over identity-wrapper?
    [ [ underlying>> ] bi@ eq? ] [ 2drop f ] if ; inline


USING: accessors hash-sets.identity.private kernel ;

M: identity-wrapper hashcode* nip identity-hashcode>> ; inline