calls-next-method? ( method -- ? )

Vocabulary

tools.deploy.shaker

Inputs

method

an object

Outputs

?

an object

Definition

USING: accessors generic kernel sequences sequences.deep ;

IN: tools.deploy.shaker

: calls-next-method? ( method -- ? )
    def>> flatten \ (call-next-method) swap member-eq? ;