(bind-func glfw_get_window_width (lambda (window) (let ((width_ptr:i32* (salloc))) (glfwGetWindowSize window width_ptr null) (pref width_ptr 0))))