malformed-line-parser ( -- parser )

Vocabulary

logging.parser

Inputs

None

Outputs

parser

an object

Definition

USING: accessors kernel peg ;

IN: logging.parser

: malformed-line-parser ( -- parser )
    [ drop t ] string-of
    [ log-entry new swap >>message malformed >>level ] action ;