reset-all ( -- )

Vocabulary

tools.annotations

Inputs

None

Outputs

None

Definition

USING: combinators.short-circuit kernel sequences vocabs words ;

IN: tools.annotations

: reset-all ( -- )
    all-words [
        dup
        { [ annotated? ] [ subwords [ annotated? ] any? ] } 1||
        [ reset ] [ drop ] if
    ] each ;