uucp__case_nfkc.ml1 2 3 4 5 6 7(*--------------------------------------------------------------------------- Copyright (c) 2013 The uucp programmers. All rights reserved. SPDX-License-Identifier: ISC ---------------------------------------------------------------------------*) let fold u = Uucp_tmap.get Uucp_case_nfkc_data.nfkc_fold_map_map (Uchar.to_int u)