diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2016-10-23 19:45:36 -0700 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2016-10-23 19:56:28 -0700 |
| commit | f918675c8b11adb80a83000a3a984e4ff3bdcf1b (patch) | |
| tree | 2472316e3bf536e0bad76751c5f3504d029b8215 /html/http-client.mu.html | |
| parent | af7349d50c40e0604c9bb1e9a50aa1c3c0d407d8 (diff) | |
| download | mu-f918675c8b11adb80a83000a3a984e4ff3bdcf1b.tar.gz | |
3569
Update syntax highlighting to not color numeric locations like literals.
Diffstat (limited to 'html/http-client.mu.html')
| -rw-r--r-- | html/http-client.mu.html | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/html/http-client.mu.html b/html/http-client.mu.html index 20691582..264f56ed 100644 --- a/html/http-client.mu.html +++ b/html/http-client.mu.html @@ -35,21 +35,21 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color <span class="muRecipe">def</span> main [ <span class="Constant">local-scope</span> - google:&:source:char<span class="Special"> <- </span>start-reading-from-network <span class="Constant">0/real-resources</span>, <span class="Constant">[google.com/]</span> - n:num<span class="Special"> <- </span>copy <span class="Constant">0</span> - buf:&:buffer<span class="Special"> <- </span>new-buffer <span class="Constant">30</span> + google:&:source:char <span class="Special"><-</span> start-reading-from-network <span class="Constant">0/real-resources</span>, <span class="Constant">[google.com/]</span> + n:num <span class="Special"><-</span> copy<span class="Constant"> 0</span> + buf:&:buffer <span class="Special"><-</span> new-buffer<span class="Constant"> 30</span> <span class="Delimiter">{</span> - c:char, done?:bool<span class="Special"> <- </span>read google + c:char, done?:bool <span class="Special"><-</span> read google <span class="muControl">break-if</span> done? - n<span class="Special"> <- </span>add n, <span class="Constant">1</span> - buf<span class="Special"> <- </span>append buf, c + n <span class="Special"><-</span> add n,<span class="Constant"> 1</span> + buf <span class="Special"><-</span> append buf, c <span class="CommentedCode">#? trunc?:bool <- greater-or-equal n, 10000</span> <span class="CommentedCode">#? loop-unless trunc?</span> <span class="muControl">loop</span> <span class="Delimiter">}</span> - result:text<span class="Special"> <- </span>buffer-to-array buf + result:text <span class="Special"><-</span> buffer-to-array buf open-console - len:num<span class="Special"> <- </span>length *result + len:num <span class="Special"><-</span> length *result print <span class="Constant">0/real-screen</span>, result wait-for-some-interaction close-console |