find-benchmark-vocabs ( -- seq )

Vocabulary

benchmark

Inputs

None

Outputs

seq

an object

Definition

USING: command-line io kernel namespaces sequences ;

IN: benchmark

: find-benchmark-vocabs ( -- seq )
    benchmarks-disabled? get [
        "benchmarks-disabled? is true, not benchmarking anything!"
        print { }
    ] [ command-line get [ all-benchmark-vocabs ] when-empty ]
    if ;