let sort_languages_by_name = List.sort (fun l1 l2 -> Pervasives.compare (String.lowercase l1#name) (String.lowercase l2#name))