2015-09-12: new example: say.w — natural syntax for showing text messages.

new example: say.w — natural syntax for showing text messages.

diff --git a/examples/say.w b/examples/say.w
new file mode 100755
--- /dev/null
+++ b/examples/say.w
@@ -0,0 +1,17 @@
+#!/usr/bin/env sh
+# -*- wisp -*-
+exec guile -L $(dirname $(dirname $(realpath "$0"))) --language=wisp -e '(@@ (examples say) main)' -s "$0" "$@"
+; !#
+
+; Simple specialized syntax for writing natural text with scheme.
+
+define-module : examples say
+              . #:export : main
+
+define-syntax-rule : say a ...
+  format #t "~A\n" 
+    string-join 
+      map symbol->string : quote : a ...
+
+define : main argv
+         say Yes, this works!