(read-code-block) ( -- code-block payload )

Vocabulary

tools.image-analyzer.code-heap-reader

Inputs

None

Outputs

code-block	an object
payload	an object

Definition

USING: alien.c-types classes.struct io kernel math
tools.image-analyzer.vm ;

IN: tools.image-analyzer.code-heap-reader

: (read-code-block) ( -- code-block payload )
    code-block [ read-struct ] [ heap-size ] bi over size swap -
    read ;