file-counts. ( paths -- )

Vocabulary

codebase-analyzer

Inputs

paths

an object

Outputs

None

Definition

USING: assocs io io.pathnames math.parser sequences sorting ;

IN: codebase-analyzer

: file-counts. ( paths -- )
    [ file-extension ] collect-by [ length ] map-values
    inv-sort-values
    [ number>string ": " glue bl bl print ] assoc-each ;