diff options
Diffstat (limited to 'html/subx/051test.subx.html')
| -rw-r--r-- | html/subx/051test.subx.html | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/html/subx/051test.subx.html b/html/subx/051test.subx.html index 89ebfd20..cf70c9bc 100644 --- a/html/subx/051test.subx.html +++ b/html/subx/051test.subx.html @@ -24,6 +24,7 @@ body { font-size:12pt; font-family: monospace; color: #aaaaaa; background-color: .subxS1Comment { color:#2d8cff; } .CommentedCode { color: #6c6c6c; } .Constant { color:#00a0a0; } +.subxFunction { color: #ff8700; } .SpecialChar { color: #ff0000; } --> </style> @@ -83,7 +84,7 @@ if ('onhashchange' in window) { <span id="L21" class="LineNr">21 </span> cd/syscall 0x80/imm8 <span id="L22" class="LineNr">22 </span> <span id="L23" class="LineNr">23 </span><span class="subxComment"># print msg to stderr if a != b, otherwise print "."</span> -<span id="L24" class="LineNr">24 </span>check-ints-equal: <span class="subxComment"># (a : int, b : int, msg : (address array byte)) -> boolean</span> +<span id="L24" class="LineNr">24 </span><span class="subxFunction">check-ints-equal</span>: <span class="subxComment"># (a : int, b : int, msg : (address array byte)) -> boolean</span> <span id="L25" class="LineNr">25 </span> <span class="subxS1Comment"># . prolog</span> <span id="L26" class="LineNr">26 </span> 55/push-EBP <span id="L27" class="LineNr">27 </span> 89/copy 3/mod/direct 5/rm32/EBP <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> 4/r32/ESP <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> <span class="subxComment"># copy ESP to EBP</span> @@ -107,7 +108,7 @@ if ('onhashchange' in window) { <span id="L45" class="LineNr">45 </span> <span class="subxS1Comment"># . return</span> <span id="L46" class="LineNr">46 </span> eb/jump $check-ints-equal:end/disp8 <span id="L47" class="LineNr">47 </span> <span class="subxComment"># otherwise print error message</span> -<span id="L48" class="LineNr">48 </span>$check-ints-equal:else: +<span id="L48" class="LineNr">48 </span><span class="Constant">$check-ints-equal:else</span>: <span id="L49" class="LineNr">49 </span> <span class="subxS1Comment"># . _write(2/stderr, msg)</span> <span id="L50" class="LineNr">50 </span> <span class="subxS2Comment"># . . push args</span> <span id="L51" class="LineNr">51 </span> 8b/copy 1/mod/*+disp8 4/rm32/sib 5/base/EBP 4/index/none <span class="CommentedCode"> . </span> 1/r32/ECX 0x10/disp8 <span class="CommentedCode"> . </span> <span class="subxComment"># copy *(EBP+16) to ECX</span> @@ -127,7 +128,7 @@ if ('onhashchange' in window) { <span id="L65" class="LineNr">65 </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> 8/imm32 <span class="subxComment"># add to ESP</span> <span id="L66" class="LineNr">66 </span> <span class="subxComment"># increment Num-test-failures</span> <span id="L67" class="LineNr">67 </span> ff 0/subop/increment 0/mod/indirect 5/rm32/.disp32 <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> <span class="CommentedCode"> . </span> <span class="SpecialChar">Num-test-failures</span>/disp32 <span class="subxComment"># increment *Num-test-failures</span> -<span id="L68" class="LineNr">68 </span>$check-ints-equal:end: +<span id="L68" class="LineNr">68 </span><span class="Constant">$check-ints-equal:end</span>: <span id="L69" class="LineNr">69 </span> <span class="subxS1Comment"># . restore registers</span> <span id="L70" class="LineNr">70 </span> 5b/pop-to-EBX <span id="L71" class="LineNr">71 </span> 59/pop-to-ECX |