make-lazy-quot ( quot effect -- quot )

Vocabulary

promises

Inputs

quot	an object
effect	an object

Outputs

quot

an object

Definition

USING: accessors generalizations kernel sequences ;

IN: promises

: make-lazy-quot ( quot effect -- quot )
    in>> length [ ncurry <promise> ] 2curry ;