1 files changed, 9 insertions, 0 deletions
diff --git a/chapter25/src/main/smp/sys/char.smp b/chapter25/src/main/smp/sys/char.smp
new file mode 100644
index 00000000..de37968e
--- /dev/null
+++ b/chapter25/src/main/smp/sys/char.smp
@@ -0,0 +1,9 @@
+// -*- mode: java;  -*-
+
+val toupper = { u8 c ->
+    return c >= 'a' && c <= 'z' ? c - ('a' - 'A') : c;
+};
+
+val tolower = { u8 c ->
+    return c >= 'A' && c <= 'Z' ? c + ('a' - 'A') : c;
+};