flags<< ( value object -- )

Vocabulary

accessors

Inputs

value	an object
object	an object

Outputs

None

Definition

IN: accessors

GENERIC: flags<< ( value object -- )

Methods

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

M: ASN1_STRING flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 16 }
        { class integer }
        { initial 0 }
        { type long }
    } write-struct-slot ; inline


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

M: EVP_MD_CTX flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 16 }
        { class integer }
        { initial 0 }
        { type ulong }
    } write-struct-slot ; inline


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

M: EntryNew flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 0 }
        { class fixnum }
        { initial 0 }
        { type int16_t }
    } write-struct-slot ; inline


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

M: EntryOld flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 0 }
        { class fixnum }
        { initial 0 }
        { type int32_t }
    } write-struct-slot ; inline


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

M: GSource flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 44 }
        { class fixnum }
        { initial 0 }
        { type guint }
    } write-struct-slot ; inline


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

M: HISTORY_STATE flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 20 }
        { class fixnum }
        { initial 0 }
        { type int }
    } write-struct-slot ; inline


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

M: QTTime flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 16 }
        { class integer }
        { initial 0 }
        { type long }
    } write-struct-slot ; inline


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

M: XColor flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 14 }
        { class fixnum }
        { initial 0 }
        { type char }
    } write-struct-slot ; inline


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

M: XIDeviceEvent flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 120 }
        { class fixnum }
        { initial 0 }
        { type int }
    } write-struct-slot ; inline


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

M: XIHierarchyEvent flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 64 }
        { class fixnum }
        { initial 0 }
        { type int }
    } write-struct-slot ; inline


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

M: XIHierarchyInfo flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 16 }
        { class fixnum }
        { initial 0 }
        { type int }
    } write-struct-slot ; inline


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

M: XIRawEvent flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 60 }
        { class fixnum }
        { initial 0 }
        { type int }
    } write-struct-slot ; inline


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

M: XSizeHints flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 0 }
        { class integer }
        { initial 0 }
        { type long }
    } write-struct-slot ; inline


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

M: addrinfo flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 0 }
        { class fixnum }
        { initial 0 }
        { type int }
    } write-struct-slot ; inline


USING: accessors peg.javascript.private slots.private ;

M: ast-regexp flags<< 3 set-slot ; inline


USING: accessors binhex slots.private ;

M: binhex flags<< 5 set-slot ; inline


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

M: bio_st flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 32 }
        { class fixnum }
        { initial 0 }
        { type int }
    } write-struct-slot ; inline


USING: accessors cuesheet slots.private ;

M: cuesheet flags<< 5 set-slot ; inline


USING: accessors id3.private slots.private ;

M: frame flags<< 3 set-slot ; inline


USING: accessors images.gif slots.private ;

M: graphics-control-extension flags<< 2 set-slot ; inline


USING: accessors id3.private slots.private ;

M: header flags<< 3 set-slot ; inline


USING: accessors images.gif slots.private ;

M: image-descriptor flags<< 6 set-slot ; inline


USING: accessors git slots.private ;

M: index-entry flags<< 11 set-slot ; inline


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

M: kevent flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 10 }
        { class fixnum }
        { initial 0 }
        { type ushort }
    } write-struct-slot ; inline


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

M: libusb_transfer flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 8 }
        { class fixnum }
        { initial 0 }
        { type uint8_t }
    } write-struct-slot ; inline


USING: accessors images.gif slots.private ;

M: loading-gif flags<< 6 set-slot ; inline


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

M: mach_header flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 24 }
        { class fixnum }
        { initial 0 }
        { type uint }
    } write-struct-slot ; inline


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

M: mach_header_64 flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 24 }
        { class fixnum }
        { initial 0 }
        { type uint }
    } write-struct-slot ; inline


USING: accessors io.files.info.unix.macos slots.private ;

M: macos-file-info flags<< 18 set-slot ; inline


USING: accessors kernel math mongodb.msg slots slots.private ;

M: mdb-msg flags<<
    [ dup integer? [ \ integer bad-slot-value ] unless ] dip
    6 set-slot ; inline


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

M: pcre_extra flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 0 }
        { class integer }
        { initial 0 }
        { type ulonglong }
    } write-struct-slot ; inline


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

M: section flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 56 }
        { class fixnum }
        { initial 0 }
        { type uint }
    } write-struct-slot ; inline


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

M: section_64 flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 64 }
        { class fixnum }
        { initial 0 }
        { type uint }
    } write-struct-slot ; inline


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

M: segment_command flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 52 }
        { class fixnum }
        { initial 0 }
        { type uint }
    } write-struct-slot ; inline


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

M: segment_command_64 flags<<
    T{ struct-slot-spec
        { name "flags" }
        { offset 68 }
        { class fixnum }
        { initial 0 }
        { type uint }
    } write-struct-slot ; inline


USING: accessors io.files.info.unix slots.private ;

M: unix-file-system-info flags<< 18 set-slot ; inline