diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2016-09-15 01:01:58 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2016-09-15 01:01:58 -0700 |
commit | 0ca56ed853c3d9bc8c26d1b014d8b665363fc2d0 (patch) | |
tree | abd2d2e4b65c34797a635aeb2f7d06c9d65c7bf9 /html/066stream.mu.html | |
parent | 36b927a63cb25e9fc64cf4ae079b32d23d528b1b (diff) | |
download | mu-0ca56ed853c3d9bc8c26d1b014d8b665363fc2d0.tar.gz |
3355
Diffstat (limited to 'html/066stream.mu.html')
-rw-r--r-- | html/066stream.mu.html | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/html/066stream.mu.html b/html/066stream.mu.html index 28c4814c..02798ec8 100644 --- a/html/066stream.mu.html +++ b/html/066stream.mu.html @@ -74,7 +74,7 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color <span class="Constant">load-ingredients</span> empty?:boolean<span class="Special"> <- </span>copy <span class="Constant">0/false</span> idx:number<span class="Special"> <- </span>get *in, <span class="Constant">index:offset</span> - s:address:array:character<span class="Special"> <- </span>get *in, <span class="Constant">data:offset</span> + s:address:array:_elem<span class="Special"> <- </span>get *in, <span class="Constant">data:offset</span> len:number<span class="Special"> <- </span>length *s at-end?:boolean<span class="Special"> <- </span>greater-or-equal idx len <span class="Delimiter">{</span> @@ -85,11 +85,11 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color result<span class="Special"> <- </span>index *s, idx ] -<span class="muRecipe">def</span> read-line in:address:stream:character<span class="muRecipe"> -> </span>result:address:array:character, in:address:stream:character [ +<span class="muRecipe">def</span> read-line in:address:stream:character<span class="muRecipe"> -> </span>result:text, in:address:stream:character [ <span class="Constant">local-scope</span> <span class="Constant">load-ingredients</span> idx:number<span class="Special"> <- </span>get *in, <span class="Constant">index:offset</span> - s:address:array:character<span class="Special"> <- </span>get *in, <span class="Constant">data:offset</span> + s:text<span class="Special"> <- </span>get *in, <span class="Constant">data:offset</span> next-idx:number<span class="Special"> <- </span>find-next s, <span class="Constant">10/newline</span>, idx result<span class="Special"> <- </span>copy-range s, idx, next-idx idx<span class="Special"> <- </span>add next-idx, <span class="Constant">1</span> <span class="Comment"># skip newline</span> |