uucp__alpha.ml1 2 3 4 5 6 7(*--------------------------------------------------------------------------- Copyright (c) 2014 The uucp programmers. All rights reserved. SPDX-License-Identifier: ISC ---------------------------------------------------------------------------*) let is_alphabetic u = Uucp_tmapbool.get Uucp_alpha_data.alphabetic_map (Uchar.to_int u)