row-columns ( row renderer -- columns )
Factor handbook » UI framework » Building user interfaces » Pre-made UI gadgets » Table gadgets » Table row renderer protocol

Next:

row-color ( row renderer -- color )

Vocabulary
ui.gadgets.tables

Inputs

row	an object
renderer	an object

Outputs

columns

an object

Definition

IN: ui.gadgets.tables

GENERIC: row-columns ( row renderer -- columns )

Methods

USING: arrays assocs kernel sequences strings ui.gadgets.tables
ui.tools.listener.completion unicode.data ;

M: char-completion row-columns
    drop first [ name-map at 1string ] keep 2array ;


USING: accessors color-table color-table.private colors
combinators combinators.smart formatting kernel
ui.gadgets.tables ;

M: color-renderer row-columns
    drop [
        full-block-string swap dup named-color {
            [ red>> "%.5f" sprintf ]
            [ green>> "%.5f" sprintf ]
            [ blue>> "%.5f" sprintf ]
            [ color>hex ]
        } cleave
    ] output>array ;


USING: arrays definitions.icons kernel sequences
ui.gadgets.tables ui.images ui.tools.listener.completion ;

M: definition-completion row-columns
    drop first2 [ definition-icon <image-name> ] dip 2array ;


USING: accessors combinators combinators.smart kernel
math.parser prettyprint source-files.errors summary
ui.gadgets.tables ui.tools.error-list ;

M: error-renderer row-columns
    drop [
        {
            [ error-type error-icon ]
            [ line#>> [ number>string ] [ "" ] if* ]
            [ asset>> [ unparse-short ] [ "" ] if* ]
            [ error>> safe-summary ]
        } cleave
    ] output>array ;


USING: accessors arrays kernel ui.gadgets.tables
ui.tools.inspector ;

M: inspector-renderer row-columns
    drop [ key-string>> ] [ value-string>> ] bi 2array ;


USING: arrays definitions.icons kernel sequences
ui.gadgets.tables ui.images ui.tools.browser.popups ;

M: link-renderer row-columns
    drop first2 [ definition-icon <image-name> ] dip 2array ;


USING: arrays kernel sequences ui.gadgets.tables
ui.tools.listener.completion ;

M: listener-completion row-columns drop second 1array ;


USING: accessors arrays kernel sequences ui.gadgets.tables
ui.tools.debugger.private ;

M: restart-renderer row-columns
    drop [ name>> ] [ "Abort" ] if* "• " prepend 1array ;


USING: combinators.smart kernel math.parser sequences
source-files.errors.debugger ui.gadgets.tables
ui.tools.error-list ;

M: source-file-renderer row-columns
    drop first2 [
        [ source-file-icon ] [ +listener-input+ or ]
        [ length number>string ] tri*
    ] output>array ;


USING: arrays gml.printer gml.ui io.streams.string kernel
ui.gadgets.tables ;

M: stack-entry-renderer row-columns
    drop [ write-gml ] with-string-writer 1array ;


USING: accessors arrays kernel ui.gadgets.tables
ui.tools.traceback ;

M: stack-entry-renderer row-columns drop string>> 1array ;


USING: accessors combinators kernel ui.gadgets.controls
ui.gadgets.tables ;

M: table row-columns
    quot>> [ ( a -- b ) call-effect ] [ drop f ] if* ;


USING: kernel ui.gadgets.tables ;

M: trivial-renderer row-columns drop ;