(bind-func gl_draw (lambda () (glClear GL_COLOR_BUFFER_BIT) (glUseProgram sp) (VAO_bind_and_draw_arrays vao GL_POINTS 0 3) (glfwSwapBuffers window) void))