fvmlib<< ( value object -- )

Vocabulary

accessors

Inputs

value	an object
object	an object

Outputs

None

Definition

IN: accessors

GENERIC: fvmlib<< ( value object -- )

Methods

USING: accessors classes.struct classes.struct.private macho ;

M: fvmlib_command fvmlib<<
    T{ struct-slot-spec
        { name "fvmlib" }
        { offset 8 }
        { class fvmlib }
        { initial
            S{ fvmlib
                { name S{ lc_str { offset 0 } { ptr f } } }
                { minor_version 0 }
                { header_addr 0 }
            }
        }
        { type fvmlib }
    } write-struct-slot ; inline