inputs/outputs ( quot -- in out )

Vocabulary

combinators.smart

Inputs

quot

an object

Outputs

in	an object
out	an object

Definition

USING: accessors kernel sequences stack-checker ;

IN: combinators.smart

IDENTITY-MEMO: inputs/outputs ( quot -- in out )
    infer [ in>> ] [ out>> ] bi 2length ;