2015-07-27: nicer fizzbuzz (less : : )

nicer fizzbuzz (less : : )

diff --git a/examples/fizzbuzz.w b/examples/fizzbuzz.w
--- a/examples/fizzbuzz.w
+++ b/examples/fizzbuzz.w
@@ -9,16 +9,18 @@ define : divisible? number divisor
          = 0 : remainder number divisor
 
 define : fizzbuzz
-  let : : print_number #f
-    loop : : for i : up-from 1 : to 100
-        set! print_number #t
-        when : divisible? i 3
-            display "Fizz"
-            set! print_number #f
-        when : divisible? i 5
-            display "Buzz"
-            set! print_number #f;
-        when print_number : display i
-        newline
+  let
+    : print_number #f
+    loop
+      : for i : up-from 1 : to 100
+      set! print_number #t
+      when : divisible? i 3
+          display "Fizz"
+          set! print_number #f
+      when : divisible? i 5
+          display "Buzz"
+          set! print_number #f;
+      when print_number : display i
+      newline
 
 fizzbuzz