(bind-func print
(lambda (fbo:FBO*)
(if (null? fbo)
(printf "<FBO: 0x0>")
(printf "<FBO: id=%d color_tex=%d depth_tex=%d width=%d height=%d>"
(FBO_id fbo)
(FBO_color_texture fbo)
(FBO_depth_texture fbo)
(FBO_width fbo)
(FBO_height fbo)))
void))