diff options
Diffstat (limited to 'html/subx/apps/crenshaw2-1b.subx.html')
| -rw-r--r-- | html/subx/apps/crenshaw2-1b.subx.html | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/html/subx/apps/crenshaw2-1b.subx.html b/html/subx/apps/crenshaw2-1b.subx.html index 9fad66d8..dbbfd526 100644 --- a/html/subx/apps/crenshaw2-1b.subx.html +++ b/html/subx/apps/crenshaw2-1b.subx.html @@ -267,11 +267,11 @@ if ('onhashchange' in window) { <span id="L201" class="LineNr">201 </span> <span class="subxComment"># pseudocode:</span> <span id="L202" class="LineNr">202 </span> <span class="subxComment"># if !is-digit?(Look) expected(ed, err, "integer")</span> <span id="L203" class="LineNr">203 </span> <span class="subxComment"># do</span> -<span id="L204" class="LineNr">204 </span> <span class="subxComment"># if out.write >= out.length</span> +<span id="L204" class="LineNr">204 </span> <span class="subxComment"># if out->write >= out->length</span> <span id="L205" class="LineNr">205 </span> <span class="subxComment"># write(err, "Error: too many digits in number\n")</span> <span id="L206" class="LineNr">206 </span> <span class="subxComment"># stop(ed, 1)</span> -<span id="L207" class="LineNr">207 </span> <span class="subxComment"># out.data[out.write] = LSB(Look)</span> -<span id="L208" class="LineNr">208 </span> <span class="subxComment"># ++out.write</span> +<span id="L207" class="LineNr">207 </span> <span class="subxComment"># out->data[out->write] = LSB(Look)</span> +<span id="L208" class="LineNr">208 </span> <span class="subxComment"># ++out->write</span> <span id="L209" class="LineNr">209 </span> <span class="subxComment"># Look = get-char(in)</span> <span id="L210" class="LineNr">210 </span> <span class="subxComment"># while is-digit?(Look)</span> <span id="L211" class="LineNr">211 </span> <span class="subxComment"># This is complicated because I don't want to hard-code the error strategy in</span> @@ -458,7 +458,7 @@ if ('onhashchange' in window) { <span id="L392" class="LineNr">392 </span> <span class="subxComment"># registers except ESP may be clobbered at this point</span> <span id="L393" class="LineNr">393 </span> <span class="subxS2Comment"># . . discard args</span> <span id="L394" class="LineNr">394 </span> 81 0/subop/add 3/mod/direct 4/rm32/ESP <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> 0x10/imm32 <span class="subxComment"># add to ESP</span> -<span id="L395" class="LineNr">395 </span> <span class="subxComment"># check-ints-equal(*_test-output-stream.data, '3')</span> +<span id="L395" class="LineNr">395 </span> <span class="subxComment"># check-ints-equal(*_test-output-stream->data, '3')</span> <span id="L396" class="LineNr">396 </span> <span class="subxS2Comment"># . . push args</span> <span id="L397" class="LineNr">397 </span> 68/push <span class="Constant">"F - test-get-num-reads-single-digit"</span>/imm32 <span id="L398" class="LineNr">398 </span> 68/push 0x33/imm32 @@ -634,7 +634,7 @@ if ('onhashchange' in window) { <span id="L568" class="LineNr">568 </span> <span class="subxComment"># registers except ESP may be clobbered at this point</span> <span id="L569" class="LineNr">569 </span> <span class="subxS2Comment"># . . discard args</span> <span id="L570" class="LineNr">570 </span> 81 0/subop/add 3/mod/direct 4/rm32/ESP <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> 0x10/imm32 <span class="subxComment"># add to ESP</span> -<span id="L571" class="LineNr">571 </span> <span class="subxComment"># check-ints-equal(*_test-output-stream.data, '3456')</span> +<span id="L571" class="LineNr">571 </span> <span class="subxComment"># check-ints-equal(*_test-output-stream->data, '3456')</span> <span id="L572" class="LineNr">572 </span> <span class="subxS2Comment"># . . push args</span> <span id="L573" class="LineNr">573 </span> 68/push <span class="Constant">"F - test-get-num-reads-multiple-digits"</span>/imm32 <span id="L574" class="LineNr">574 </span> 68/push 0x36353433/imm32 @@ -725,7 +725,7 @@ if ('onhashchange' in window) { <span id="L659" class="LineNr">659 </span> <span class="subxComment"># registers except ESP may be clobbered at this point</span> <span id="L660" class="LineNr">660 </span> <span class="subxS2Comment"># . . discard args</span> <span id="L661" class="LineNr">661 </span> 81 0/subop/add 3/mod/direct 4/rm32/ESP <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> 0x10/imm32 <span class="subxComment"># add to ESP</span> -<span id="L662" class="LineNr">662 </span> <span class="subxComment"># check-ints-equal(*_test-output-stream.data, '3456')</span> +<span id="L662" class="LineNr">662 </span> <span class="subxComment"># check-ints-equal(*_test-output-stream->data, '3456')</span> <span id="L663" class="LineNr">663 </span> <span class="subxS2Comment"># . . push args</span> <span id="L664" class="LineNr">664 </span> 68/push <span class="Constant">"F - test-get-num-reads-multiple-digits-followed-by-nondigit"</span>/imm32 <span id="L665" class="LineNr">665 </span> 68/push 0x36353433/imm32 |