IN: accessors

GENERIC: state>> ( object -- value )

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

M: GdkEventButton state>>
T{ struct-slot-spec
{ name "state" }
{ offset 48 }
{ class fixnum }
{ 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 24 }
{ class fixnum }
{ 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 48 }
{ class fixnum }
{ 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 40 }
{ class fixnum }
{ 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 72 }
{ class fixnum }
{ 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 80 }
{ class fixnum }
{ 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 52 }
{ class fixnum }
{ 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 96 }
{ class fixnum }
{ 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 24 }
{ 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 80 }
{ class fixnum }
{ 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 80 }
{ class fixnum }
{ 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 56 }
{ class fixnum }
{ 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 40 }
{ class fixnum }
{ 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 81 }
{ 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_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>> 6 slot { uint-array } declare ; inline

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

M: pid-stat state>> 4 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 168 }
{ 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 392 }
{ 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 56 }
{ class c-ptr }
{ type pointer: void }
} read-struct-slot ; inline