code-block-table. ( counts sizes -- )

Vocabulary

tools.memory.private

Inputs

counts	an object
sizes	an object

Outputs

None

Definition

USING: assocs kernel prettyprint ;

IN: tools.memory.private

: code-block-table. ( counts sizes -- )
    [
        {
            { "Optimized code:" 1 }
            { "Unoptimized code:" 0 }
            { "Inline caches:" 2 }
        }
    ] 2dip [ code-block-table-row ] 2curry { } assoc>map
    simple-table. ;