c>> ( object -- value )

Vocabulary

accessors

Inputs

object

an object

Outputs

value

an object

Definition

IN: accessors

GENERIC: c>> ( object -- value )

Methods

USING: accessors classes.struct classes.struct.private
core-graphics.types math ;

M: CGAffineTransform c>>
    T{ struct-slot-spec
        { name "c" }
        { offset 16 }
        { class float }
        { initial 0.0 }
        { type CGFloat }
    } read-struct-slot ; inline


USING: accessors colors.lch slots.private ;

M: LCHab c>> 3 slot ; inline


USING: accessors colors.lch slots.private ;

M: LCHuv c>> 3 slot ; inline


USING: accessors random.pcg slots.private ;

M: Mwc128XXA32 c>> 5 slot ; inline


USING: accessors random.pcg slots.private ;

M: Mwc256XXA64 c>> 5 slot ; inline


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

M: ast-case c>> 2 slot ; inline


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

M: ast-for c>> 3 slot ; inline


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

M: ast-try c>> 4 slot ; inline


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

M: atom c>> 10 slot { maybe{ ptx-operand } } declare ; inline


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

M: bar.red c>> 9 slot { ptx-operand } declare ; inline


USING: accessors random.cmwc slots.private ;

M: cmwc-seed c>> 3 slot ; inline


USING: accessors kernel.private math random.cmwc slots.private ;

M: cmwc c>> 5 slot { integer } declare ; inline


USING: accessors chipmunk.ffi classes.struct
classes.struct.private ;

M: cpCircleShape c>>
    T{ struct-slot-spec
        { name "c" }
        { offset 112 }
        { class cpVect }
        { initial S{ cpVect { x 0.0 } { y 0.0 } } }
        { type cpVect }
    } read-struct-slot ; inline


USING: accessors cpu.8080.emulator slots.private ;

M: cpu c>> 3 slot ; inline


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

M: ptx-4op-instruction c>> 8 slot { ptx-operand } declare ;
    inline


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

M: ptx-5op-instruction c>> 8 slot { ptx-operand } declare ;
    inline


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

M: ptx-set-instruction c>>
    10 slot { maybe{ ptx-operand } } declare ; inline


USING: accessors sequences.modified slots.private ;

M: scaled c>> 3 slot ; inline


USING: accessors db.tester slots.private ;

M: test-1 c>> 5 slot ; inline