center<< ( value object -- )

Vocabulary

accessors

Inputs

value	an object
object	an object

Outputs

None

Definition

IN: accessors

GENERIC: center<< ( value object -- )

Methods

USING: accessors graphviz.attributes slots.private ;

M: graph-attributes center<< 8 set-slot ; inline


USING: accessors kernel math.vectors.simd papier.map slots
slots.private ;

M: slab center<<
    [ dup float-4? [ \ float-4 bad-slot-value ] unless ] dip
    5 set-slot ; inline


USING: accessors gpu.demos.raytrace kernel sequences slots
slots.private ;

M: sphere-uniforms center<<
    [ dup sequence? [ \ sequence bad-slot-value ] unless ] dip
    2 set-slot ; inline


USING: accessors slots.private ui.pens.tile ;

M: tile-pen center<< 3 set-slot ; inline