anonymous-complement - Factor Documentation

anonymous-complement

Vocabulary
classes .algebra .private

Definition

IN: classes.algebra.private

TUPLE: anonymous-complement { class read-only } ;

Methods

USING: accessors classes.algebra classes.algebra.private kernel
;

M: anonymous-complement (classes-intersect?)
class>> class<= not ;

USING: classes.algebra.private classes.builtin kernel ;

M: anonymous-complement (flatten-class) drop full-cover ;

USING: accessors arrays classes.algebra.private
prettyprint.custom ;

M: anonymous-complement >pprint-sequence class>> 1array ;

USING: accessors classes.algebra.private
stack-checker.dependencies ;

M: anonymous-complement add-depends-on-class
class>> add-depends-on-class ;

USING: accessors classes.algebra.private classes.private ;

M: anonymous-complement class-name class>> class-name ;

USING: accessors classes classes.algebra.private kernel ;

M: anonymous-complement instance?
over [ class>> instance? not ] [ 2drop t ] if ;

USING: classes.algebra.private prettyprint.custom ;

M: anonymous-complement pprint* pprint-object ;

USING: classes.algebra.private kernel prettyprint.custom ;

M: anonymous-complement pprint-delims drop \ not{ \ } ;

USING: accessors classes classes.algebra.private kernel ;

M: anonymous-complement predicate-def
class>> [ over [ instance? not ] [ 2drop t ] if ] curry ;

USING: classes.algebra.private classes.private kernel ;

M: anonymous-complement rank-class drop 3 ;

USING: classes.algebra.private classes.private
prettyprint.backend sequences ;

M: anonymous-complement word-name*
class-name "not{ " " }" surround ;