about summary refs log tree commit diff stats
path: root/html
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2016-10-20 09:07:28 -0700
committerKartik K. Agaram <vc@akkartik.com>2016-10-20 09:07:28 -0700
commit52d0bbf6b30ec041ed2f12572d6ddc03ecfe981b (patch)
tree5036b52c44d5892c3f1a4a8160af655b6962d0bb /html
parentd059fe743df6a5e8a72fc1418f2c3ba1ed5ac1e6 (diff)
downloadmu-52d0bbf6b30ec041ed2f12572d6ddc03ecfe981b.tar.gz
3525
Diffstat (limited to 'html')
-rw-r--r--html/http-client.mu.html6
1 files changed, 3 insertions, 3 deletions
diff --git a/html/http-client.mu.html b/html/http-client.mu.html
index 50b203f2..bd5520c3 100644
--- a/html/http-client.mu.html
+++ b/html/http-client.mu.html
@@ -15,6 +15,7 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color
 * { font-size: 12pt; font-size: 1em; }
 .Delimiter { color: #800080; }
 .muControl { color: #c0a020; }
+.Comment { color: #9090ff; }
 .Constant { color: #00a0a0; }
 .Special { color: #c00000; }
 .CommentedCode { color: #6c6c6c; }
@@ -30,6 +31,8 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color
 </head>
 <body>
 <pre id='vimCodeElement'>
+<span class="Comment"># example program: reading a URL over HTTP</span>
+
 <span class="muRecipe">def</span> main [
   <span class="Constant">local-scope</span>
   google:&amp;:source:char<span class="Special"> &lt;- </span>start-reading-from-network <span class="Constant">0/real-resources</span>, <span class="Constant">[google.com]</span>, <span class="Constant">[/]</span>
@@ -38,10 +41,7 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color
   <span class="Delimiter">{</span>
     c:char, done?:bool<span class="Special"> &lt;- </span>read google
     <span class="muControl">break-if</span> done?
-<span class="CommentedCode">#?     $print c, 10/newline</span>
     n<span class="Special"> &lt;- </span>add n, <span class="Constant">1</span>
-<span class="CommentedCode">#?     skip?:bool &lt;- lesser-than n, 10000</span>
-<span class="CommentedCode">#?     loop-if skip?</span>
     b<span class="Special"> &lt;- </span>append b, c
 <span class="CommentedCode">#?     trunc?:bool &lt;- greater-or-equal n, 10000</span>
 <span class="CommentedCode">#?     loop-unless trunc?</span>