let register_source_buffer (sb : GSourceView2.source_buffer) = unregister_source_buffer sb; registered_source_buffers := sb :: !registered_source_buffers; sb#set_style_scheme (source_style_scheme ())