1 (* Copyright (C
) 1999-2005 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
.
12 val layout
= Layout
.str
o escapeSML
15 Trace
.trace("Char.fromInt", Layout
.str
o Int.toString
, layout
) fromInt
17 val isDigit
= Trace
.trace("Char.isDigit", layout
, Bool.layout
) isDigit