sig
  type t
  external get_state : Osg.Graphics_context.t -> Osg.State.t
    = "graphics_context_get_state"
  external make_current : Osg.Graphics_context.t -> unit
    = "graphics_context_make_current"
  external release_context : Osg.Graphics_context.t -> unit
    = "graphics_context_release_context"
end