external set_state       : t -> State.t -> unit = "gl_objects_visitor_set_state"