<stack-table> ( model -- table )

Vocabulary

ui.tools.traceback

Inputs

model

an object

Outputs

table

an object

Definition

USING: accessors fonts models.arrow sequences ui.gadgets.tables
ui.tools.inspector ;

IN: ui.tools.traceback

: <stack-table> ( model -- table )
    [ [ <stack-entry> ] map ] <arrow>
    stack-entry-renderer <table> 10 >>min-rows 10 >>max-rows
    40 >>min-cols 40 >>max-cols monospace-font >>font
    [ inspector ] >>action t >>single-click? ;