IN: accessors

GENERIC: x_root>> ( object -- value )

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

M: GdkEventButton x_root>>
T{ struct-slot-spec
{ name "x_root" }
{ offset 64 }
{ class float }
{ initial 0.0 }
{ type gdouble }
} read-struct-slot ; inline

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

M: GdkEventMotion x_root>>
T{ struct-slot-spec
{ name "x_root" }
{ offset 64 }
{ class float }
{ initial 0.0 }
{ type gdouble }
} read-struct-slot ; inline

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

M: GdkEventScroll x_root>>
T{ struct-slot-spec
{ name "x_root" }
{ offset 56 }
{ class float }
{ initial 0.0 }
{ type gdouble }
} read-struct-slot ; inline

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

M: XButtonEvent x_root>>
T{ struct-slot-spec
{ name "x_root" }
{ 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: XCrossingEvent x_root>>
T{ struct-slot-spec
{ name "x_root" }
{ 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: XKeyEvent x_root>>
T{ struct-slot-spec
{ name "x_root" }
{ 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: XMotionEvent x_root>>
T{ struct-slot-spec
{ name "x_root" }
{ offset 72 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline