object
  method virtual draw :
    SFRenderWindow.t ->
    ?states:Oo_sfml_graphics.render_states -> unit -> unit
  method virtual draw_item : Oo_sfml_graphics.draw_type
end