From 19f281a20865f8d6981e23d57680cc2675fc1a96 Mon Sep 17 00:00:00 2001
From: Jacob Rothstein <github@jacobrothstein.com>
Date: Wed, 10 Nov 2010 23:23:51 -0800
Subject: [PATCH] [ document each and while ]

---
 public/index.html | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)

diff --git a/public/index.html b/public/index.html
index 918faf0..7468b5d 100644
--- a/public/index.html
+++ b/public/index.html
@@ -323,6 +323,37 @@ <h2>stuff</h2>
 ]]>
 </script>
 
+<script id="iteration-with-each"
+	data-title="Iteration with each"
+	language="sibilant/example">
+<![CDATA[
+; To iterate over an array, use the each
+; macro.
+
+(defvar list '(a b c d e))
+(each (letter) list
+  (when (= "C" (letter.to-upper-case))
+    (console.log "this was a c"))
+  (console.log letter))
+
+]]>
+</script>
+
+<script id="while"
+	data-title="While"
+	language="sibilant/example">
+<![CDATA[
+(defvar wall-bottle-count 99)
+
+(defun take-one-down () (decr wall-bottle-count))
+
+(while (> wall-bottle-count 0)
+  (defvar bottle (take-one-down))
+  (pass-around bottle))
+  
+]]>
+</script>
+
 <script id="chain"
 	data-title="Chaining function calls"
 	language="sibilant/example">
@@ -441,5 +472,7 @@ <h2>stuff</h2>
 ]]>
 </script>
 
+
+
   </body>
 </html>