frame ( -- )

Vocabulary

raylib.live-coding.smoke-test

Inputs

None

Outputs

None

Definition

USING: kernel math namespaces opengl.gl raylib
raylib.live-coding.contexts ;

IN: raylib.live-coding.smoke-test

: frame ( -- )
    game-context get-global current-context assert= frame-count
    [ 1 + ] change-global frame-count get-global 30 =
    [ "Continue smoke test" throw ] when
    frame-count get-global 90 =
    [ "Close smoke test" throw ] when
    begin-drawing paint end-drawing glGetError GL_NO_ERROR
    assert= ;