let null_renderer = object inherit renderer method set_viewport ~x ~y ~width ~height = () method render _ = () end