string

Vocabulary

tools.image-analyzer.vm

Definition

USING: classes.struct vm ;

IN: tools.image-analyzer.vm

STRUCT: string
    { header cell_t initial: 0 } { length cell_t initial: 0 }
    { aux cell_t initial: 0 } { hashcode cell_t initial: 0 } ;

Methods

USING: classes.struct classes.struct.private kernel
tools.image-analyzer.vm ;

M: string clone clone-underlying \ string memory>struct ; inline


USING: accessors kernel math
tools.image-analyzer.data-heap-reader tools.image-analyzer.vm ;

M: string read-payload
    nip [ length>> -4 shift ] keep read-uchar-payload ;


USING: accessors classes.struct combinators.smart
tools.image-analyzer.vm ;

M: string struct-slot-values
    { [ header>> ] [ length>> ] [ aux>> ] [ hashcode>> ] }
    cleave>array ; inline