debug-circle ( points color -- )

Vocabulary

game.debug

Inputs

points	an object
color	an object

Outputs

None

Definition

USING: circular kernel sequences ;

IN: game.debug

:: debug-circle ( points color -- )
    points dup <circular> [ 1 swap change-circular-start ] keep
    [ color debug-line ] 2each ; inline