(make-curry) ( tail quot -- quot' )

Vocabulary

fry.private

Inputs

tail	an object
quot	an object

Outputs

quot'

an object

Definition

USING: kernel ;

IN: fry.private

: (make-curry) ( tail quot -- quot' )
    swap [ncurry] curry [ compose ] compose ;