val uppercase_utf8 : string -> string