key<< ( value object -- )

Vocabulary

accessors

Inputs

value	an object
object	an object

Outputs

None

Definition

IN: accessors

GENERIC: key<< ( value object -- )

Methods

USING: accessors alien.c-types classes.struct
classes.struct.private ldcache.private math ;

M: EntryNew key<<
    T{ struct-slot-spec
        { name "key" }
        { offset 4 }
        { class fixnum }
        { initial 0 }
        { type uint32_t }
    } write-struct-slot ; inline


USING: accessors alien.c-types classes.struct
classes.struct.private ldcache.private math ;

M: EntryOld key<<
    T{ struct-slot-spec
        { name "key" }
        { offset 4 }
        { class fixnum }
        { initial 0 }
        { type uint32_t }
    } write-struct-slot ; inline


USING: accessors crypto.aes.private slots.private ;

M: aes-state key<< 3 set-slot ; inline


USING: accessors refs slots.private ;

M: assoc-ref key<< 3 set-slot ; inline


USING: accessors heaps.private slots.private ;

M: entry key<< 3 set-slot ; inline


USING: accessors slots.private toml.private ;

M: entry key<< 2 set-slot ; inline


USING: accessors db.types slots.private ;

M: generator-bind key<< 3 set-slot ; inline


USING: accessors hashtables kernel mongodb.driver slots
slots.private ;

M: index-spec key<<
    [ dup hashtable? [ \ hashtable bad-slot-value ] unless ] dip
    4 set-slot ; inline


USING: accessors ldcache.private slots.private ;

M: ldcache-entry key<< 6 set-slot ; inline


USING: accessors db.types slots.private ;

M: literal-bind key<< 2 set-slot ; inline


USING: accessors mime.multipart slots.private ;

M: mime-variable key<< 3 set-slot ; inline


USING: accessors slots.private
stack-checker.recursive-state.tree ;

M: node key<< 3 set-slot ; inline


USING: accessors slots.private trees.private ;

M: node key<< 2 set-slot ; inline


USING: accessors pairs slots.private ;

M: pair key<< 3 set-slot ; inline


USING: accessors memcached.private slots.private ;

M: request key<< 3 set-slot ; inline


USING: accessors slots.private ui.tools.inspector ;

M: slot-description key<< 2 set-slot ; inline


USING: accessors db.sqlite slots.private ;

M: sqlite-low-level-binding key<< 3 set-slot ; inline


USING: accessors mongodb.tuple.collection slots.private ;

M: toid key<< 2 set-slot ; inline


USING: accessors oauth1 slots.private ;

M: token key<< 2 set-slot ; inline


USING: accessors slots.private wrap.words ;

M: wrapping-word key<< 2 set-slot ; inline


USING: accessors alien.c-types classes.struct
classes.struct.private math yaml.ffi ;

M: yaml_node_pair_t key<<
    T{ struct-slot-spec
        { name "key" }
        { offset 0 }
        { class fixnum }
        { initial 0 }
        { type int }
    } write-struct-slot ; inline