variable-effect? ( effect -- ? )

Vocabulary

effects

Inputs

effect

an object

Outputs

?

an object

Definition

USING: accessors kernel ;

IN: effects

: variable-effect? ( effect -- ? )
    dup in-var>> [ drop t ] [ out-var>> ] if ;