(bind-func glfw_print_video_mode_details
(lambda (vidmode:GLFWvidmode*)
(printf " width: %i\n height: %i\n redBits: %i\n greenBits: %i\n blueBits: %i\nrefreshRate: %i\n"
(tref vidmode 0)
(tref vidmode 1)
(tref vidmode 2)
(tref vidmode 3)
(tref vidmode 4)
(tref vidmode 5))))