diff options
Diffstat (limited to 'html/subx/073next-token.subx.html')
| -rw-r--r-- | html/subx/073next-token.subx.html | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/html/subx/073next-token.subx.html b/html/subx/073next-token.subx.html index dd8a8d87..5a18170b 100644 --- a/html/subx/073next-token.subx.html +++ b/html/subx/073next-token.subx.html @@ -71,7 +71,7 @@ if ('onhashchange' in window) { <span id="L11" class="LineNr"> 11 </span><span class="CommentedCode">#? cd/syscall 0x80/imm8</span> <span id="L12" class="LineNr"> 12 </span> <span id="L13" class="LineNr"> 13 </span><span class="subxComment"># extract the next run of characters that are different from a given 'delimiter' (skipping multiple delimiters if necessary)</span> -<span id="L14" class="LineNr"> 14 </span><span class="subxComment"># on eof return an empty interval</span> +<span id="L14" class="LineNr"> 14 </span><span class="subxComment"># on reaching end of file, return an empty interval</span> <span id="L15" class="LineNr"> 15 </span><span class="subxFunction">next-token</span>: <span class="subxComment"># in : (address stream), delimiter : byte, out : (address slice)</span> <span id="L16" class="LineNr"> 16 </span> <span class="subxS1Comment"># . prolog</span> <span id="L17" class="LineNr"> 17 </span> 55/push-EBP @@ -183,7 +183,7 @@ if ('onhashchange' in window) { <span id="L123" class="LineNr">123 </span> 5d/pop-to-EBP <span id="L124" class="LineNr">124 </span> c3/return <span id="L125" class="LineNr">125 </span> -<span id="L126" class="LineNr">126 </span><span class="subxTest">test-next-token-eof</span>: +<span id="L126" class="LineNr">126 </span><span class="subxTest">test-next-token-Eof</span>: <span id="L127" class="LineNr">127 </span> <span class="subxS1Comment"># . prolog</span> <span id="L128" class="LineNr">128 </span> 55/push-EBP <span id="L129" class="LineNr">129 </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> @@ -211,7 +211,7 @@ if ('onhashchange' in window) { <span id="L151" class="LineNr">151 </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> 0xc/imm32 <span class="subxComment"># add to ESP</span> <span id="L152" class="LineNr">152 </span> <span class="subxComment"># check-ints-equal(slice->end, slice->start, msg)</span> <span id="L153" class="LineNr">153 </span> <span class="subxS2Comment"># . . push args</span> -<span id="L154" class="LineNr">154 </span> 68/push <span class="Constant">"F - test-next-token-eof"</span>/imm32 +<span id="L154" class="LineNr">154 </span> 68/push <span class="Constant">"F - test-next-token-Eof"</span>/imm32 <span id="L155" class="LineNr">155 </span> ff 6/subop/push 1/mod/*+disp8 1/rm32/ECX <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># push *(ECX+4)</span> <span id="L156" class="LineNr">156 </span> ff 6/subop/push 0/mod/indirect 1/rm32/ECX <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># push *ECX</span> <span id="L157" class="LineNr">157 </span> <span class="subxS2Comment"># . . call</span> @@ -224,7 +224,7 @@ if ('onhashchange' in window) { <span id="L164" class="LineNr">164 </span> c3/return <span id="L165" class="LineNr">165 </span> <span id="L166" class="LineNr">166 </span><span class="subxComment"># extract the next run of characters that are different from a given 'delimiter' (skipping multiple delimiters if necessary)</span> -<span id="L167" class="LineNr">167 </span><span class="subxComment"># on eof return an empty interval</span> +<span id="L167" class="LineNr">167 </span><span class="subxComment"># on reaching end of file, return an empty interval</span> <span id="L168" class="LineNr">168 </span><span class="subxFunction">next-token-from-slice</span>: <span class="subxComment"># start : (address byte), end : (address byte), delimiter : byte, out : (address slice) -> <void></span> <span id="L169" class="LineNr">169 </span> <span class="subxS1Comment"># . prolog</span> <span id="L170" class="LineNr">170 </span> 55/push-EBP @@ -326,7 +326,7 @@ if ('onhashchange' in window) { <span id="L266" class="LineNr">266 </span> 5d/pop-to-EBP <span id="L267" class="LineNr">267 </span> c3/return <span id="L268" class="LineNr">268 </span> -<span id="L269" class="LineNr">269 </span><span class="subxTest">test-next-token-from-slice-eof</span>: +<span id="L269" class="LineNr">269 </span><span class="subxTest">test-next-token-from-slice-Eof</span>: <span id="L270" class="LineNr">270 </span> <span class="subxS1Comment"># . prolog</span> <span id="L271" class="LineNr">271 </span> 55/push-EBP <span id="L272" class="LineNr">272 </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> @@ -347,7 +347,7 @@ if ('onhashchange' in window) { <span id="L287" class="LineNr">287 </span> <span class="subxComment"># out should be empty</span> <span id="L288" class="LineNr">288 </span> <span class="subxS1Comment"># . check-ints-equal(out->end - out->start, 0, msg)</span> <span id="L289" class="LineNr">289 </span> <span class="subxS2Comment"># . . push args</span> -<span id="L290" class="LineNr">290 </span> 68/push <span class="Constant">"F - test-next-token-from-slice-eof"</span>/imm32 +<span id="L290" class="LineNr">290 </span> 68/push <span class="Constant">"F - test-next-token-from-slice-Eof"</span>/imm32 <span id="L291" class="LineNr">291 </span> 68/push 0/imm32 <span id="L292" class="LineNr">292 </span> <span class="subxS2Comment"># . . push out->start - in->start</span> <span id="L293" class="LineNr">293 </span> 8b/copy 1/mod/*+disp8 7/rm32/EDI <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 1/r32/ECX 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(EDI+4) to ECX</span> @@ -388,7 +388,7 @@ if ('onhashchange' in window) { <span id="L328" class="LineNr">328 </span> <span class="subxComment"># out should be empty</span> <span id="L329" class="LineNr">329 </span> <span class="subxS1Comment"># . check-ints-equal(out->end - out->start, 0, msg)</span> <span id="L330" class="LineNr">330 </span> <span class="subxS2Comment"># . . push args</span> -<span id="L331" class="LineNr">331 </span> 68/push <span class="Constant">"F - test-next-token-from-slice-eof"</span>/imm32 +<span id="L331" class="LineNr">331 </span> 68/push <span class="Constant">"F - test-next-token-from-slice-Eof"</span>/imm32 <span id="L332" class="LineNr">332 </span> 68/push 0/imm32 <span id="L333" class="LineNr">333 </span> <span class="subxS2Comment"># . . push out->start - in->start</span> <span id="L334" class="LineNr">334 </span> 8b/copy 1/mod/*+disp8 7/rm32/EDI <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 1/r32/ECX 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(EDI+4) to ECX</span> |