move-many-objects ( board start dest objects -- board )


Vocabulary
gamelib.board

Inputs
boardan object
startan object
destan object
objectsan object


Outputs
boardan object


Definition
USING: kernel sequences ;

IN: gamelib.board

:: move-many-objects ( board start dest objects -- board )
board objects [ start swap dest swap move-objects ] each ;