read-command ( cmd -- next-cmd )

Vocabulary

macho

Inputs

cmd

an object

Outputs

next-cmd

an object

Definition

USING: accessors alien classes.struct kernel make ;

IN: macho

: read-command ( cmd -- next-cmd )
    dup load_command memory>struct
    [ cmd>> cmd>load-command memory>struct , ]
    [ cmdsize>> swap <displaced-alien> ] 2bi ;