Lprint* ( string listener -- )

Vocabulary

ui.tools.listener.log

Inputs

string	an object
listener	an object

Outputs

None

Definition

USING: accessors io kernel namespaces ;

IN: ui.tools.listener.log

: Lprint* ( string listener -- )
    swap LPRINT set input>> output>>
    [ LPRINT get print ] with-output-stream* ;