set-up-sprite ( animations sprite -- sprite )

Vocabulary

papier.sprites

Inputs

animations	an object
sprite	an object

Outputs

sprite

an object

Definition

USING: accessors kernel sequences ;

IN: papier.sprites

: set-up-sprite ( animations sprite -- sprite )
    swap [ >>animations ] keep first start-animation ; inline