(bind-func gl_draw_loop (lambda (time:i64 delta_t:double) ;; step glib event loop ;; draw texture (gl_load_movie_textures) (glClear GL_COLOR_BUFFER_BIT)