IN: accessors

GENERIC: extension>> ( object -- value )

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

M: XGenericEvent extension>>
T{ struct-slot-spec
{ name "extension" }
{ offset 32 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

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

M: XGenericEventCookie extension>>
T{ struct-slot-spec
{ name "extension" }
{ offset 32 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

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

M: XIDeviceChangedEvent extension>>
T{ struct-slot-spec
{ name "extension" }
{ offset 32 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

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

M: XIDeviceEvent extension>>
T{ struct-slot-spec
{ name "extension" }
{ offset 32 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

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

M: XIEnterEvent extension>>
T{ struct-slot-spec
{ name "extension" }
{ offset 32 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

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

M: XIEvent extension>>
T{ struct-slot-spec
{ name "extension" }
{ offset 32 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

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

M: XIHierarchyEvent extension>>
T{ struct-slot-spec
{ name "extension" }
{ offset 48 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

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

M: XIPropertyEvent extension>>
T{ struct-slot-spec
{ name "extension" }
{ offset 32 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

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

M: XIRawEvent extension>>
T{ struct-slot-spec
{ name "extension" }
{ offset 32 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

USING: accessors audio.loader slots.private ;

M: unknown-audio-extension extension>> 2 slot ; inline

USING: accessors images.loader slots.private ;

M: unknown-image-extension extension>> 2 slot ; inline

USING: accessors game.models.loader slots.private ;

M: unknown-models-extension extension>> 2 slot ; inline