valord = SML90.ord; valchr = SML90.chr; val raw_explode = SML90.explode; val implode = String.concat;
val pointer_eq = PolyML.pointerEq;
val error_depth = PolyML.error_depth;
structure Basic_Exn: BASIC_EXN = Exn; open Basic_Exn;
structureString = struct openString; funsubstring (s, i, n) = if n = 1 thenString.str (String.sub (s, i)) elseString.substring (s, i, n); end;
structureSubstring = struct openSubstring; val empty = full "";
local val chars = Vector.tabulate (Char.maxOrd, Substring.full o String.str o Char.chr); in fun full str =
(caseString.size str of
0 => empty
| 1 => Vector.sub (chars, Char.ord (String.sub (str, 0)))
| _ => Substring.full str); end;
end;
¤ Dauer der Verarbeitung: 0.11 Sekunden
(vorverarbeitet)
¤
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung ist noch experimentell.