let () =
  let a = "å"[@uchar] in
  ignore a