serial>> ( object -- value )

Vocabulary

accessors

Inputs

object

an object

Outputs

value

an object

Definition

IN: accessors

GENERIC: serial>> ( object -- value )

Methods

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

M: XAnyEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XButtonEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XCirculateEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XCirculateRequestEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XClientMessageEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XColormapEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XConfigureEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XConfigureRequestEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XCreateWindowEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XCrossingEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XDestroyWindowEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XErrorEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 24 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XExposeEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XFocusChangeEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XGenericEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XGenericEventCookie serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XGraphicsExposeEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XGravityEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XIDeviceChangedEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XIDeviceEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XIEnterEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XIEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XIHierarchyEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XIPropertyEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XIRawEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XKeyEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XKeymapEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XMapEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XMapRequestEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XMappingEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XMotionEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XNoExposeEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XPropertyEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XReparentEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XResizeRequestEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XSelectionClearEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XSelectionEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XSelectionRequestEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XUnmapEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


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

M: XVisibilityEvent serial>>
    T{ struct-slot-spec
        { name "serial" }
        { offset 8 }
        { class integer }
        { initial 0 }
        { type ulong }
    } read-struct-slot ; inline


USING: accessors dns slots.private ;

M: soa serial>> 4 slot ; inline