1 (* Copyright (C) 2004-2006 Henry Cejtin, Matthew Fluet, Suresh
2 * Jagannathan, and Stephen Weeks.
4 * MLton is released under a BSD-style license.
5 * See the file MLton-LICENSE for details.
8 signature CHAR_SIZE_STRUCTS =
14 include CHAR_SIZE_STRUCTS
16 datatype t = C8 | C16 | C32
20 val equals: t * t -> bool
21 val fromBits: Bits.t -> t
22 val isInRange: t * IntInf.t -> bool
23 val memoize: (t -> 'a) -> t -> 'a