summaryrefslogtreecommitdiff
path: root/chapter28b/src/main/smp/sys/char.smp
diff options
context:
space:
mode:
authorCliff Click <cliffc@acm.org>2026-10-24 15:23:20 -0700
committerCliff Click <cliffc@acm.org>2026-10-24 15:23:20 -0700
commitf49b184a093ab5f653ac36ccc4939c45515a2f4b (patch)
tree36b7b0b688a6b03ceb1412fc45f79f32e7540002 /chapter28b/src/main/smp/sys/char.smp
parenta216a23bbd4d6e05a40d86ec8e76c038e945f3ba (diff)
downloadSimple-f49b184a093ab5f653ac36ccc4939c45515a2f4b.tar.gz
Simple-f49b184a093ab5f653ac36ccc4939c45515a2f4b.zip
Move combined chapter 25 baseline to chapter 28b
Diffstat (limited to 'chapter28b/src/main/smp/sys/char.smp')
-rw-r--r--chapter28b/src/main/smp/sys/char.smp8
1 files changed, 8 insertions, 0 deletions
diff --git a/chapter28b/src/main/smp/sys/char.smp b/chapter28b/src/main/smp/sys/char.smp
new file mode 100644
index 00000000..22ca4213
--- /dev/null
+++ b/chapter28b/src/main/smp/sys/char.smp
@@ -0,0 +1,8 @@
+
+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;
+};