external guess_language: [>`sourcelanguagemanager] obj -> string option -> string option -> source_language obj option = "ml_gtk_source_language_manager_guess_language"