side-effect-model

Vocabulary

models.combinators

Definition

IN: models.combinators

TUPLE: side-effect-model < mapped-model ;

Methods

USING: accessors combinators kernel models models.combinators ;

M: side-effect-model (model-changed)
    [ value>> ] dip [ quot>> ( old -- ) call-effect ] 2keep
    set-model ;