LOG:
Furnace framework » Logging framework » Logging messages

Prev:	log-critical ( error word -- )
Next:	add-input-logging ( word level -- )

Vocabulary
logging

Syntax

LOG: name level

Inputs
None

Outputs
None

Word description
Creates a word with stack effect ( object -- ) which logs its input and does nothing else.

Definition

USING: arrays kernel logging.private parser words ;

IN: logging

SYNTAX: LOG:
    scan-new-word dup scan-word
    [ [ [ 1array stack>message ] ] dip ] dip
    [ log-message ] 2curry compose
    ( message -- ) define-declared ;