summaryrefslogtreecommitdiff
path: root/docs/chapter30/examples/Capitalize.smp
diff options
context:
space:
mode:
authorCliff Click <cliffc@acm.org>2026-08-10 11:11:18 -0700
committerCliff Click <cliffc@acm.org>2026-11-12 23:28:58 -0800
commit2cb35c65bde63f90d7afc3d7a8a985b0c6ea15d7 (patch)
tree50646613e551b1d4e523639d2973299c9d3bd5cd /docs/chapter30/examples/Capitalize.smp
parent772e3a1036d571de55b178ebd6d11ee5140d4e36 (diff)
downloadSimple-2cb35c65bde63f90d7afc3d7a8a985b0c6ea15d7.tar.gz
Simple-2cb35c65bde63f90d7afc3d7a8a985b0c6ea15d7.zip
Chapter 30: Text Formatting and Diagnostics
Co-authored-by: Hsiang-Ying Fu <66062782+fuhsnn@users.noreply.github.com> Co-authored-by: fuhsnn <66062782+fuhsnn@users.noreply.github.com> Co-authored-by: Symious <14933944+symious@users.noreply.github.com> Co-authored-by: Jun Kawasaki <jun784@gmail.com> Co-authored-by: Claude Opus 5 <noreply@anthropic.com>
Diffstat (limited to 'docs/chapter30/examples/Capitalize.smp')
-rw-r--r--docs/chapter30/examples/Capitalize.smp23
1 files changed, 23 insertions, 0 deletions
diff --git a/docs/chapter30/examples/Capitalize.smp b/docs/chapter30/examples/Capitalize.smp
new file mode 100644
index 00000000..00fdd481
--- /dev/null
+++ b/docs/chapter30/examples/Capitalize.smp
@@ -0,0 +1,23 @@
+
+// An implementation of
+// https://sampleprograms.io/projects/capitalize/
+
+val main = { u8[~][] args ->
+ if( args# > 2 ) {
+ sys.io.p("Use quotes around multiple strings.\n");
+ return 0;
+ }
+ if( args# != 2 || args[1]# == 0 ) {
+ sys.io.p("Usage: please provide a string\n");
+ return 0;
+ }
+
+ u8[~] input = args[1];
+ var output = new u8[input# + 1];
+ u32 len = input#;
+ sys.ary.copy(output,0,input,0,len);
+ output[0] = sys.char.toupper(input[0]);
+ output[input#] = '\n';
+ sys.io.p(output);
+ return 0;
+};