external get_id : [>`sourcelanguage] obj -> string
    = "ml_gtk_source_language_get_id"