diff options
Diffstat (limited to 'html/subx/apps/hex.subx.html')
| -rw-r--r-- | html/subx/apps/hex.subx.html | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/html/subx/apps/hex.subx.html b/html/subx/apps/hex.subx.html index a7c0c903..53376ea7 100644 --- a/html/subx/apps/hex.subx.html +++ b/html/subx/apps/hex.subx.html @@ -138,7 +138,7 @@ if ('onhashchange' in window) { <span id="L75" class="LineNr"> 75 </span> <span class="subxComment"># while true</span> <span id="L76" class="LineNr"> 76 </span> <span class="subxComment"># EAX = convert-next-octet(in, err, ed)</span> <span id="L77" class="LineNr"> 77 </span> <span class="subxComment"># if (EAX == Eof) break</span> -<span id="L78" class="LineNr"> 78 </span> <span class="subxComment"># write-byte(out, AL)</span> +<span id="L78" class="LineNr"> 78 </span> <span class="subxComment"># write-byte-buffered(out, AL)</span> <span id="L79" class="LineNr"> 79 </span> <span class="subxComment"># flush(out)</span> <span id="L80" class="LineNr"> 80 </span> <span class="subxComment">#</span> <span id="L81" class="LineNr"> 81 </span> <span class="subxS1Comment"># . prolog</span> @@ -159,12 +159,12 @@ if ('onhashchange' in window) { <span id="L96" class="LineNr"> 96 </span> <span class="subxComment"># if (EAX == Eof) break</span> <span id="L97" class="LineNr"> 97 </span> 3d/compare-EAX-and 0xffffffff/imm32/Eof <span id="L98" class="LineNr"> 98 </span> 74/jump-if-equal $convert:loop-end/disp8 -<span id="L99" class="LineNr"> 99 </span> <span class="subxComment"># write-byte(out, AL)</span> +<span id="L99" class="LineNr"> 99 </span> <span class="subxComment"># write-byte-buffered(out, AL)</span> <span id="L100" class="LineNr"> 100 </span> <span class="subxS2Comment"># . . push args</span> <span id="L101" class="LineNr"> 101 </span> 50/push-EAX <span id="L102" class="LineNr"> 102 </span> ff 6/subop/push 1/mod/*+disp8 5/rm32/EBP <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0xc/disp8 <span class="Normal"> . </span> <span class="subxComment"># push *(EBP+12)</span> <span id="L103" class="LineNr"> 103 </span> <span class="subxS2Comment"># . . call</span> -<span id="L104" class="LineNr"> 104 </span> e8/call <a href='../064write-byte.subx.html#L31'>write-byte</a>/disp32 +<span id="L104" class="LineNr"> 104 </span> e8/call <a href='../064write-byte.subx.html#L31'>write-byte-buffered</a>/disp32 <span id="L105" class="LineNr"> 105 </span> <span class="subxS2Comment"># . . discard args</span> <span id="L106" class="LineNr"> 106 </span> 81 0/subop/add 3/mod/direct 4/rm32/ESP <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 8/imm32 <span class="subxComment"># add to ESP</span> <span id="L107" class="LineNr"> 107 </span> <span class="subxComment"># loop</span> @@ -552,7 +552,7 @@ if ('onhashchange' in window) { <span id="L489" class="LineNr"> 489 </span><span class="subxFunction">scan-next-byte</span>: <span class="subxComment"># in : (address buffered-file), err : (address buffered-file), ed : (address exit-descriptor) -> byte-or-Eof/EAX</span> <span id="L490" class="LineNr"> 490 </span> <span class="subxComment"># pseudocode:</span> <span id="L491" class="LineNr"> 491 </span> <span class="subxComment"># while true</span> -<span id="L492" class="LineNr"> 492 </span> <span class="subxComment"># EAX = read-byte(in)</span> +<span id="L492" class="LineNr"> 492 </span> <span class="subxComment"># EAX = read-byte-buffered(in)</span> <span id="L493" class="LineNr"> 493 </span> <span class="subxComment"># if (EAX == Eof) return EAX</span> <span id="L494" class="LineNr"> 494 </span> <span class="subxComment"># if (is-hex-digit?(EAX)) return EAX</span> <span id="L495" class="LineNr"> 495 </span> <span class="subxComment"># if (EAX == ' ' or '\t' or '\n') continue</span> @@ -564,11 +564,11 @@ if ('onhashchange' in window) { <span id="L501" class="LineNr"> 501 </span> 89/copy 3/mod/direct 5/rm32/EBP <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 4/r32/ESP <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy ESP to EBP</span> <span id="L502" class="LineNr"> 502 </span> <span class="subxS1Comment"># . save registers</span> <span id="L503" class="LineNr"> 503 </span><span class="Constant">$scan-next-byte:loop</span>: -<span id="L504" class="LineNr"> 504 </span> <span class="subxComment"># EAX = read-byte(in)</span> +<span id="L504" class="LineNr"> 504 </span> <span class="subxComment"># EAX = read-byte-buffered(in)</span> <span id="L505" class="LineNr"> 505 </span> <span class="subxS2Comment"># . . push args</span> <span id="L506" class="LineNr"> 506 </span> ff 6/subop/push 1/mod/*+disp8 5/rm32/EBP <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 8/disp8 <span class="Normal"> . </span> <span class="subxComment"># push *(EBP+8)</span> <span id="L507" class="LineNr"> 507 </span> <span class="subxS2Comment"># . . call</span> -<span id="L508" class="LineNr"> 508 </span> e8/call <a href='../061read-byte.subx.html#L44'>read-byte</a>/disp32 +<span id="L508" class="LineNr"> 508 </span> e8/call <a href='../061read-byte.subx.html#L44'>read-byte-buffered</a>/disp32 <span id="L509" class="LineNr"> 509 </span> <span class="subxS2Comment"># . . discard args</span> <span id="L510" class="LineNr"> 510 </span> 81 0/subop/add 3/mod/direct 4/rm32/ESP <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 4/imm32 <span class="subxComment"># add to ESP</span> <span id="L511" class="LineNr"> 511 </span> <span class="subxComment"># if (EAX == Eof) return EAX</span> @@ -1452,7 +1452,7 @@ if ('onhashchange' in window) { <span id="L1389" class="LineNr">1389 </span> <span class="subxComment"># pseudocode:</span> <span id="L1390" class="LineNr">1390 </span> <span class="subxComment"># push EAX</span> <span id="L1391" class="LineNr">1391 </span> <span class="subxComment"># while true</span> -<span id="L1392" class="LineNr">1392 </span> <span class="subxComment"># EAX = read-byte(in)</span> +<span id="L1392" class="LineNr">1392 </span> <span class="subxComment"># EAX = read-byte-buffered(in)</span> <span id="L1393" class="LineNr">1393 </span> <span class="subxComment"># if (EAX == Eof) break</span> <span id="L1394" class="LineNr">1394 </span> <span class="subxComment"># if (EAX == 0x0a) break</span> <span id="L1395" class="LineNr">1395 </span> <span class="subxComment"># pop EAX</span> @@ -1462,11 +1462,11 @@ if ('onhashchange' in window) { <span id="L1399" class="LineNr">1399 </span> <span class="subxS1Comment"># . save registers</span> <span id="L1400" class="LineNr">1400 </span> 50/push-EAX <span id="L1401" class="LineNr">1401 </span><span class="Constant">$skip-until-newline:loop</span>: -<span id="L1402" class="LineNr">1402 </span> <span class="subxS1Comment"># . EAX = read-byte(in)</span> +<span id="L1402" class="LineNr">1402 </span> <span class="subxS1Comment"># . EAX = read-byte-buffered(in)</span> <span id="L1403" class="LineNr">1403 </span> <span class="subxS2Comment"># . . push args</span> <span id="L1404" class="LineNr">1404 </span> ff 6/subop/push 1/mod/*+disp8 5/rm32/EBP <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 8/disp8 <span class="Normal"> . </span> <span class="subxComment"># push *(EBP+8)</span> <span id="L1405" class="LineNr">1405 </span> <span class="subxS2Comment"># . . call</span> -<span id="L1406" class="LineNr">1406 </span> e8/call <a href='../061read-byte.subx.html#L44'>read-byte</a>/disp32 +<span id="L1406" class="LineNr">1406 </span> e8/call <a href='../061read-byte.subx.html#L44'>read-byte-buffered</a>/disp32 <span id="L1407" class="LineNr">1407 </span> <span class="subxS2Comment"># . . discard args</span> <span id="L1408" class="LineNr">1408 </span> 81 0/subop/add 3/mod/direct 4/rm32/ESP <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 4/imm32 <span class="subxComment"># add to ESP</span> <span id="L1409" class="LineNr">1409 </span> <span class="subxS1Comment"># . if (EAX == Eof) break</span> |