log-line-parser ( -- parser )

Vocabulary

logging.parser

Inputs

None

Outputs

parser

an object

Definition

USING: kernel make peg sequences ;

IN: logging.parser

: log-line-parser ( -- parser )
    [
        date-parser , " " token hide , log-level-parser ,
        " " token hide , word-name-parser , ": " token hide ,
        log-message-parser ,
    ] seq* [ first4 log-entry boa ] action
    malformed-line-parser 2choice ;