picture ( uses -- str )

Vocabulary

compiler.cfg.linear-scan.debugger

Inputs

uses

an object

Outputs

str

an object

Definition

USING: kernel math sequences strings ;

IN: compiler.cfg.linear-scan.debugger

: picture ( uses -- str )
    dup last 1 + 32 <string>
    [ '[ 42 swap _ set-nth ] each ] keep ;