diff options
Diffstat (limited to 'html/apps/crenshaw2-1.subx.html')
| -rw-r--r-- | html/apps/crenshaw2-1.subx.html | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/html/apps/crenshaw2-1.subx.html b/html/apps/crenshaw2-1.subx.html index df65b7c6..e42c901c 100644 --- a/html/apps/crenshaw2-1.subx.html +++ b/html/apps/crenshaw2-1.subx.html @@ -108,7 +108,7 @@ if ('onhashchange' in window) { <span id="L47" class="LineNr"> 47 </span> <span class="subxH1Comment"># - if argc > 1 and argv[1] == "test", then return run_tests()</span> <span id="L48" class="LineNr"> 48 </span> <span class="subxComment"># if (argc <= 1) goto run-main</span> <span id="L49" class="LineNr"> 49 </span> 81 7/subop/compare 1/mod/*+disp8 5/rm32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/disp8 1/imm32 <span class="subxComment"># compare *ebp</span> -<span id="L50" class="LineNr"> 50 </span> 7e/jump-if-lesser-or-equal $run-main/disp8 +<span id="L50" class="LineNr"> 50 </span> 7e/jump-if-<= $run-main/disp8 <span id="L51" class="LineNr"> 51 </span> <span class="subxComment"># if (!kernel-string-equal?(argv[1], "test")) goto run-main</span> <span id="L52" class="LineNr"> 52 </span> <span class="subxS1Comment"># . eax = kernel-string-equal?(argv[1], "test")</span> <span id="L53" class="LineNr"> 53 </span> <span class="subxS2Comment"># . . push args</span> @@ -120,7 +120,7 @@ if ('onhashchange' in window) { <span id="L59" class="LineNr"> 59 </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="L60" class="LineNr"> 60 </span> <span class="subxS1Comment"># . if (eax == false) goto run-main</span> <span id="L61" class="LineNr"> 61 </span> 3d/compare-eax-and 0/imm32/false -<span id="L62" class="LineNr"> 62 </span> 74/jump-if-equal $run-main/disp8 +<span id="L62" class="LineNr"> 62 </span> 74/jump-if-= $run-main/disp8 <span id="L63" class="LineNr"> 63 </span> <span class="subxComment"># run-tests()</span> <span id="L64" class="LineNr"> 64 </span> e8/call run-tests/disp32 <span id="L65" class="LineNr"> 65 </span> <span class="subxComment"># syscall(exit, *Num-test-failures)</span> @@ -285,7 +285,7 @@ if ('onhashchange' in window) { <span id="L224" class="LineNr">224 </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="L225" class="LineNr">225 </span> <span class="subxS1Comment"># . if (eax == false)</span> <span id="L226" class="LineNr">226 </span> 3d/compare-eax-and 0/imm32/false -<span id="L227" class="LineNr">227 </span> 75/jump-if-not-equal $get-num:<a href='../mu-init-test.subx.html#L7'>main</a>/disp8 +<span id="L227" class="LineNr">227 </span> 75/jump-if-!= $get-num:<a href='../mu-init-test.subx.html#L7'>main</a>/disp8 <span id="L228" class="LineNr">228 </span> <span class="subxS1Comment"># . expected(ed, err, "integer")</span> <span id="L229" class="LineNr">229 </span> <span class="subxS2Comment"># . . push args</span> <span id="L230" class="LineNr">230 </span> 68/push <span class="Constant">"integer"</span>/imm32 @@ -316,7 +316,7 @@ if ('onhashchange' in window) { <span id="L255" class="LineNr">255 </span><span class="Constant">$get-num:loop</span>: <span id="L256" class="LineNr">256 </span> <span class="subxComment"># if (out->write >= out->length) error</span> <span id="L257" class="LineNr">257 </span> 39/compare 3/mod/direct 2/rm32/edx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 1/r32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># compare edx with ecx</span> -<span id="L258" class="LineNr">258 </span> 7d/jump-if-lesser $get-num:stage2/disp8 +<span id="L258" class="LineNr">258 </span> 7d/jump-if-< $get-num:stage2/disp8 <span id="L259" class="LineNr">259 </span> <span class="subxS1Comment"># . error(ed, err, msg) # TODO: show full number</span> <span id="L260" class="LineNr">260 </span> <span class="subxS2Comment"># . . push args</span> <span id="L261" class="LineNr">261 </span> 68/push <span class="Constant">"get-num: too many digits in number"</span>/imm32 @@ -604,10 +604,10 @@ if ('onhashchange' in window) { <span id="L543" class="LineNr">543 </span> b8/copy-to-eax 0/imm32 <span id="L544" class="LineNr">544 </span> <span class="subxComment"># if (c < '0') return false</span> <span id="L545" class="LineNr">545 </span> 81 7/subop/compare 1/mod/*+disp8 5/rm32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 8/disp8 0x30/imm32 <span class="subxComment"># compare *(ebp+8)</span> -<span id="L546" class="LineNr">546 </span> 7c/jump-if-lesser $is-digit?:end/disp8 +<span id="L546" class="LineNr">546 </span> 7c/jump-if-< $is-digit?:end/disp8 <span id="L547" class="LineNr">547 </span> <span class="subxComment"># if (c > '9') return false</span> <span id="L548" class="LineNr">548 </span> 81 7/subop/compare 1/mod/*+disp8 5/rm32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 8/disp8 0x39/imm32 <span class="subxComment"># compare *(ebp+8)</span> -<span id="L549" class="LineNr">549 </span> 7f/jump-if-greater $is-digit?:end/disp8 +<span id="L549" class="LineNr">549 </span> 7f/jump-if-> $is-digit?:end/disp8 <span id="L550" class="LineNr">550 </span> <span class="subxComment"># otherwise return true</span> <span id="L551" class="LineNr">551 </span> b8/copy-to-eax 1/imm32 <span id="L552" class="LineNr">552 </span><span class="Constant">$is-digit?:end</span>: |