IN: accessors

GENERIC: cmdsize>> ( object -- value )

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

M: dyld_info_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: dylib_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: dylinker_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: dysymtab_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: encryption_info_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: fvmfile_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: fvmlib_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: ident_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: linkedit_data_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: load_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: prebind_cksum_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: prebound_dylib_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: routines_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: routines_command_64 cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: rpath_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: segment_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: segment_command_64 cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: sub_client_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: sub_framework_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: sub_library_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: sub_umbrella_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: symseg_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: symtab_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: thread_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: twolevel_hints_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline

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

M: uuid_command cmdsize>>
T{ struct-slot-spec
{ name "cmdsize" }
{ offset 4 }
{ class fixnum }
{ initial 0 }
{ type uint }
} read-struct-slot ; inline