diff options
Diffstat (limited to 'html/060string.mu.html')
| -rw-r--r-- | html/060string.mu.html | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/html/060string.mu.html b/html/060string.mu.html index d917c926..45ff99e2 100644 --- a/html/060string.mu.html +++ b/html/060string.mu.html @@ -145,7 +145,8 @@ container buffer [ len:address:number<span class="Special"> <- </span>get-address result:address:buffer/deref, length:offset len:address:number/deref<span class="Special"> <- </span>copy <span class="Constant">0:literal</span> s:address:address:array:character<span class="Special"> <- </span>get-address result:address:buffer/deref, data:offset - capacity:number<span class="Special"> <- </span><span class="Constant">next-ingredient</span> + capacity:number, found?:boolean<span class="Special"> <- </span><span class="Constant">next-ingredient</span> + assert found?:boolean, <span class="Constant">[new-buffer must get a capacity argument]</span> s:address:address:array:character/deref<span class="Special"> <- </span>new character:type, capacity:number <span class="CommentedCode">#? $print s:address:address:array:character/deref, [</span> <span class="CommentedCode">#? ]</span> @@ -207,7 +208,13 @@ container buffer [ in:address:buffer<span class="Special"> <- </span>grow-buffer in:address:buffer <span class="Delimiter">}</span> s:address:array:character<span class="Special"> <- </span>get in:address:buffer/deref, data:offset +<span class="CommentedCode">#? $print [array underlying buf: ], s:address:array:character, [ </span> +<span class="CommentedCode">#? ] #? 1</span> +<span class="CommentedCode">#? $print [index: ], len:address:number/deref, [ </span> +<span class="CommentedCode">#? ] #? 1</span> dest:address:character<span class="Special"> <- </span>index-address s:address:array:character/deref, len:address:number/deref +<span class="CommentedCode">#? $print [storing ], c:character, [ in ], dest:address:character, [ </span> +<span class="CommentedCode">#? ] #? 1</span> dest:address:character/deref<span class="Special"> <- </span>copy c:character len:address:number/deref<span class="Special"> <- </span>add len:address:number/deref, <span class="Constant">1:literal</span> <span class="muControl">reply</span> in:address:buffer/same-as-ingredient:0 |