IN: accessors

GENERIC: width>> ( object -- value )

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

M: FT_Bitmap width>>
T{ struct-slot-spec
{ name "width" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

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

M: GdkEventConfigure width>>
T{ struct-slot-spec
{ name "width" }
{ offset 28 }
{ class fixnum }
{ initial 0 }
{ type gint }
} read-struct-slot ; inline

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

M: PangoRectangle width>>
T{ struct-slot-spec
{ name "width" }
{ offset 8 }
{ class fixnum }
{ initial 0 }
{ type gint }
} read-struct-slot ; inline

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

M: XCharStruct width>>
T{ struct-slot-spec
{ name "width" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type short }
} read-struct-slot ; inline

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

M: XConfigureEvent width>>
T{ struct-slot-spec
{ name "width" }
{ 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: XConfigureRequestEvent width>>
T{ struct-slot-spec
{ name "width" }
{ 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: XCreateWindowEvent width>>
T{ struct-slot-spec
{ name "width" }
{ 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: XExposeEvent width>>
T{ struct-slot-spec
{ name "width" }
{ offset 48 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

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

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

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

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

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

M: XResizeRequestEvent width>>
T{ struct-slot-spec
{ name "width" }
{ offset 40 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

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

M: XSizeHints width>>
T{ struct-slot-spec
{ name "width" }
{ offset 16 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

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

M: XWindowAttributes width>>
T{ struct-slot-spec
{ name "width" }
{ offset 8 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

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

M: XWindowChanges width>>
T{ struct-slot-spec
{ name "width" }
{ offset 8 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

USING: accessors kernel.private math slots.private tetris.board
;

M: board width>> 2 slot { integer } declare ; inline

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

M: cairo_rectangle_int_t width>>
T{ struct-slot-spec
{ name "width" }
{ offset 8 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

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

M: cairo_rectangle_t width>>
T{ struct-slot-spec
{ name "width" }
{ offset 16 }
{ class float }
{ initial 0.0 }
{ type double }
} read-struct-slot ; inline

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

M: cairo_text_extents_t width>>
T{ struct-slot-spec
{ name "width" }
{ offset 16 }
{ class float }
{ initial 0.0 }
{ type double }
} read-struct-slot ; inline

USING: accessors pdf.canvas slots.private ;

M: canvas width>> 4 slot ; inline

USING: accessors google.charts slots.private ;

M: chart width>> 3 slot ; inline

USING: accessors classes.struct classes.struct.private freetype
math ;

M: glyph width>>
T{ struct-slot-spec
{ name "width" }
{ offset 48 }
{ class integer }
{ initial 0 }
{ type FT_Pos }
} read-struct-slot ; inline

USING: accessors pdf.layout slots.private ;

M: hr width>> 2 slot ; inline

USING: accessors images.gif slots.private ;

M: image-descriptor width>> 4 slot ; inline

USING: accessors gpu.state kernel.private math slots.private ;

M: line-state width>> 2 slot { float } declare ; inline

USING: accessors slots.private ui.gadgets.paragraphs.private ;

M: line width>> 3 slot ; inline

USING: accessors images.gif slots.private ;

M: loading-gif width>> 4 slot ; inline

USING: accessors images.png slots.private ;

M: loading-png width>> 3 slot ; inline

USING: accessors fonts slots.private ;

M: metrics width>> 2 slot ; inline

USING: accessors graphviz.attributes slots.private ;

M: node-attributes width>> 41 slot ; inline

USING: accessors images.bitmap slots.private ;

M: os2v1-header width>> 2 slot ; inline

USING: accessors pdf.layout slots.private ;

M: table-cell width>> 3 slot ; inline

USING: accessors alien.c-types classes.struct
classes.struct.private math ogg.theora ;

M: th-img-plane width>>
T{ struct-slot-spec
{ name "width" }
{ offset 0 }
{ class fixnum }
{ initial 0 }
{ type int }
} read-struct-slot ; inline

USING: accessors images.bitmap slots.private ;

M: v3-header width>> 2 slot ; inline

USING: accessors slots.private wrap.words ;

M: word width>> 3 slot ; inline