diff options
Diffstat (limited to 'html/071read-line.subx.html')
-rw-r--r-- | html/071read-line.subx.html | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/html/071read-line.subx.html b/html/071read-line.subx.html index 1dd7df47..e8070be6 100644 --- a/html/071read-line.subx.html +++ b/html/071read-line.subx.html @@ -16,13 +16,13 @@ a { color:inherit; } * { font-size:12pt; font-size: 1em; } .subxComment { color: #005faf; } .subxS2Comment { color: #8a8a8a; } +.subxTest { color: #5f8700; } +.subxFunction { color: #af5f00; text-decoration: underline; } .LineNr { } .subxS1Comment { color: #0000af; } -.subxFunction { color: #af5f00; text-decoration: underline; } .Normal { color: #000000; background-color: #c6c6c6; padding-bottom: 1px; } -.subxH1Comment { color: #005faf; text-decoration: underline; } .Constant { color: #008787; } -.subxTest { color: #5f8700; } +.subxH1Comment { color: #005faf; text-decoration: underline; } --> </style> @@ -69,7 +69,7 @@ if ('onhashchange' in window) { <span id="L9" class="LineNr"> 9 </span><span class="subxFunction">read-line-buffered</span>: <span class="subxComment"># f: (addr buffered-file), s: (addr stream byte)</span> <span id="L10" class="LineNr"> 10 </span> <span class="subxComment"># pseudocode:</span> <span id="L11" class="LineNr"> 11 </span> <span class="subxComment"># while true</span> -<span id="L12" class="LineNr"> 12 </span> <span class="subxComment"># if (s->write >= s->length) abort</span> +<span id="L12" class="LineNr"> 12 </span> <span class="subxComment"># if (s->write >= s->size) abort</span> <span id="L13" class="LineNr"> 13 </span> <span class="subxComment"># if (f->read >= f->write) populate stream from file</span> <span id="L14" class="LineNr"> 14 </span> <span class="subxComment"># if (f->write == 0) break</span> <span id="L15" class="LineNr"> 15 </span> <span class="subxComment"># AL = f->data[f->read]</span> @@ -95,7 +95,7 @@ if ('onhashchange' in window) { <span id="L35" class="LineNr"> 35 </span> <span class="subxComment"># edx = s->write</span> <span id="L36" class="LineNr"> 36 </span> 8b/copy 0/mod/indirect 7/rm32/edi <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 2/r32/edx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy *edi to edx</span> <span id="L37" class="LineNr"> 37 </span><span class="Constant">$read-line-buffered:loop</span>: -<span id="L38" class="LineNr"> 38 </span> <span class="subxComment"># if (s->write >= s->length) abort</span> +<span id="L38" class="LineNr"> 38 </span> <span class="subxComment"># if (s->write >= s->size) abort</span> <span id="L39" class="LineNr"> 39 </span> 3b/compare 1/mod/*+disp8 7/rm32/edi <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 2/r32/edx 8/disp8 <span class="Normal"> . </span> <span class="subxComment"># compare edx with *(edi+8)</span> <span id="L40" class="LineNr"> 40 </span> 7d/jump-if->= $read-line-buffered:abort/disp8 <span id="L41" class="LineNr"> 41 </span> <span class="subxComment"># if (f->read >= f->write) populate stream from file</span> @@ -279,7 +279,7 @@ if ('onhashchange' in window) { <span id="L219" class="LineNr">219 </span><span class="subxFunction">read-line</span>: <span class="subxComment"># f: (addr stream byte), s: (addr stream byte)</span> <span id="L220" class="LineNr">220 </span> <span class="subxComment"># pseudocode:</span> <span id="L221" class="LineNr">221 </span> <span class="subxComment"># while true</span> -<span id="L222" class="LineNr">222 </span> <span class="subxComment"># if (s->write >= s->length) abort</span> +<span id="L222" class="LineNr">222 </span> <span class="subxComment"># if (s->write >= s->size) abort</span> <span id="L223" class="LineNr">223 </span> <span class="subxComment"># if (f->read >= f->write) break</span> <span id="L224" class="LineNr">224 </span> <span class="subxComment"># AL = f->data[f->read]</span> <span id="L225" class="LineNr">225 </span> <span class="subxComment"># s->data[s->write] = AL</span> @@ -304,7 +304,7 @@ if ('onhashchange' in window) { <span id="L244" class="LineNr">244 </span> <span class="subxComment"># edx = s->write</span> <span id="L245" class="LineNr">245 </span> 8b/copy 0/mod/indirect 7/rm32/edi <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 2/r32/edx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy *edi to edx</span> <span id="L246" class="LineNr">246 </span><span class="Constant">$read-line:loop</span>: -<span id="L247" class="LineNr">247 </span> <span class="subxComment"># if (s->write >= s->length) abort</span> +<span id="L247" class="LineNr">247 </span> <span class="subxComment"># if (s->write >= s->size) abort</span> <span id="L248" class="LineNr">248 </span> 3b/compare 1/mod/*+disp8 7/rm32/edi <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 2/r32/edx 8/disp8 <span class="Normal"> . </span> <span class="subxComment"># compare edx with *(edi+8)</span> <span id="L249" class="LineNr">249 </span> 0f 8d/jump-if->= $read-line:abort/disp32 <span id="L250" class="LineNr">250 </span> <span class="subxComment"># if (f->read >= f->write) break</span> |