error-counts ( -- alist )

Vocabulary

source-files.errors

Inputs

None

Outputs

alist

error types and counts

Word description

Outputs an alist of error types and counts of the number of errors of that type. Only fatal errors and counts > 0 are included.

Definition

USING: accessors assocs combinators kernel math namespaces
sequences ;

IN: source-files.errors

: error-counts ( -- alist )
    error-types get
    [ nip dup quot>> ( -- seq ) call-effect length ] assoc-map
    [ [ fatal?>> ] [ 0 > ] bi* and ] assoc-filter ;