state>> ( object -- value )

Vocabulary

accessors

Inputs

object

an object

Outputs

value

an object

Definition

IN: accessors

GENERIC: state>> ( object -- value )

Methods

USING: accessors classes.struct classes.struct.private gdk.ffi
gobject-introspection.standard-types math ;

M: GdkEventButton state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 36 }
        { class integer }
        { initial 0 }
        { type guint }
    } read-struct-slot ; inline


USING: accessors classes.struct classes.struct.private gdk.ffi
gobject-introspection.standard-types math ;

M: GdkEventKey state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 16 }
        { class integer }
        { initial 0 }
        { type guint }
    } read-struct-slot ; inline


USING: accessors classes.struct classes.struct.private gdk.ffi
gobject-introspection.standard-types math ;

M: GdkEventMotion state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 36 }
        { class integer }
        { initial 0 }
        { type guint }
    } read-struct-slot ; inline


USING: accessors classes.struct classes.struct.private gdk.ffi
gobject-introspection.standard-types math ;

M: GdkEventScroll state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 32 }
        { class integer }
        { initial 0 }
        { type guint }
    } read-struct-slot ; inline


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

M: SSL state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 52 }
        { class integer }
        { initial 0 }
        { type int }
    } read-struct-slot ; inline


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

M: XButtonEvent state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 48 }
        { class integer }
        { initial 0 }
        { type uint }
    } read-struct-slot ; inline


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

M: XColormapEvent state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 28 }
        { class integer }
        { initial 0 }
        { type int }
    } read-struct-slot ; inline


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

M: XCrossingEvent state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 64 }
        { class integer }
        { initial 0 }
        { type uint }
    } read-struct-slot ; inline


USING: accessors classes.struct classes.struct.private
x11.xinput2.ffi ;

M: XIButtonClassInfo state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 16 }
        { class XIButtonState }
        { initial S{ XIButtonState { mask_len 0 } { mask f } } }
        { type XIButtonState }
    } read-struct-slot ; inline


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

M: XKeyEvent state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 48 }
        { class integer }
        { initial 0 }
        { type uint }
    } read-struct-slot ; inline


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

M: XMotionEvent state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 48 }
        { class integer }
        { initial 0 }
        { type uint }
    } read-struct-slot ; inline


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

M: XPropertyEvent state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 28 }
        { class integer }
        { initial 0 }
        { type int }
    } read-struct-slot ; inline


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

M: XVisibilityEvent state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 20 }
        { class integer }
        { initial 0 }
        { type int }
    } read-struct-slot ; inline


USING: accessors rosetta-code.active-object slots.private ;

M: active-object state>> 4 slot ; inline


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

M: aes-state state>> 4 slot ; inline


USING: accessors audio.gadget slots.private ;

M: audio-gadget state>> 32 slot ; inline


USING: accessors minesweeper slots.private ;

M: cell state>> 4 slot ; inline


USING: accessors slots.private usa-cities ;

M: city state>> 4 slot ; inline


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

M: cpArbiter state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 57 }
        { class fixnum }
        { initial 0 }
        { type char }
    } read-struct-slot ; inline


USING: accessors alien.c-types classes.struct
classes.struct.private kernel sodium.ffi ;

M: crypto_hash_sha256_state state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 0 }
        { class object }
        { type { uint32_t 8 } }
    } read-struct-slot ; inline


USING: accessors alien.c-types classes.struct
classes.struct.private kernel sodium.ffi ;

M: crypto_hash_sha512_state state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 0 }
        { class object }
        { type { uint64_t 8 } }
    } read-struct-slot ; inline


USING: accessors checksums.md5 kernel.private slots.private
specialized-arrays.instances.alien.c-types.uint ;

M: md5-state state>> 8 slot { uint-array } declare ; inline


USING: accessors slots.private unix.linux.proc ;

M: pid-stat state>> 4 slot ; inline


USING: accessors logic.private slots.private ;

M: resolver-gen state>> 2 slot ; inline


USING: accessors kernel.private random.sfmt.private
slots.private ;

M: sfmt state>> 2 slot { sfmt-state } declare ; inline


USING: accessors metar slots.private ;

M: station state>> 4 slot ; inline


USING: accessors slots.private threads ;

M: thread state>> 7 slot ; inline


USING: accessors hashtables.private slots.private ;

M: tombstone state>> 2 slot ; inline


USING: accessors classes.struct classes.struct.private kernel
yaml.ffi ;

M: yaml_emitter_t state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 96 }
        { class object }
        { type yaml_emitter_state_t }
    } read-struct-slot ; inline


USING: accessors classes.struct classes.struct.private kernel
yaml.ffi ;

M: yaml_parser_t state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 204 }
        { class object }
        { type yaml_parser_state_t }
    } read-struct-slot ; inline


USING: accessors alien alien.c-types alien.syntax classes.struct
classes.struct.private compression.zlib.ffi ;

M: z_stream state>>
    T{ struct-slot-spec
        { name "state" }
        { offset 28 }
        { class c-ptr }
        { type pointer: void }
    } read-struct-slot ; inline