bind* ( mvalue quot -- mvalue' )

Vocabulary

monads

Inputs

mvalue	an object
quot	an object

Outputs

mvalue'

an object

Definition

USING: kernel ;

IN: monads

: bind* ( mvalue quot -- mvalue' ) '[ drop @ ] bind ;