add-effect-input ( effect -- effect' )


Vocabulary
effects

Definition
USING: accessors kernel sequences ;

IN: effects

: add-effect-input ( effect -- effect' )
[ in>> "obj" suffix ] [ out>> ] [ terminated?>> ] tri
<terminated-effect> ;