let
glXDrawable_of_window ~(win :
Xlib
.window) = (
Obj
.magic win :
'
a glXDrawable)