;; draw surface data returned from test2
(bind-func gl_draw
(lambda ()
(glLoadIdentity)
(glClear (+ GL_COLOR_BUFFER_BIT GL_DEPTH_BUFFER_BIT))
;; use tex num 5 repeatedly
(gl_load_tex_bgr 900 600 4 GL_UNSIGNED_BYTE (test2 (i64tod (now))) 5)
(gl_draw_img_reverse -1.0 -1.0 2.0 2.0 180.0 5)
void))