new-image-like ( image w h -- image )

Vocabulary

snake-game.sprites

Inputs

image	an object
w	an object
h	an object

Outputs

image

an object

Definition

USING: accessors arrays byte-vectors images kernel math ;

IN: snake-game.sprites

: new-image-like ( image w h -- image )
    [ clone ] 2dip [ 2array >>dim ] 2keep *
    over bytes-per-pixel * <byte-vector> >>bitmap ;