(bind-func print
(lambda (fbo:FBO*)
(if (null? fbo)
(begin (printf "<FBO: 0x0>") void)
(printout "<FBO: id="
(id fbo)
" color_tex="
(colour_tex fbo)
" depth_tex="
(depth_tex fbo)
" width="
(width fbo)
" height="
(height fbo)
">\n"))
void))