diff --git a/extra/lint/lint.factor b/extra/lint/lint.factor index ee90f41595..71c69796e6 100644 --- a/extra/lint/lint.factor +++ b/extra/lint/lint.factor @@ -3,7 +3,7 @@ USING: accessors alien arrays assocs combinators.short-circuit fry hashtables io kernel math namespaces prettyprint quotations sequences sequences.deep shuffle slots.private vectors vocabs -words xml.data ; +words xml.data words.alias ; IN: lint SYMBOL: lint-definitions @@ -67,6 +67,8 @@ lint-definitions get-global [ drop empty? not ] assoc-filter [ nip [ vocabulary>> "windows.messages" = ] any? not ] assoc-filter + [ nip [ alias? ] any? not ] assoc-filter + ! Remove trivial defs [ drop trivial-defs member? not ] assoc-filter