index<< ( value object -- )

Vocabulary

accessors

Inputs

value	an object
object	an object

Outputs

None

Definition

IN: accessors

GENERIC: index<< ( value object -- )

Methods

USING: accessors bittorrent slots.private ;

M: allowed-fast index<< 2 set-slot ; inline


USING: accessors infix.ast slots.private ;

M: ast-array index<< 3 set-slot ; inline


USING: accessors peg.javascript.private slots.private ;

M: ast-getp index<< 2 set-slot ; inline


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

M: cairo_glyph_t index<<
    T{ struct-slot-spec
        { name "index" }
        { offset 0 }
        { class integer }
        { initial 0 }
        { type ulong }
    } write-struct-slot ; inline


USING: accessors bittorrent slots.private ;

M: cancel index<< 2 set-slot ; inline


USING: accessors gpu.framebuffers kernel math slots
slots.private ;

M: color-attachment index<<
    [ dup integer? [ \ integer bad-slot-value ] unless ] dip
    2 set-slot ; inline


USING: accessors heaps.private slots.private ;

M: entry index<< 5 set-slot ; inline


USING: accessors bittorrent slots.private ;

M: have index<< 2 set-slot ; inline


USING: accessors slots.private ui.tools.listener.history ;

M: history index<< 5 set-slot ; inline


USING: accessors cpu.x86.assembler.operands.private
slots.private ;

M: indirect index<< 3 set-slot ; inline


USING: accessors slots.private ui.gadgets.lists ;

M: list index<< 23 set-slot ; inline


USING: accessors compiler.cfg.loop-detection slots.private ;

M: natural-loop index<< 3 set-slot ; inline


USING: accessors bittorrent slots.private ;

M: piece index<< 2 set-slot ; inline


USING: accessors cuda.ptx kernel math slots slots.private ;

M: ptx-element index<<
    [ dup integer? [ \ integer bad-slot-value ] unless ] dip
    3 set-slot ; inline


USING: accessors bittorrent slots.private ;

M: reject-request index<< 2 set-slot ; inline


USING: accessors bittorrent slots.private ;

M: request index<< 2 set-slot ; inline


USING: accessors mongodb.benchmark slots.private ;

M: result index<< 4 set-slot ; inline


USING: accessors arrays.shaped slots.private ;

M: row-traverser index<< 3 set-slot ; inline


USING: accessors lists.lazy slots.private ;

M: sequence-cons index<< 2 set-slot ; inline


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

M: sfmt-state index<<
    T{ struct-slot-spec
        { name "index" }
        { offset 12 }
        { class fixnum }
        { initial 0 }
        { type uint }
    } write-struct-slot ; inline


USING: accessors bittorrent slots.private ;

M: suggest-piece index<< 2 set-slot ; inline


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

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


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

M: yaml_mark_t index<<
    T{ struct-slot-spec
        { name "index" }
        { offset 0 }
        { class integer }
        { initial 0 }
        { type size_t }
    } write-struct-slot ; inline