diff options
Diffstat (limited to 'html/073list.mu.html')
-rw-r--r-- | html/073list.mu.html | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/html/073list.mu.html b/html/073list.mu.html index c184e73f..9a1469cb 100644 --- a/html/073list.mu.html +++ b/html/073list.mu.html @@ -20,7 +20,6 @@ body { font-family: monospace; color: #eeeeee; background-color: #080808; } .Comment { color: #9090ff; } .Constant { color: #00a0a0; } .Special { color: #ff6060; } -.CommentedCode { color: #6c6c6c; } .Delimiter { color: #a04060; } --> </style> @@ -88,7 +87,6 @@ body { font-family: monospace; color: #eeeeee; background-color: #080808; } <span class="muRecipe">recipe</span> to-text in:address:shared:list:_elem<span class="muRecipe"> -> </span>result:address:shared:array:character [ <span class="Constant">local-scope</span> -<span class="CommentedCode">#? $print [to text: list], 10/newline</span> <span class="Constant">load-ingredients</span> buf:address:shared:buffer<span class="Special"> <- </span>new-buffer <span class="Constant">80</span> buf<span class="Special"> <- </span>to-buffer in, buf @@ -98,7 +96,6 @@ body { font-family: monospace; color: #eeeeee; background-color: #080808; } <span class="Comment"># variant of 'to-text' which stops printing after a few elements (and so is robust to cycles)</span> <span class="muRecipe">recipe</span> to-text-line in:address:shared:list:_elem<span class="muRecipe"> -> </span>result:address:shared:array:character [ <span class="Constant">local-scope</span> -<span class="CommentedCode">#? $print [to text line: list], 10/newline</span> <span class="Constant">load-ingredients</span> buf:address:shared:buffer<span class="Special"> <- </span>new-buffer <span class="Constant">80</span> buf<span class="Special"> <- </span>to-buffer in, buf, <span class="Constant">6</span> <span class="Comment"># max elements to display</span> @@ -107,7 +104,6 @@ body { font-family: monospace; color: #eeeeee; background-color: #080808; } <span class="muRecipe">recipe</span> to-buffer in:address:shared:list:_elem, buf:address:shared:buffer<span class="muRecipe"> -> </span>buf:address:shared:buffer [ <span class="Constant">local-scope</span> -<span class="CommentedCode">#? $print [to buffer: list], 10/newline</span> <span class="Constant">load-ingredients</span> <span class="Delimiter">{</span> <span class="muControl">break-if</span> in @@ -120,7 +116,6 @@ body { font-family: monospace; color: #eeeeee; background-color: #080808; } <span class="Comment"># now prepare next</span> next:address:shared:list:_elem<span class="Special"> <- </span>rest in nextn:number<span class="Special"> <- </span>copy next -<span class="CommentedCode">#? buf <- append buf, nextn</span> <span class="muControl">reply-unless</span> next space:character<span class="Special"> <- </span>copy <span class="Constant">32/space</span> buf<span class="Special"> <- </span>append buf, space:character |