disposables-of-class. ( class -- )

Vocabulary

tools.destructors

Inputs

class

an object

Outputs

None

Definition

USING: classes destructors kernel namespaces prettyprint
sequences sets tools.destructors.private ;

IN: tools.destructors

: disposables-of-class. ( class -- )
    [ disposables get members sort-disposables ] dip
    [ instance? ] curry filter stack. ;