(bind-func glfw_mouse_button_callback:GLFWmousebuttonfun (lambda (window button action mods) (printf "window: %p button %d action %d mods %d\n" window button action mods) void))