This commit is contained in:
Kartik Agaram 2020-07-10 23:44:10 -07:00
parent c5a3f65502
commit ec73ed1230
76 changed files with 23830 additions and 23651 deletions

View File

@ -1,147 +0,0 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 080zero-out.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
<meta name="settings" content="number_lines,use_css,no_foldcolumn,expand_tabs,line_ids,prevent_copy=">
<meta name="colorscheme" content="minimal-light">
<style type="text/css">
<!--
pre { font-family: monospace; color: #000000; background-color: #c6c6c6; }
body { font-size:12pt; font-family: monospace; color: #000000; background-color: #c6c6c6; }
a { color:inherit; }
* { font-size:12pt; font-size: 1em; }
.subxComment { color: #005faf; }
.subxS2Comment { color: #8a8a8a; }
.LineNr { }
.subxS1Comment { color: #0000af; }
.subxFunction { color: #af5f00; text-decoration: underline; }
.Normal { color: #000000; background-color: #c6c6c6; padding-bottom: 1px; }
.Constant { color: #008787; }
.subxTest { color: #5f8700; }
-->
</style>
<script type='text/javascript'>
<!--
/* function to open any folds containing a jumped-to line before jumping to it */
function JumpToLine()
{
var lineNum;
lineNum = window.location.hash;
lineNum = lineNum.substr(1); /* strip off '#' */
if (lineNum.indexOf('L') == -1) {
lineNum = 'L'+lineNum;
}
var lineElem = document.getElementById(lineNum);
/* Always jump to new location even if the line was hidden inside a fold, or
* we corrected the raw number to a line ID.
*/
if (lineElem) {
lineElem.scrollIntoView(true);
}
return true;
}
if ('onhashchange' in window) {
window.onhashchange = JumpToLine;
}
-->
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/080zero-out.subx'>https://github.com/akkartik/mu/blob/master/080zero-out.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Fill a region of memory with zeroes.</span>
<span id="L2" class="LineNr"> 2 </span>
<span id="L3" class="LineNr"> 3 </span>== code
<span id="L4" class="LineNr"> 4 </span><span class="subxComment"># instruction effective address register displacement immediate</span>
<span id="L5" class="LineNr"> 5 </span><span class="subxS1Comment"># . op subop mod rm32 base index scale r32</span>
<span id="L6" class="LineNr"> 6 </span><span class="subxS1Comment"># . 1-3 bytes 3 bits 2 bits 3 bits 3 bits 3 bits 2 bits 2 bits 0/1/2/4 bytes 0/1/2/4 bytes</span>
<span id="L7" class="LineNr"> 7 </span>
<span id="L8" class="LineNr"> 8 </span><span class="subxFunction">zero-out</span>: <span class="subxComment"># start: (addr byte), len: int</span>
<span id="L9" class="LineNr"> 9 </span> <span class="subxComment"># pseudocode:</span>
<span id="L10" class="LineNr">10 </span> <span class="subxComment"># curr/esi = start</span>
<span id="L11" class="LineNr">11 </span> <span class="subxComment"># i/ecx = 0</span>
<span id="L12" class="LineNr">12 </span> <span class="subxComment"># while true</span>
<span id="L13" class="LineNr">13 </span> <span class="subxComment"># if (i &gt;= len) break</span>
<span id="L14" class="LineNr">14 </span> <span class="subxComment"># *curr = 0</span>
<span id="L15" class="LineNr">15 </span> <span class="subxComment"># ++curr</span>
<span id="L16" class="LineNr">16 </span> <span class="subxComment"># ++i</span>
<span id="L17" class="LineNr">17 </span> <span class="subxComment">#</span>
<span id="L18" class="LineNr">18 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L19" class="LineNr">19 </span> 55/push-ebp
<span id="L20" class="LineNr">20 </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="L21" class="LineNr">21 </span> <span class="subxS1Comment"># . save registers</span>
<span id="L22" class="LineNr">22 </span> 50/push-eax
<span id="L23" class="LineNr">23 </span> 51/push-ecx
<span id="L24" class="LineNr">24 </span> 52/push-edx
<span id="L25" class="LineNr">25 </span> 56/push-esi
<span id="L26" class="LineNr">26 </span> <span class="subxComment"># curr/esi = start</span>
<span id="L27" class="LineNr">27 </span> 8b/copy 1/mod/*+disp8 5/rm32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 6/r32/esi 8/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ebp+8) to esi</span>
<span id="L28" class="LineNr">28 </span> <span class="subxComment"># var i/ecx: int = 0</span>
<span id="L29" class="LineNr">29 </span> 31/xor 3/mod/direct 1/rm32/ecx <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"># clear ecx</span>
<span id="L30" class="LineNr">30 </span> <span class="subxComment"># edx = len</span>
<span id="L31" class="LineNr">31 </span> 8b/copy 1/mod/*+disp8 5/rm32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 2/r32/edx 0xc/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ebp+12) to edx</span>
<span id="L32" class="LineNr">32 </span><span class="Constant">$zero-out:loop</span>:
<span id="L33" class="LineNr">33 </span> <span class="subxComment"># if (i &gt;= len) break</span>
<span id="L34" class="LineNr">34 </span> 39/compare 3/mod/direct 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 2/r32/edx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># compare ecx with edx</span>
<span id="L35" class="LineNr">35 </span> 7d/jump-if-&gt;= $zero-out:end/disp8
<span id="L36" class="LineNr">36 </span> <span class="subxComment"># *curr = 0</span>
<span id="L37" class="LineNr">37 </span> c6 0/subop/copy 0/mod/direct 6/rm32/esi <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/imm8 <span class="subxComment"># copy byte to *esi</span>
<span id="L38" class="LineNr">38 </span> <span class="subxComment"># ++curr</span>
<span id="L39" class="LineNr">39 </span> 46/increment-esi
<span id="L40" class="LineNr">40 </span> <span class="subxComment"># ++i</span>
<span id="L41" class="LineNr">41 </span> 41/increment-ecx
<span id="L42" class="LineNr">42 </span> eb/jump $zero-out:<span class="Constant">loop</span>/disp8
<span id="L43" class="LineNr">43 </span><span class="Constant">$zero-out:end</span>:
<span id="L44" class="LineNr">44 </span> <span class="subxS1Comment"># . restore registers</span>
<span id="L45" class="LineNr">45 </span> 5e/pop-to-esi
<span id="L46" class="LineNr">46 </span> 5a/pop-to-edx
<span id="L47" class="LineNr">47 </span> 59/pop-to-ecx
<span id="L48" class="LineNr">48 </span> 58/pop-to-eax
<span id="L49" class="LineNr">49 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L50" class="LineNr">50 </span> 89/copy 3/mod/direct 4/rm32/esp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 5/r32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy ebp to esp</span>
<span id="L51" class="LineNr">51 </span> 5d/pop-to-ebp
<span id="L52" class="LineNr">52 </span> c3/return
<span id="L53" class="LineNr">53 </span>
<span id="L54" class="LineNr">54 </span><span class="subxTest">test-zero-out</span>:
<span id="L55" class="LineNr">55 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L56" class="LineNr">56 </span> 55/push-ebp
<span id="L57" class="LineNr">57 </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="L58" class="LineNr">58 </span> <span class="subxComment"># region/ecx = 34, 35, 36, 37</span>
<span id="L59" class="LineNr">59 </span> 68/push 0x37363534/imm32
<span id="L60" class="LineNr">60 </span> 89/copy 3/mod/direct 1/rm32/ecx <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 ecx</span>
<span id="L61" class="LineNr">61 </span> <span class="subxComment"># zero-out(ecx, 3)</span>
<span id="L62" class="LineNr">62 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L63" class="LineNr">63 </span> 68/push 3/imm32/len
<span id="L64" class="LineNr">64 </span> 51/push-ecx
<span id="L65" class="LineNr">65 </span> <span class="subxS2Comment"># . . call</span>
<span id="L66" class="LineNr">66 </span> e8/call <a href='080zero-out.subx.html#L8'>zero-out</a>/disp32
<span id="L67" class="LineNr">67 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L68" class="LineNr">68 </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="L69" class="LineNr">69 </span> <span class="subxComment"># first 3 bytes cleared, fourth left alone</span>
<span id="L70" class="LineNr">70 </span> <span class="subxS1Comment"># . check-ints-equal(*ecx, 0x37000000, msg)</span>
<span id="L71" class="LineNr">71 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L72" class="LineNr">72 </span> 68/push <span class="Constant">&quot;F - test-zero-out&quot;</span>/imm32
<span id="L73" class="LineNr">73 </span> 68/push 0x37000000/imm32
<span id="L74" class="LineNr">74 </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="L75" class="LineNr">75 </span> <span class="subxS2Comment"># . . call</span>
<span id="L76" class="LineNr">76 </span> e8/call <a href='051test.subx.html#L24'>check-ints-equal</a>/disp32
<span id="L77" class="LineNr">77 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L78" class="LineNr">78 </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="L79" class="LineNr">79 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L80" class="LineNr">80 </span> 89/copy 3/mod/direct 4/rm32/esp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 5/r32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy ebp to esp</span>
<span id="L81" class="LineNr">81 </span> 5d/pop-to-ebp
<span id="L82" class="LineNr">82 </span> c3/return
<span id="L83" class="LineNr">83 </span>
<span id="L84" class="LineNr">84 </span><span class="subxS2Comment"># . . vim&#0058;nowrap:textwidth=0</span>
</pre>
</body>
</html>
<!-- vim: set foldmethod=manual : -->

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 050_write.subx</title>
<title>Mu - 101_write.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -55,7 +55,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/050_write.subx'>https://github.com/akkartik/mu/blob/master/050_write.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/101_write.subx'>https://github.com/akkartik/mu/blob/master/101_write.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># _write: write to a file descriptor (fd)</span>
<span id="L2" class="LineNr"> 2 </span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 051test.subx</title>
<title>Mu - 102test.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -55,7 +55,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/051test.subx'>https://github.com/akkartik/mu/blob/master/051test.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/102test.subx'>https://github.com/akkartik/mu/blob/master/102test.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Rudimentary test harness</span>
<span id="L2" class="LineNr"> 2 </span>
@ -71,7 +71,7 @@ if ('onhashchange' in window) {
<span id="L12" class="LineNr"> 12 </span> 68/push 34/imm32
<span id="L13" class="LineNr"> 13 </span> 68/push 34/imm32
<span id="L14" class="LineNr"> 14 </span> <span class="subxS2Comment"># . . call</span>
<span id="L15" class="LineNr"> 15 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L15" class="LineNr"> 15 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L16" class="LineNr"> 16 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L17" class="LineNr"> 17 </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="L18" class="LineNr"> 18 </span> <span class="subxComment"># syscall(exit, 0)</span>
@ -98,7 +98,7 @@ if ('onhashchange' in window) {
<span id="L39" class="LineNr"> 39 </span> 68/push <span class="Constant">&quot;.&quot;</span>/imm32
<span id="L40" class="LineNr"> 40 </span> 68/push 2/imm32/stderr
<span id="L41" class="LineNr"> 41 </span> <span class="subxS2Comment"># . . call</span>
<span id="L42" class="LineNr"> 42 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L42" class="LineNr"> 42 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L43" class="LineNr"> 43 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L44" class="LineNr"> 44 </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="L45" class="LineNr"> 45 </span> <span class="subxS1Comment"># . return</span>
@ -111,19 +111,19 @@ if ('onhashchange' in window) {
<span id="L52" class="LineNr"> 52 </span> 51/push-ecx
<span id="L53" class="LineNr"> 53 </span> 68/push 2/imm32/stderr
<span id="L54" class="LineNr"> 54 </span> <span class="subxS2Comment"># . . call</span>
<span id="L55" class="LineNr"> 55 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L55" class="LineNr"> 55 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L56" class="LineNr"> 56 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L57" class="LineNr"> 57 </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="L58" class="LineNr"> 58 </span> <span class="subxS1Comment"># . _write(2/stderr, Newline)</span>
<span id="L59" class="LineNr"> 59 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L60" class="LineNr"> 60 </span> 68/push <span class="SpecialChar"><a href='051test.subx.html#L82'>Newline</a></span>/imm32
<span id="L60" class="LineNr"> 60 </span> 68/push <span class="SpecialChar"><a href='102test.subx.html#L82'>Newline</a></span>/imm32
<span id="L61" class="LineNr"> 61 </span> 68/push 2/imm32/stderr
<span id="L62" class="LineNr"> 62 </span> <span class="subxS2Comment"># . . call</span>
<span id="L63" class="LineNr"> 63 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L63" class="LineNr"> 63 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L64" class="LineNr"> 64 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L65" class="LineNr"> 65 </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="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="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='051test.subx.html#L89'>Num-test-failures</a></span>/disp32 <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="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='102test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># increment *Num-test-failures</span>
<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

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 052kernel-string-equal.subx</title>
<title>Mu - 103kernel-string-equal.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -58,7 +58,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/052kernel-string-equal.subx'>https://github.com/akkartik/mu/blob/master/052kernel-string-equal.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/103kernel-string-equal.subx'>https://github.com/akkartik/mu/blob/master/103kernel-string-equal.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Checking null-terminated strings.</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment">#</span>
@ -87,10 +87,10 @@ if ('onhashchange' in window) {
<span id="L25" class="LineNr"> 25 </span><span class="SpecialChar">Entry</span>: <span class="subxComment"># run all tests</span>
<span id="L26" class="LineNr"> 26 </span> e8/call run-tests/disp32 <span class="subxComment"># 'run-tests' is a function created automatically by SubX. It calls all functions that start with 'test-'.</span>
<span id="L27" class="LineNr"> 27 </span> <span class="subxComment"># syscall(exit, Num-test-failures)</span>
<span id="L28" class="LineNr"> 28 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='051test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L28" class="LineNr"> 28 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='102test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L29" class="LineNr"> 29 </span> e8/call syscall_exit/disp32
<span id="L30" class="LineNr"> 30 </span>
<span id="L31" class="LineNr"> 31 </span><span class="subxFunction">kernel-string-equal?</span>: <span class="subxComment"># s: (addr kernel-string), benchmark: (addr array byte) -&gt; eax: boolean</span>
<span id="L31" class="LineNr"> 31 </span><span class="subxFunction">kernel-string-equal?</span>: <span class="subxComment"># s: (addr kernel-string), benchmark: (addr array byte) -&gt; result/eax: boolean</span>
<span id="L32" class="LineNr"> 32 </span> <span class="subxComment"># pseudocode:</span>
<span id="L33" class="LineNr"> 33 </span> <span class="subxComment"># n = benchmark-&gt;size</span>
<span id="L34" class="LineNr"> 34 </span> <span class="subxComment"># s1 = s</span>
@ -184,9 +184,9 @@ if ('onhashchange' in window) {
<span id="L122" class="LineNr">122 </span> <span class="subxComment"># eax = kernel-string-equal?(Null-kernel-string, &quot;&quot;)</span>
<span id="L123" class="LineNr">123 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L124" class="LineNr">124 </span> 68/push <span class="Constant">&quot;&quot;</span>/imm32
<span id="L125" class="LineNr">125 </span> 68/push <span class="SpecialChar"><a href='052kernel-string-equal.subx.html#L263'>Null-kernel-string</a></span>/imm32
<span id="L125" class="LineNr">125 </span> 68/push <span class="SpecialChar"><a href='103kernel-string-equal.subx.html#L263'>Null-kernel-string</a></span>/imm32
<span id="L126" class="LineNr">126 </span> <span class="subxS2Comment"># . . call</span>
<span id="L127" class="LineNr">127 </span> e8/call <a href='052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L127" class="LineNr">127 </span> e8/call <a href='103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L128" class="LineNr">128 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L129" class="LineNr">129 </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="L130" class="LineNr">130 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -195,7 +195,7 @@ if ('onhashchange' in window) {
<span id="L133" class="LineNr">133 </span> 68/push 1/imm32/true
<span id="L134" class="LineNr">134 </span> 50/push-eax
<span id="L135" class="LineNr">135 </span> <span class="subxS2Comment"># . . call</span>
<span id="L136" class="LineNr">136 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L136" class="LineNr">136 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L137" class="LineNr">137 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L138" class="LineNr">138 </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="L139" class="LineNr">139 </span> c3/return
@ -204,9 +204,9 @@ if ('onhashchange' in window) {
<span id="L142" class="LineNr">142 </span> <span class="subxComment"># eax = kernel-string-equal?(Null-kernel-string, &quot;Abc&quot;)</span>
<span id="L143" class="LineNr">143 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L144" class="LineNr">144 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L145" class="LineNr">145 </span> 68/push <span class="SpecialChar"><a href='052kernel-string-equal.subx.html#L263'>Null-kernel-string</a></span>/imm32
<span id="L145" class="LineNr">145 </span> 68/push <span class="SpecialChar"><a href='103kernel-string-equal.subx.html#L263'>Null-kernel-string</a></span>/imm32
<span id="L146" class="LineNr">146 </span> <span class="subxS2Comment"># . . call</span>
<span id="L147" class="LineNr">147 </span> e8/call <a href='052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L147" class="LineNr">147 </span> e8/call <a href='103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L148" class="LineNr">148 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L149" class="LineNr">149 </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="L150" class="LineNr">150 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -215,7 +215,7 @@ if ('onhashchange' in window) {
<span id="L153" class="LineNr">153 </span> 68/push 0/imm32/false
<span id="L154" class="LineNr">154 </span> 50/push-eax
<span id="L155" class="LineNr">155 </span> <span class="subxS2Comment"># . . call</span>
<span id="L156" class="LineNr">156 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L156" class="LineNr">156 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L157" class="LineNr">157 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L158" class="LineNr">158 </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="L159" class="LineNr">159 </span> c3/return
@ -224,9 +224,9 @@ if ('onhashchange' in window) {
<span id="L162" class="LineNr">162 </span> <span class="subxComment"># eax = kernel-string-equal?(_test-Abc-kernel-string, &quot;Abc&quot;)</span>
<span id="L163" class="LineNr">163 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L164" class="LineNr">164 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L165" class="LineNr">165 </span> 68/push <a href='052kernel-string-equal.subx.html#L266'>_test-Abc-kernel-string</a>/imm32
<span id="L165" class="LineNr">165 </span> 68/push <a href='103kernel-string-equal.subx.html#L266'>_test-Abc-kernel-string</a>/imm32
<span id="L166" class="LineNr">166 </span> <span class="subxS2Comment"># . . call</span>
<span id="L167" class="LineNr">167 </span> e8/call <a href='052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L167" class="LineNr">167 </span> e8/call <a href='103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L168" class="LineNr">168 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L169" class="LineNr">169 </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="L170" class="LineNr">170 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -235,7 +235,7 @@ if ('onhashchange' in window) {
<span id="L173" class="LineNr">173 </span> 68/push 1/imm32/true
<span id="L174" class="LineNr">174 </span> 50/push-eax
<span id="L175" class="LineNr">175 </span> <span class="subxS2Comment"># . . call</span>
<span id="L176" class="LineNr">176 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L176" class="LineNr">176 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L177" class="LineNr">177 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L178" class="LineNr">178 </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="L179" class="LineNr">179 </span> c3/return
@ -244,9 +244,9 @@ if ('onhashchange' in window) {
<span id="L182" class="LineNr">182 </span> <span class="subxComment"># eax = kernel-string-equal?(_test-Abc-kernel-string, &quot;Adc&quot;)</span>
<span id="L183" class="LineNr">183 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L184" class="LineNr">184 </span> 68/push <span class="Constant">&quot;Adc&quot;</span>/imm32
<span id="L185" class="LineNr">185 </span> 68/push <a href='052kernel-string-equal.subx.html#L266'>_test-Abc-kernel-string</a>/imm32
<span id="L185" class="LineNr">185 </span> 68/push <a href='103kernel-string-equal.subx.html#L266'>_test-Abc-kernel-string</a>/imm32
<span id="L186" class="LineNr">186 </span> <span class="subxS2Comment"># . . call</span>
<span id="L187" class="LineNr">187 </span> e8/call <a href='052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L187" class="LineNr">187 </span> e8/call <a href='103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L188" class="LineNr">188 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L189" class="LineNr">189 </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="L190" class="LineNr">190 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -255,7 +255,7 @@ if ('onhashchange' in window) {
<span id="L193" class="LineNr">193 </span> 68/push 0/imm32/false
<span id="L194" class="LineNr">194 </span> 50/push-eax
<span id="L195" class="LineNr">195 </span> <span class="subxS2Comment"># . . call</span>
<span id="L196" class="LineNr">196 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L196" class="LineNr">196 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L197" class="LineNr">197 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L198" class="LineNr">198 </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="L199" class="LineNr">199 </span> c3/return
@ -264,9 +264,9 @@ if ('onhashchange' in window) {
<span id="L202" class="LineNr">202 </span> <span class="subxComment"># eax = kernel-string-equal?(_test-Abc-kernel-string, &quot;&quot;)</span>
<span id="L203" class="LineNr">203 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L204" class="LineNr">204 </span> 68/push <span class="Constant">&quot;&quot;</span>/imm32
<span id="L205" class="LineNr">205 </span> 68/push <a href='052kernel-string-equal.subx.html#L266'>_test-Abc-kernel-string</a>/imm32
<span id="L205" class="LineNr">205 </span> 68/push <a href='103kernel-string-equal.subx.html#L266'>_test-Abc-kernel-string</a>/imm32
<span id="L206" class="LineNr">206 </span> <span class="subxS2Comment"># . . call</span>
<span id="L207" class="LineNr">207 </span> e8/call <a href='052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L207" class="LineNr">207 </span> e8/call <a href='103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L208" class="LineNr">208 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L209" class="LineNr">209 </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="L210" class="LineNr">210 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -275,7 +275,7 @@ if ('onhashchange' in window) {
<span id="L213" class="LineNr">213 </span> 68/push 0/imm32/false
<span id="L214" class="LineNr">214 </span> 50/push-eax
<span id="L215" class="LineNr">215 </span> <span class="subxS2Comment"># . . call</span>
<span id="L216" class="LineNr">216 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L216" class="LineNr">216 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L217" class="LineNr">217 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L218" class="LineNr">218 </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="L219" class="LineNr">219 </span> c3/return
@ -284,9 +284,9 @@ if ('onhashchange' in window) {
<span id="L222" class="LineNr">222 </span> <span class="subxComment"># eax = kernel-string-equal?(_test-Abc-kernel-string, &quot;Ab&quot;)</span>
<span id="L223" class="LineNr">223 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L224" class="LineNr">224 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L225" class="LineNr">225 </span> 68/push <a href='052kernel-string-equal.subx.html#L266'>_test-Abc-kernel-string</a>/imm32
<span id="L225" class="LineNr">225 </span> 68/push <a href='103kernel-string-equal.subx.html#L266'>_test-Abc-kernel-string</a>/imm32
<span id="L226" class="LineNr">226 </span> <span class="subxS2Comment"># . . call</span>
<span id="L227" class="LineNr">227 </span> e8/call <a href='052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L227" class="LineNr">227 </span> e8/call <a href='103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L228" class="LineNr">228 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L229" class="LineNr">229 </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="L230" class="LineNr">230 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -295,7 +295,7 @@ if ('onhashchange' in window) {
<span id="L233" class="LineNr">233 </span> 68/push 0/imm32/false
<span id="L234" class="LineNr">234 </span> 50/push-eax
<span id="L235" class="LineNr">235 </span> <span class="subxS2Comment"># . . call</span>
<span id="L236" class="LineNr">236 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L236" class="LineNr">236 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L237" class="LineNr">237 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L238" class="LineNr">238 </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="L239" class="LineNr">239 </span> c3/return
@ -304,9 +304,9 @@ if ('onhashchange' in window) {
<span id="L242" class="LineNr">242 </span> <span class="subxComment"># eax = kernel-string-equal?(_test-Abc-kernel-string, &quot;Abcd&quot;)</span>
<span id="L243" class="LineNr">243 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L244" class="LineNr">244 </span> 68/push <span class="Constant">&quot;Abcd&quot;</span>/imm32
<span id="L245" class="LineNr">245 </span> 68/push <a href='052kernel-string-equal.subx.html#L266'>_test-Abc-kernel-string</a>/imm32
<span id="L245" class="LineNr">245 </span> 68/push <a href='103kernel-string-equal.subx.html#L266'>_test-Abc-kernel-string</a>/imm32
<span id="L246" class="LineNr">246 </span> <span class="subxS2Comment"># . . call</span>
<span id="L247" class="LineNr">247 </span> e8/call <a href='052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L247" class="LineNr">247 </span> e8/call <a href='103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L248" class="LineNr">248 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L249" class="LineNr">249 </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="L250" class="LineNr">250 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -315,7 +315,7 @@ if ('onhashchange' in window) {
<span id="L253" class="LineNr">253 </span> 68/push 0/imm32/false
<span id="L254" class="LineNr">254 </span> 50/push-eax
<span id="L255" class="LineNr">255 </span> <span class="subxS2Comment"># . . call</span>
<span id="L256" class="LineNr">256 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L256" class="LineNr">256 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L257" class="LineNr">257 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L258" class="LineNr">258 </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="L259" class="LineNr">259 </span> c3/return

400
html/103screen.subx.html generated
View File

@ -1,400 +0,0 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 103screen.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
<meta name="settings" content="number_lines,use_css,pre_wrap,no_foldcolumn,expand_tabs,line_ids,prevent_copy=">
<meta name="colorscheme" content="minimal-light">
<style type="text/css">
<!--
pre { white-space: pre-wrap; font-family: monospace; color: #000000; background-color: #c6c6c6; }
body { font-size:12pt; font-family: monospace; color: #000000; background-color: #c6c6c6; }
a { color:inherit; }
* { font-size:12pt; font-size: 1em; }
.subxComment { color: #005faf; }
.subxFunction { color: #af5f00; text-decoration: underline; }
.LineNr { }
.subxS1Comment { color: #0000af; }
.SpecialChar { color: #d70000; }
.Constant { color: #008787; }
.subxMinorFunction { color: #875f5f; }
-->
</style>
<script type='text/javascript'>
<!--
/* function to open any folds containing a jumped-to line before jumping to it */
function JumpToLine()
{
var lineNum;
lineNum = window.location.hash;
lineNum = lineNum.substr(1); /* strip off '#' */
if (lineNum.indexOf('L') == -1) {
lineNum = 'L'+lineNum;
}
var lineElem = document.getElementById(lineNum);
/* Always jump to new location even if the line was hidden inside a fold, or
* we corrected the raw number to a line ID.
*/
if (lineElem) {
lineElem.scrollIntoView(true);
}
return true;
}
if ('onhashchange' in window) {
window.onhashchange = JumpToLine;
}
-->
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/103screen.subx'>https://github.com/akkartik/mu/blob/master/103screen.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Primitives for screen control.</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># Require Linux and a modern terminal.</span>
<span id="L3" class="LineNr"> 3 </span>
<span id="L4" class="LineNr"> 4 </span>== code
<span id="L5" class="LineNr"> 5 </span>
<span id="L6" class="LineNr"> 6 </span><span class="subxFunction">enable-screen-grid-mode</span>:
<span id="L7" class="LineNr"> 7 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L8" class="LineNr"> 8 </span> 55/push-ebp
<span id="L9" class="LineNr"> 9 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L10" class="LineNr"> 10 </span> <span class="subxComment">#</span>
<span id="L11" class="LineNr"> 11 </span> (<a href='064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='064write-byte.subx.html#L10'>Stdout</a></span>)
<span id="L12" class="LineNr"> 12 </span> (<a href='064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='065write-buffered.subx.html#L209'>Stderr</a></span>)
<span id="L13" class="LineNr"> 13 </span> <span class="subxComment"># switch to second screen buffer</span>
<span id="L14" class="LineNr"> 14 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L15" class="LineNr"> 15 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[?1049h&quot;</span>)
<span id="L16" class="LineNr"> 16 </span> <span class="subxComment">#</span>
<span id="L17" class="LineNr"> 17 </span> (<a href='103screen.subx.html#L75'>clear-screen</a>)
<span id="L18" class="LineNr"> 18 </span><span class="Constant">$enable-screen-grid-mode:end</span>:
<span id="L19" class="LineNr"> 19 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L20" class="LineNr"> 20 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L21" class="LineNr"> 21 </span> 5d/pop-to-ebp
<span id="L22" class="LineNr"> 22 </span> c3/return
<span id="L23" class="LineNr"> 23 </span>
<span id="L24" class="LineNr"> 24 </span><span class="subxFunction">enable-screen-type-mode</span>:
<span id="L25" class="LineNr"> 25 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L26" class="LineNr"> 26 </span> 55/push-ebp
<span id="L27" class="LineNr"> 27 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L28" class="LineNr"> 28 </span> <span class="subxComment"># switch to first screen buffer</span>
<span id="L29" class="LineNr"> 29 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L30" class="LineNr"> 30 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[?1049l&quot;</span>)
<span id="L31" class="LineNr"> 31 </span><span class="Constant">$enable-screen-type-mode:end</span>:
<span id="L32" class="LineNr"> 32 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L33" class="LineNr"> 33 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L34" class="LineNr"> 34 </span> 5d/pop-to-ebp
<span id="L35" class="LineNr"> 35 </span> c3/return
<span id="L36" class="LineNr"> 36 </span>
<span id="L37" class="LineNr"> 37 </span><span class="subxFunction">screen-size</span>: <span class="subxComment"># -&gt; nrows/eax: int, ncols/ecx: int</span>
<span id="L38" class="LineNr"> 38 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L39" class="LineNr"> 39 </span> 55/push-ebp
<span id="L40" class="LineNr"> 40 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L41" class="LineNr"> 41 </span> <span class="subxS1Comment"># . save registers</span>
<span id="L42" class="LineNr"> 42 </span> 52/push-edx
<span id="L43" class="LineNr"> 43 </span> 53/push-ebx
<span id="L44" class="LineNr"> 44 </span> 56/push-esi
<span id="L45" class="LineNr"> 45 </span> 57/push-edi
<span id="L46" class="LineNr"> 46 </span> <span class="subxComment">#</span>
<span id="L47" class="LineNr"> 47 </span> (<a href='103screen.subx.html#L305'>_maybe-open-terminal</a>)
<span id="L48" class="LineNr"> 48 </span> <span class="subxComment"># var window-size-info/esi: (addr winsize)</span>
<span id="L49" class="LineNr"> 49 </span> <span class="subxComment"># winsize is a type from the Linux kernel. We don't care how large it is.</span>
<span id="L50" class="LineNr"> 50 </span> 81 5/subop/subtract %esp 0x40/imm32
<span id="L51" class="LineNr"> 51 </span> 89/&lt;- %esi 4/r32/esp
<span id="L52" class="LineNr"> 52 </span> <span class="subxComment"># ioctl(*Terminal-file-descriptor, TIOCGWINSZ, window-size-info)</span>
<span id="L53" class="LineNr"> 53 </span> 89/&lt;- %edx 6/r32/esi
<span id="L54" class="LineNr"> 54 </span> b9/copy-to-ecx 0x5413/imm32/TIOCGWINSZ
<span id="L55" class="LineNr"> 55 </span> 8b/-&gt; *<span class="SpecialChar"><a href='103screen.subx.html#L327'>Terminal-file-descriptor</a></span> 3/r32/ebx
<span id="L56" class="LineNr"> 56 </span> e8/call syscall_ioctl/disp32
<span id="L57" class="LineNr"> 57 </span> <span class="subxComment"># some bitworking to extract 2 16-bit shorts</span>
<span id="L58" class="LineNr"> 58 </span> 8b/-&gt; *esi 0/r32/eax
<span id="L59" class="LineNr"> 59 </span> 81 4/subop/and %eax 0xffff/imm32
<span id="L60" class="LineNr"> 60 </span> 8b/-&gt; *esi 1/r32/ecx
<span id="L61" class="LineNr"> 61 </span> c1/shift 5/subop/logical-right %ecx 0x10/imm8
<span id="L62" class="LineNr"> 62 </span><span class="Constant">$screen-size:end</span>:
<span id="L63" class="LineNr"> 63 </span> <span class="subxS1Comment"># . reclaim locals</span>
<span id="L64" class="LineNr"> 64 </span> 81 0/subop/add %esp 0x40/imm32
<span id="L65" class="LineNr"> 65 </span> <span class="subxS1Comment"># . restore registers</span>
<span id="L66" class="LineNr"> 66 </span> 5f/pop-to-edi
<span id="L67" class="LineNr"> 67 </span> 5e/pop-to-esi
<span id="L68" class="LineNr"> 68 </span> 5b/pop-to-ebx
<span id="L69" class="LineNr"> 69 </span> 5a/pop-to-edx
<span id="L70" class="LineNr"> 70 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L71" class="LineNr"> 71 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L72" class="LineNr"> 72 </span> 5d/pop-to-ebp
<span id="L73" class="LineNr"> 73 </span> c3/return
<span id="L74" class="LineNr"> 74 </span>
<span id="L75" class="LineNr"> 75 </span><span class="subxFunction">clear-screen</span>:
<span id="L76" class="LineNr"> 76 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L77" class="LineNr"> 77 </span> 55/push-ebp
<span id="L78" class="LineNr"> 78 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L79" class="LineNr"> 79 </span> <span class="subxComment">#</span>
<span id="L80" class="LineNr"> 80 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L81" class="LineNr"> 81 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[H&quot;</span>)
<span id="L82" class="LineNr"> 82 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L83" class="LineNr"> 83 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[2J&quot;</span>)
<span id="L84" class="LineNr"> 84 </span><span class="Constant">$clear-screen:end</span>:
<span id="L85" class="LineNr"> 85 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L86" class="LineNr"> 86 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L87" class="LineNr"> 87 </span> 5d/pop-to-ebp
<span id="L88" class="LineNr"> 88 </span> c3/return
<span id="L89" class="LineNr"> 89 </span>
<span id="L90" class="LineNr"> 90 </span><span class="subxComment"># row and col count from the top-left as (1, 1)</span>
<span id="L91" class="LineNr"> 91 </span><span class="subxFunction">move-cursor-on-screen</span>: <span class="subxComment"># row: int, column: int</span>
<span id="L92" class="LineNr"> 92 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L93" class="LineNr"> 93 </span> 55/push-ebp
<span id="L94" class="LineNr"> 94 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L95" class="LineNr"> 95 </span> <span class="subxS1Comment"># . save registers</span>
<span id="L96" class="LineNr"> 96 </span> 51/push-ecx
<span id="L97" class="LineNr"> 97 </span> <span class="subxComment"># var buf/ecx: (stream byte 32)</span>
<span id="L98" class="LineNr"> 98 </span> 81 5/subop/subtract %esp 0x20/imm32
<span id="L99" class="LineNr"> 99 </span> 68/push 0x20/imm32/size
<span id="L100" class="LineNr">100 </span> 68/push 0/imm32/read
<span id="L101" class="LineNr">101 </span> 68/push 0/imm32/write
<span id="L102" class="LineNr">102 </span> 89/&lt;- %ecx 4/r32/esp
<span id="L103" class="LineNr">103 </span> <span class="subxComment"># construct directive in buf</span>
<span id="L104" class="LineNr">104 </span> (<a href='057write.subx.html#L24'>write</a> %ecx <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L105" class="LineNr">105 </span> (<a href='057write.subx.html#L24'>write</a> %ecx <span class="Constant">&quot;[&quot;</span>)
<span id="L106" class="LineNr">106 </span> (<a href='075write-int-decimal.subx.html#L8'>write-int32-decimal</a> %ecx *(ebp+8))
<span id="L107" class="LineNr">107 </span> (<a href='057write.subx.html#L24'>write</a> %ecx <span class="Constant">&quot;;&quot;</span>)
<span id="L108" class="LineNr">108 </span> (<a href='075write-int-decimal.subx.html#L8'>write-int32-decimal</a> %ecx *(ebp+0xc))
<span id="L109" class="LineNr">109 </span> (<a href='057write.subx.html#L24'>write</a> %ecx <span class="Constant">&quot;H&quot;</span>)
<span id="L110" class="LineNr">110 </span> <span class="subxComment"># flush</span>
<span id="L111" class="LineNr">111 </span> (<a href='062write-stream.subx.html#L17'>write-stream</a> 2 %ecx)
<span id="L112" class="LineNr">112 </span><span class="Constant">$move-cursor-on-screen:end</span>:
<span id="L113" class="LineNr">113 </span> <span class="subxS1Comment"># . reclaim locals</span>
<span id="L114" class="LineNr">114 </span> 81 0/subop/add %esp 0x2c/imm32
<span id="L115" class="LineNr">115 </span> <span class="subxS1Comment"># . restore registers</span>
<span id="L116" class="LineNr">116 </span> 59/pop-to-ecx
<span id="L117" class="LineNr">117 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L118" class="LineNr">118 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L119" class="LineNr">119 </span> 5d/pop-to-ebp
<span id="L120" class="LineNr">120 </span> c3/return
<span id="L121" class="LineNr">121 </span>
<span id="L122" class="LineNr">122 </span><span class="subxFunction">print-string-to-screen</span>: <span class="subxComment"># s: (addr array byte)</span>
<span id="L123" class="LineNr">123 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L124" class="LineNr">124 </span> 55/push-ebp
<span id="L125" class="LineNr">125 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L126" class="LineNr">126 </span> <span class="subxComment">#</span>
<span id="L127" class="LineNr">127 </span> (<a href='057write.subx.html#L24'>write</a> 2 *(ebp+8))
<span id="L128" class="LineNr">128 </span><span class="Constant">$print-string-to-screen:end</span>:
<span id="L129" class="LineNr">129 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L130" class="LineNr">130 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L131" class="LineNr">131 </span> 5d/pop-to-ebp
<span id="L132" class="LineNr">132 </span> c3/return
<span id="L133" class="LineNr">133 </span>
<span id="L134" class="LineNr">134 </span><span class="subxComment"># just because Mu has no support for global variables yet</span>
<span id="L135" class="LineNr">135 </span><span class="subxFunction">print-byte-to-screen</span>: <span class="subxComment"># c: byte</span>
<span id="L136" class="LineNr">136 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L137" class="LineNr">137 </span> 55/push-ebp
<span id="L138" class="LineNr">138 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L139" class="LineNr">139 </span> <span class="subxS1Comment"># . save registers</span>
<span id="L140" class="LineNr">140 </span> 51/push-ecx
<span id="L141" class="LineNr">141 </span> <span class="subxComment"># var s/ecx: (addr array byte)</span>
<span id="L142" class="LineNr">142 </span> ff 6/subop/push *(ebp+8)
<span id="L143" class="LineNr">143 </span> 68/push 4/imm32/size
<span id="L144" class="LineNr">144 </span> 89/&lt;- %ecx 4/r32/esp
<span id="L145" class="LineNr">145 </span> (<a href='057write.subx.html#L24'>write</a> 2 %ecx)
<span id="L146" class="LineNr">146 </span><span class="Constant">$print-byte-to-screen:end</span>:
<span id="L147" class="LineNr">147 </span> <span class="subxS1Comment"># . reclaim locals</span>
<span id="L148" class="LineNr">148 </span> 81 0/subop/add %esp 8/imm32
<span id="L149" class="LineNr">149 </span> <span class="subxS1Comment"># . restore registers</span>
<span id="L150" class="LineNr">150 </span> 59/pop-to-ecx
<span id="L151" class="LineNr">151 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L152" class="LineNr">152 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L153" class="LineNr">153 </span> 5d/pop-to-ebp
<span id="L154" class="LineNr">154 </span> c3/return
<span id="L155" class="LineNr">155 </span>
<span id="L156" class="LineNr">156 </span><span class="subxComment"># just because Mu has no support for global variables yet</span>
<span id="L157" class="LineNr">157 </span><span class="subxFunction">print-int32-hex-to-screen</span>: <span class="subxComment"># n: int</span>
<span id="L158" class="LineNr">158 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L159" class="LineNr">159 </span> 55/push-ebp
<span id="L160" class="LineNr">160 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L161" class="LineNr">161 </span> <span class="subxComment">#</span>
<span id="L162" class="LineNr">162 </span> (<a href='066write-int-hex.subx.html#L266'>write-int32-hex-buffered</a> <span class="SpecialChar"><a href='064write-byte.subx.html#L10'>Stdout</a></span> *(ebp+8))
<span id="L163" class="LineNr">163 </span> (<a href='064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='064write-byte.subx.html#L10'>Stdout</a></span>)
<span id="L164" class="LineNr">164 </span><span class="Constant">$print-int32-hex-to-screen:end</span>:
<span id="L165" class="LineNr">165 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L166" class="LineNr">166 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L167" class="LineNr">167 </span> 5d/pop-to-ebp
<span id="L168" class="LineNr">168 </span> c3/return
<span id="L169" class="LineNr">169 </span>
<span id="L170" class="LineNr">170 </span><span class="subxFunction">reset-formatting-on-screen</span>:
<span id="L171" class="LineNr">171 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L172" class="LineNr">172 </span> 55/push-ebp
<span id="L173" class="LineNr">173 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L174" class="LineNr">174 </span> <span class="subxComment">#</span>
<span id="L175" class="LineNr">175 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L176" class="LineNr">176 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;(B&quot;</span>)
<span id="L177" class="LineNr">177 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L178" class="LineNr">178 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[m&quot;</span>)
<span id="L179" class="LineNr">179 </span><span class="Constant">$reset-formatting-on-screen:end</span>:
<span id="L180" class="LineNr">180 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L181" class="LineNr">181 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L182" class="LineNr">182 </span> 5d/pop-to-ebp
<span id="L183" class="LineNr">183 </span> c3/return
<span id="L184" class="LineNr">184 </span>
<span id="L185" class="LineNr">185 </span><span class="subxFunction">start-color-on-screen</span>: <span class="subxComment"># fg: int, bg: int</span>
<span id="L186" class="LineNr">186 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L187" class="LineNr">187 </span> 55/push-ebp
<span id="L188" class="LineNr">188 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L189" class="LineNr">189 </span> <span class="subxS1Comment"># . save registers</span>
<span id="L190" class="LineNr">190 </span> 51/push-ecx
<span id="L191" class="LineNr">191 </span> <span class="subxComment"># var buf/ecx: (stream byte 32)</span>
<span id="L192" class="LineNr">192 </span> 81 5/subop/subtract %esp 0x20/imm32
<span id="L193" class="LineNr">193 </span> 68/push 0x20/imm32/size
<span id="L194" class="LineNr">194 </span> 68/push 0/imm32/read
<span id="L195" class="LineNr">195 </span> 68/push 0/imm32/write
<span id="L196" class="LineNr">196 </span> 89/&lt;- %ecx 4/r32/esp
<span id="L197" class="LineNr">197 </span> <span class="subxComment"># construct directive in buf</span>
<span id="L198" class="LineNr">198 </span> <span class="subxS1Comment"># . set fg</span>
<span id="L199" class="LineNr">199 </span> (<a href='057write.subx.html#L24'>write</a> %ecx <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L200" class="LineNr">200 </span> (<a href='057write.subx.html#L24'>write</a> %ecx <span class="Constant">&quot;[38;5;&quot;</span>)
<span id="L201" class="LineNr">201 </span> (<a href='075write-int-decimal.subx.html#L8'>write-int32-decimal</a> %ecx *(ebp+8))
<span id="L202" class="LineNr">202 </span> (<a href='057write.subx.html#L24'>write</a> %ecx <span class="Constant">&quot;m&quot;</span>)
<span id="L203" class="LineNr">203 </span> <span class="subxS1Comment"># . set bg</span>
<span id="L204" class="LineNr">204 </span> (<a href='057write.subx.html#L24'>write</a> %ecx <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L205" class="LineNr">205 </span> (<a href='057write.subx.html#L24'>write</a> %ecx <span class="Constant">&quot;[48;5;&quot;</span>)
<span id="L206" class="LineNr">206 </span> (<a href='075write-int-decimal.subx.html#L8'>write-int32-decimal</a> %ecx *(ebp+0xc))
<span id="L207" class="LineNr">207 </span> (<a href='057write.subx.html#L24'>write</a> %ecx <span class="Constant">&quot;m&quot;</span>)
<span id="L208" class="LineNr">208 </span> <span class="subxComment"># flush</span>
<span id="L209" class="LineNr">209 </span> (<a href='062write-stream.subx.html#L17'>write-stream</a> 2 %ecx)
<span id="L210" class="LineNr">210 </span><span class="Constant">$start-color-on-screen:end</span>:
<span id="L211" class="LineNr">211 </span> <span class="subxS1Comment"># . reclaim locals</span>
<span id="L212" class="LineNr">212 </span> 81 0/subop/add %esp 0x2c/imm32
<span id="L213" class="LineNr">213 </span> <span class="subxS1Comment"># . restore registers</span>
<span id="L214" class="LineNr">214 </span> 59/pop-to-ecx
<span id="L215" class="LineNr">215 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L216" class="LineNr">216 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L217" class="LineNr">217 </span> 5d/pop-to-ebp
<span id="L218" class="LineNr">218 </span> c3/return
<span id="L219" class="LineNr">219 </span>
<span id="L220" class="LineNr">220 </span><span class="subxFunction">start-bold-on-screen</span>:
<span id="L221" class="LineNr">221 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L222" class="LineNr">222 </span> 55/push-ebp
<span id="L223" class="LineNr">223 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L224" class="LineNr">224 </span> <span class="subxComment">#</span>
<span id="L225" class="LineNr">225 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L226" class="LineNr">226 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[1m&quot;</span>)
<span id="L227" class="LineNr">227 </span><span class="Constant">$start-bold-on-screen:end</span>:
<span id="L228" class="LineNr">228 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L229" class="LineNr">229 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L230" class="LineNr">230 </span> 5d/pop-to-ebp
<span id="L231" class="LineNr">231 </span> c3/return
<span id="L232" class="LineNr">232 </span>
<span id="L233" class="LineNr">233 </span><span class="subxFunction">start-underline-on-screen</span>:
<span id="L234" class="LineNr">234 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L235" class="LineNr">235 </span> 55/push-ebp
<span id="L236" class="LineNr">236 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L237" class="LineNr">237 </span> <span class="subxComment">#</span>
<span id="L238" class="LineNr">238 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L239" class="LineNr">239 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[4m&quot;</span>)
<span id="L240" class="LineNr">240 </span><span class="Constant">$start-underline-on-screen:end</span>:
<span id="L241" class="LineNr">241 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L242" class="LineNr">242 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L243" class="LineNr">243 </span> 5d/pop-to-ebp
<span id="L244" class="LineNr">244 </span> c3/return
<span id="L245" class="LineNr">245 </span>
<span id="L246" class="LineNr">246 </span><span class="subxFunction">start-reverse-video-on-screen</span>:
<span id="L247" class="LineNr">247 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L248" class="LineNr">248 </span> 55/push-ebp
<span id="L249" class="LineNr">249 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L250" class="LineNr">250 </span> <span class="subxComment">#</span>
<span id="L251" class="LineNr">251 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L252" class="LineNr">252 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[7m&quot;</span>)
<span id="L253" class="LineNr">253 </span><span class="Constant">$start-reverse-video-on-screen:end</span>:
<span id="L254" class="LineNr">254 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L255" class="LineNr">255 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L256" class="LineNr">256 </span> 5d/pop-to-ebp
<span id="L257" class="LineNr">257 </span> c3/return
<span id="L258" class="LineNr">258 </span>
<span id="L259" class="LineNr">259 </span><span class="subxComment"># might require enabling blinking in your terminal program</span>
<span id="L260" class="LineNr">260 </span><span class="subxFunction">start-blinking-on-screen</span>:
<span id="L261" class="LineNr">261 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L262" class="LineNr">262 </span> 55/push-ebp
<span id="L263" class="LineNr">263 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L264" class="LineNr">264 </span> <span class="subxComment">#</span>
<span id="L265" class="LineNr">265 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L266" class="LineNr">266 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[5m&quot;</span>)
<span id="L267" class="LineNr">267 </span><span class="Constant">$start-blinking-on-screen:end</span>:
<span id="L268" class="LineNr">268 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L269" class="LineNr">269 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L270" class="LineNr">270 </span> 5d/pop-to-ebp
<span id="L271" class="LineNr">271 </span> c3/return
<span id="L272" class="LineNr">272 </span>
<span id="L273" class="LineNr">273 </span><span class="subxFunction">hide-cursor-on-screen</span>:
<span id="L274" class="LineNr">274 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L275" class="LineNr">275 </span> 55/push-ebp
<span id="L276" class="LineNr">276 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L277" class="LineNr">277 </span> <span class="subxComment">#</span>
<span id="L278" class="LineNr">278 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L279" class="LineNr">279 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[?25l&quot;</span>)
<span id="L280" class="LineNr">280 </span><span class="Constant">$hide-cursor-on-screen:end</span>:
<span id="L281" class="LineNr">281 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L282" class="LineNr">282 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L283" class="LineNr">283 </span> 5d/pop-to-ebp
<span id="L284" class="LineNr">284 </span> c3/return
<span id="L285" class="LineNr">285 </span>
<span id="L286" class="LineNr">286 </span><span class="subxFunction">show-cursor-on-screen</span>:
<span id="L287" class="LineNr">287 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L288" class="LineNr">288 </span> 55/push-ebp
<span id="L289" class="LineNr">289 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L290" class="LineNr">290 </span> <span class="subxComment">#</span>
<span id="L291" class="LineNr">291 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L292" class="LineNr">292 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[?12l&quot;</span>)
<span id="L293" class="LineNr">293 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='103screen.subx.html#L330'>Esc</a></span>)
<span id="L294" class="LineNr">294 </span> (<a href='057write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[?25h&quot;</span>)
<span id="L295" class="LineNr">295 </span><span class="Constant">$show-cursor-on-screen:end</span>:
<span id="L296" class="LineNr">296 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L297" class="LineNr">297 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L298" class="LineNr">298 </span> 5d/pop-to-ebp
<span id="L299" class="LineNr">299 </span> c3/return
<span id="L300" class="LineNr">300 </span>
<span id="L301" class="LineNr">301 </span><span class="subxComment"># This is a low-level detail; I don't think everything should be a file.</span>
<span id="L302" class="LineNr">302 </span><span class="subxComment">#</span>
<span id="L303" class="LineNr">303 </span><span class="subxComment"># Open &quot;/dev/tty&quot; if necessary and cache its file descriptor in Terminal-file-descriptor</span>
<span id="L304" class="LineNr">304 </span><span class="subxComment"># where later primitives can use it.</span>
<span id="L305" class="LineNr">305 </span><span class="subxMinorFunction">_maybe-open-terminal</span>:
<span id="L306" class="LineNr">306 </span> 81 7/subop/compare *<span class="SpecialChar"><a href='103screen.subx.html#L327'>Terminal-file-descriptor</a></span> -1/imm32
<span id="L307" class="LineNr">307 </span> 75/jump-if-!= $_maybe-open-terminal:epilogue/disp8
<span id="L308" class="LineNr">308 </span> <span class="subxS1Comment"># . save registers</span>
<span id="L309" class="LineNr">309 </span> 50/push-eax
<span id="L310" class="LineNr">310 </span> 51/push-ecx
<span id="L311" class="LineNr">311 </span> 53/push-ebx
<span id="L312" class="LineNr">312 </span> <span class="subxComment"># open(&quot;/dev/tty&quot;, O_RDWR)</span>
<span id="L313" class="LineNr">313 </span> bb/copy-to-ebx <span class="SpecialChar"><a href='103screen.subx.html#L336'>Terminal-filename</a></span>/imm32
<span id="L314" class="LineNr">314 </span> b9/copy-to-ecx 2/imm32/O_RDWR
<span id="L315" class="LineNr">315 </span> e8/call syscall_open/disp32
<span id="L316" class="LineNr">316 </span> 89/&lt;- *<span class="SpecialChar"><a href='103screen.subx.html#L327'>Terminal-file-descriptor</a></span> 0/r32/eax
<span id="L317" class="LineNr">317 </span><span class="Constant">$_maybe-open-terminal:end</span>:
<span id="L318" class="LineNr">318 </span> <span class="subxS1Comment"># . restore registers</span>
<span id="L319" class="LineNr">319 </span> 5b/pop-to-ebx
<span id="L320" class="LineNr">320 </span> 59/pop-to-ecx
<span id="L321" class="LineNr">321 </span> 58/pop-to-eax
<span id="L322" class="LineNr">322 </span><span class="Constant">$_maybe-open-terminal:epilogue</span>:
<span id="L323" class="LineNr">323 </span> c3/return
<span id="L324" class="LineNr">324 </span>
<span id="L325" class="LineNr">325 </span>== data
<span id="L326" class="LineNr">326 </span>
<span id="L327" class="LineNr">327 </span><span class="SpecialChar">Terminal-file-descriptor</span>: <span class="subxComment"># (addr int)</span>
<span id="L328" class="LineNr">328 </span> -1/imm32
<span id="L329" class="LineNr">329 </span>
<span id="L330" class="LineNr">330 </span><span class="SpecialChar">Esc</span>: <span class="subxComment"># (addr array byte)</span>
<span id="L331" class="LineNr">331 </span> <span class="subxComment"># size</span>
<span id="L332" class="LineNr">332 </span> 1/imm32
<span id="L333" class="LineNr">333 </span> <span class="subxComment"># data</span>
<span id="L334" class="LineNr">334 </span> 0x1b
<span id="L335" class="LineNr">335 </span>
<span id="L336" class="LineNr">336 </span><span class="SpecialChar">Terminal-filename</span>: <span class="subxComment"># (addr kernel-string)</span>
<span id="L337" class="LineNr">337 </span> <span class="subxComment"># &quot;/dev/null&quot;</span>
<span id="L338" class="LineNr">338 </span> 2f/slash 64/d 65/e 76/v 2f/slash 74/t 74/t 79/y 0/nul
</pre>
</body>
</html>
<!-- vim: set foldmethod=manual : -->

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 053new-segment.subx</title>
<title>Mu - 104new-segment.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -56,7 +56,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/053new-segment.subx'>https://github.com/akkartik/mu/blob/master/053new-segment.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/104new-segment.subx'>https://github.com/akkartik/mu/blob/master/104new-segment.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Create a new segment (pool of memory for allocating chunks from) in the form</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># of an *allocation descriptor* that can be passed to the memory allocator</span>
@ -86,7 +86,7 @@ if ('onhashchange' in window) {
<span id="L26" class="LineNr">26 </span> 51/push-ecx
<span id="L27" class="LineNr">27 </span> 68/push 0x1000/imm32
<span id="L28" class="LineNr">28 </span> <span class="subxS2Comment"># . . call</span>
<span id="L29" class="LineNr">29 </span> e8/call <a href='053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L29" class="LineNr">29 </span> e8/call <a href='104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L30" class="LineNr">30 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L31" class="LineNr">31 </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="L32" class="LineNr">32 </span> <span class="subxComment"># var eax: (addr _) = ad-&gt;curr</span>
@ -108,7 +108,7 @@ if ('onhashchange' in window) {
<span id="L48" class="LineNr">48 </span> 8b/copy 1/mod/*+disp8 5/rm32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 8/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ebp+8) to eax</span>
<span id="L49" class="LineNr">49 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax $_mmap-new-segment:len/disp32 <span class="subxComment"># copy eax to *$_mmap-new-segment:len</span>
<span id="L50" class="LineNr">50 </span> <span class="subxComment"># mmap(_mmap-new-segment)</span>
<span id="L51" class="LineNr">51 </span> bb/copy-to-ebx <a href='053new-segment.subx.html#L73'>_mmap-new-segment</a>/imm32
<span id="L51" class="LineNr">51 </span> bb/copy-to-ebx <a href='104new-segment.subx.html#L73'>_mmap-new-segment</a>/imm32
<span id="L52" class="LineNr">52 </span> e8/call syscall_mmap/disp32
<span id="L53" class="LineNr">53 </span> <span class="subxComment"># copy {eax, eax+len} to *ad</span>
<span id="L54" class="LineNr">54 </span> <span class="subxS1Comment"># . ebx = ad</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 054string-equal.subx</title>
<title>Mu - 105string-equal.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -58,7 +58,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/054string-equal.subx'>https://github.com/akkartik/mu/blob/master/054string-equal.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/105string-equal.subx'>https://github.com/akkartik/mu/blob/master/105string-equal.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Comparing 'regular' size-prefixed strings.</span>
<span id="L2" class="LineNr"> 2 </span>
@ -71,10 +71,10 @@ if ('onhashchange' in window) {
<span id="L9" class="LineNr"> 9 </span><span class="CommentedCode">#? e8/call test-compare-equal-strings/disp32</span>
<span id="L10" class="LineNr"> 10 </span> e8/call run-tests/disp32 <span class="subxComment"># 'run-tests' is a function created automatically by SubX. It calls all functions that start with 'test-'.</span>
<span id="L11" class="LineNr"> 11 </span> <span class="subxComment"># syscall(exit, Num-test-failures)</span>
<span id="L12" class="LineNr"> 12 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='051test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L12" class="LineNr"> 12 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='102test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L13" class="LineNr"> 13 </span> e8/call syscall_exit/disp32
<span id="L14" class="LineNr"> 14 </span>
<span id="L15" class="LineNr"> 15 </span><span class="subxFunction">string-equal?</span>: <span class="subxComment"># s: (addr array byte), benchmark: (addr array byte) -&gt; eax: boolean</span>
<span id="L15" class="LineNr"> 15 </span><span class="subxFunction">string-equal?</span>: <span class="subxComment"># s: (addr array byte), benchmark: (addr array byte) -&gt; result/eax: boolean</span>
<span id="L16" class="LineNr"> 16 </span> <span class="subxComment"># pseudocode:</span>
<span id="L17" class="LineNr"> 17 </span> <span class="subxComment"># if (s-&gt;size != benchmark-&gt;size) return false</span>
<span id="L18" class="LineNr"> 18 </span> <span class="subxComment"># return string-starts-with?(s, benchmark)</span>
@ -103,7 +103,7 @@ if ('onhashchange' in window) {
<span id="L41" class="LineNr"> 41 </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="L42" class="LineNr"> 42 </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="L43" class="LineNr"> 43 </span> <span class="subxS2Comment"># . . call</span>
<span id="L44" class="LineNr"> 44 </span> e8/call <a href='054string-equal.subx.html#L57'>string-starts-with?</a>/disp32
<span id="L44" class="LineNr"> 44 </span> e8/call <a href='105string-equal.subx.html#L57'>string-starts-with?</a>/disp32
<span id="L45" class="LineNr"> 45 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L46" class="LineNr"> 46 </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="L47" class="LineNr"> 47 </span><span class="Constant">$string-equal?:end</span>:
@ -116,7 +116,7 @@ if ('onhashchange' in window) {
<span id="L54" class="LineNr"> 54 </span> 5d/pop-to-ebp
<span id="L55" class="LineNr"> 55 </span> c3/return
<span id="L56" class="LineNr"> 56 </span>
<span id="L57" class="LineNr"> 57 </span><span class="subxFunction">string-starts-with?</span>: <span class="subxComment"># s: (addr array byte), benchmark: (addr array byte) -&gt; eax: boolean</span>
<span id="L57" class="LineNr"> 57 </span><span class="subxFunction">string-starts-with?</span>: <span class="subxComment"># s: (addr array byte), benchmark: (addr array byte) -&gt; result/eax: boolean</span>
<span id="L58" class="LineNr"> 58 </span> <span class="subxComment"># pseudocode:</span>
<span id="L59" class="LineNr"> 59 </span> <span class="subxComment"># if (s-&gt;size &lt; benchmark-&gt;size) return false</span>
<span id="L60" class="LineNr"> 60 </span> <span class="subxComment"># currs = s-&gt;data</span>
@ -204,7 +204,7 @@ if ('onhashchange' in window) {
<span id="L142" class="LineNr">142 </span> 68/push <span class="Constant">&quot;&quot;</span>/imm32
<span id="L143" class="LineNr">143 </span> 68/push <span class="Constant">&quot;&quot;</span>/imm32
<span id="L144" class="LineNr">144 </span> <span class="subxS2Comment"># . . call</span>
<span id="L145" class="LineNr">145 </span> e8/call <a href='054string-equal.subx.html#L15'>string-equal?</a>/disp32
<span id="L145" class="LineNr">145 </span> e8/call <a href='105string-equal.subx.html#L15'>string-equal?</a>/disp32
<span id="L146" class="LineNr">146 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L147" class="LineNr">147 </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="L148" class="LineNr">148 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -213,7 +213,7 @@ if ('onhashchange' in window) {
<span id="L151" class="LineNr">151 </span> 68/push 1/imm32/true
<span id="L152" class="LineNr">152 </span> 50/push-eax
<span id="L153" class="LineNr">153 </span> <span class="subxS2Comment"># . . call</span>
<span id="L154" class="LineNr">154 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L154" class="LineNr">154 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L155" class="LineNr">155 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L156" class="LineNr">156 </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="L157" class="LineNr">157 </span> c3/return
@ -224,7 +224,7 @@ if ('onhashchange' in window) {
<span id="L162" class="LineNr">162 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L163" class="LineNr">163 </span> 68/push <span class="Constant">&quot;&quot;</span>/imm32
<span id="L164" class="LineNr">164 </span> <span class="subxS2Comment"># . . call</span>
<span id="L165" class="LineNr">165 </span> e8/call <a href='054string-equal.subx.html#L15'>string-equal?</a>/disp32
<span id="L165" class="LineNr">165 </span> e8/call <a href='105string-equal.subx.html#L15'>string-equal?</a>/disp32
<span id="L166" class="LineNr">166 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L167" class="LineNr">167 </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="L168" class="LineNr">168 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -233,7 +233,7 @@ if ('onhashchange' in window) {
<span id="L171" class="LineNr">171 </span> 68/push 0/imm32/false
<span id="L172" class="LineNr">172 </span> 50/push-eax
<span id="L173" class="LineNr">173 </span> <span class="subxS2Comment"># . . call</span>
<span id="L174" class="LineNr">174 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L174" class="LineNr">174 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L175" class="LineNr">175 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L176" class="LineNr">176 </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="L177" class="LineNr">177 </span> c3/return
@ -244,7 +244,7 @@ if ('onhashchange' in window) {
<span id="L182" class="LineNr">182 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L183" class="LineNr">183 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L184" class="LineNr">184 </span> <span class="subxS2Comment"># . . call</span>
<span id="L185" class="LineNr">185 </span> e8/call <a href='054string-equal.subx.html#L15'>string-equal?</a>/disp32
<span id="L185" class="LineNr">185 </span> e8/call <a href='105string-equal.subx.html#L15'>string-equal?</a>/disp32
<span id="L186" class="LineNr">186 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L187" class="LineNr">187 </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="L188" class="LineNr">188 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -253,7 +253,7 @@ if ('onhashchange' in window) {
<span id="L191" class="LineNr">191 </span> 68/push 1/imm32/true
<span id="L192" class="LineNr">192 </span> 50/push-eax
<span id="L193" class="LineNr">193 </span> <span class="subxS2Comment"># . . call</span>
<span id="L194" class="LineNr">194 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L194" class="LineNr">194 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L195" class="LineNr">195 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L196" class="LineNr">196 </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="L197" class="LineNr">197 </span> c3/return
@ -264,7 +264,7 @@ if ('onhashchange' in window) {
<span id="L202" class="LineNr">202 </span> 68/push <span class="Constant">&quot;Adc&quot;</span>/imm32
<span id="L203" class="LineNr">203 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L204" class="LineNr">204 </span> <span class="subxS2Comment"># . . call</span>
<span id="L205" class="LineNr">205 </span> e8/call <a href='054string-equal.subx.html#L15'>string-equal?</a>/disp32
<span id="L205" class="LineNr">205 </span> e8/call <a href='105string-equal.subx.html#L15'>string-equal?</a>/disp32
<span id="L206" class="LineNr">206 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L207" class="LineNr">207 </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="L208" class="LineNr">208 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -273,7 +273,7 @@ if ('onhashchange' in window) {
<span id="L211" class="LineNr">211 </span> 68/push 0/imm32/false
<span id="L212" class="LineNr">212 </span> 50/push-eax
<span id="L213" class="LineNr">213 </span> <span class="subxS2Comment"># . . call</span>
<span id="L214" class="LineNr">214 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L214" class="LineNr">214 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L215" class="LineNr">215 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L216" class="LineNr">216 </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="L217" class="LineNr">217 </span> c3/return
@ -290,7 +290,7 @@ if ('onhashchange' in window) {
<span id="L228" class="LineNr">228 </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="L229" class="LineNr">229 </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="L230" class="LineNr">230 </span> <span class="subxS2Comment"># . . call</span>
<span id="L231" class="LineNr">231 </span> e8/call <a href='054string-equal.subx.html#L15'>string-equal?</a>/disp32
<span id="L231" class="LineNr">231 </span> e8/call <a href='105string-equal.subx.html#L15'>string-equal?</a>/disp32
<span id="L232" class="LineNr">232 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L233" class="LineNr">233 </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="L234" class="LineNr">234 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -299,7 +299,7 @@ if ('onhashchange' in window) {
<span id="L237" class="LineNr">237 </span> 68/push 1/imm32
<span id="L238" class="LineNr">238 </span> 50/push-eax
<span id="L239" class="LineNr">239 </span> <span class="subxS2Comment"># . . call</span>
<span id="L240" class="LineNr">240 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L240" class="LineNr">240 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L241" class="LineNr">241 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L242" class="LineNr">242 </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="L243" class="LineNr">243 </span><span class="Constant">$check-strings-equal:end</span>:
@ -317,7 +317,7 @@ if ('onhashchange' in window) {
<span id="L255" class="LineNr">255 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L256" class="LineNr">256 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L257" class="LineNr">257 </span> <span class="subxS2Comment"># . . call</span>
<span id="L258" class="LineNr">258 </span> e8/call <a href='054string-equal.subx.html#L220'>check-strings-equal</a>/disp32
<span id="L258" class="LineNr">258 </span> e8/call <a href='105string-equal.subx.html#L220'>check-strings-equal</a>/disp32
<span id="L259" class="LineNr">259 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L260" class="LineNr">260 </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="L261" class="LineNr">261 </span> c3/return

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 055stream.subx</title>
<title>Mu - 106stream.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -55,7 +55,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/055stream.subx'>https://github.com/akkartik/mu/blob/master/055stream.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/106stream.subx'>https://github.com/akkartik/mu/blob/master/106stream.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># streams: data structure for operating on arrays in a stateful manner</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment">#</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 056trace.subx</title>
<title>Mu - 107trace.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -59,7 +59,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/056trace.subx'>https://github.com/akkartik/mu/blob/master/056trace.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/107trace.subx'>https://github.com/akkartik/mu/blob/master/107trace.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># primitives for emitting traces to a 'trace' stream, and for tests to make assertions on its contents</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment">#</span>
@ -119,17 +119,17 @@ if ('onhashchange' in window) {
<span id="L56" class="LineNr"> 56 </span> 8b/copy 1/mod/*+disp8 5/rm32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 1/r32/ecx 8/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ebp+8) to ecx</span>
<span id="L57" class="LineNr"> 57 </span> <span class="subxComment"># Trace-segment = new-segment(n)</span>
<span id="L58" class="LineNr"> 58 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L59" class="LineNr"> 59 </span> 68/push <span class="SpecialChar"><a href='056trace.subx.html#L25'>Trace-segment</a></span>/imm32
<span id="L59" class="LineNr"> 59 </span> 68/push <span class="SpecialChar"><a href='107trace.subx.html#L25'>Trace-segment</a></span>/imm32
<span id="L60" class="LineNr"> 60 </span> 51/push-ecx
<span id="L61" class="LineNr"> 61 </span> <span class="subxS2Comment"># . . call</span>
<span id="L62" class="LineNr"> 62 </span> e8/call <a href='053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L62" class="LineNr"> 62 </span> e8/call <a href='104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L63" class="LineNr"> 63 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L64" class="LineNr"> 64 </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="L65" class="LineNr"> 65 </span> <span class="subxComment"># copy Trace-segment-&gt;curr to *Trace-stream</span>
<span id="L66" class="LineNr"> 66 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='056trace.subx.html#L25'>Trace-segment</a></span>/disp32 <span class="subxComment"># copy *Trace-segment to eax</span>
<span id="L66" class="LineNr"> 66 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='107trace.subx.html#L25'>Trace-segment</a></span>/disp32 <span class="subxComment"># copy *Trace-segment to eax</span>
<span id="L67" class="LineNr"> 67 </span><span class="CommentedCode">#? # watch point to catch Trace-stream leaks</span>
<span id="L68" class="LineNr"> 68 </span><span class="CommentedCode">#? $watch-1:</span>
<span id="L69" class="LineNr"> 69 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L69" class="LineNr"> 69 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L70" class="LineNr"> 70 </span> <span class="subxComment"># Trace-stream-&gt;size = n - 12</span>
<span id="L71" class="LineNr"> 71 </span> <span class="subxS1Comment"># . ecx -= 12</span>
<span id="L72" class="LineNr"> 72 </span> 81 5/subop/subtract 3/mod/direct 1/rm32/ecx <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"># subtract from ecx</span>
@ -158,7 +158,7 @@ if ('onhashchange' in window) {
<span id="L95" class="LineNr"> 95 </span> 56/push-esi
<span id="L96" class="LineNr"> 96 </span> 57/push-edi
<span id="L97" class="LineNr"> 97 </span> <span class="subxComment"># var edi: (addr stream byte) = *Trace-stream</span>
<span id="L98" class="LineNr"> 98 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 7/r32/edi <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy *Trace-stream to edi</span>
<span id="L98" class="LineNr"> 98 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 7/r32/edi <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy *Trace-stream to edi</span>
<span id="L99" class="LineNr"> 99 </span> <span class="subxComment"># esi = line</span>
<span id="L100" class="LineNr">100 </span> 8b/copy 1/mod/*+disp8 5/rm32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> 6/r32/esi 8/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ebp+8) to esi</span>
<span id="L101" class="LineNr">101 </span> <span class="subxComment"># var ecx: int = t-&gt;write</span>
@ -175,7 +175,7 @@ if ('onhashchange' in window) {
<span id="L112" class="LineNr">112 </span> 8d/copy-address 1/mod/*+disp8 4/rm32/sib 7/base/edi 1/index/ecx <span class="Normal"> . </span> 3/r32/ebx 0xc/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy edi+ecx+12 to ebx</span>
<span id="L113" class="LineNr">113 </span> 53/push-ebx
<span id="L114" class="LineNr">114 </span> <span class="subxS2Comment"># . . call</span>
<span id="L115" class="LineNr">115 </span> e8/call <a href='056trace.subx.html#L865'>_append-3</a>/disp32
<span id="L115" class="LineNr">115 </span> e8/call <a href='107trace.subx.html#L865'>_append-3</a>/disp32
<span id="L116" class="LineNr">116 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L117" class="LineNr">117 </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="L118" class="LineNr">118 </span> <span class="subxComment"># if (eax == 0) return</span>
@ -187,7 +187,7 @@ if ('onhashchange' in window) {
<span id="L124" class="LineNr">124 </span> 8b/copy 0/mod/indirect 7/rm32/edi <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"># copy *edi to ecx</span>
<span id="L125" class="LineNr">125 </span> <span class="subxComment"># eax = _append-3(&amp;t-&gt;data[t-&gt;write], &amp;t-&gt;data[t-&gt;size], line)</span>
<span id="L126" class="LineNr">126 </span> <span class="subxS2Comment"># . . push line</span>
<span id="L127" class="LineNr">127 </span> 68/push <span class="SpecialChar"><a href='051test.subx.html#L82'>Newline</a></span>/imm32
<span id="L127" class="LineNr">127 </span> 68/push <span class="SpecialChar"><a href='102test.subx.html#L82'>Newline</a></span>/imm32
<span id="L128" class="LineNr">128 </span> <span class="subxS2Comment"># . . push &amp;t-&gt;data[t-&gt;size]</span>
<span id="L129" class="LineNr">129 </span> 8d/copy-address 1/mod/*+disp8 4/rm32/sib 7/base/edi 2/index/edx <span class="Normal"> . </span> 3/r32/ebx 0xc/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy edi+edx+12 to ebx</span>
<span id="L130" class="LineNr">130 </span> 53/push-ebx
@ -195,7 +195,7 @@ if ('onhashchange' in window) {
<span id="L132" class="LineNr">132 </span> 8d/copy-address 1/mod/*+disp8 4/rm32/sib 7/base/edi 1/index/ecx <span class="Normal"> . </span> 3/r32/ebx 0xc/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy edi+ecx+12 to ebx</span>
<span id="L133" class="LineNr">133 </span> 53/push-ebx
<span id="L134" class="LineNr">134 </span> <span class="subxS2Comment"># . . call</span>
<span id="L135" class="LineNr">135 </span> e8/call <a href='056trace.subx.html#L865'>_append-3</a>/disp32
<span id="L135" class="LineNr">135 </span> e8/call <a href='107trace.subx.html#L865'>_append-3</a>/disp32
<span id="L136" class="LineNr">136 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L137" class="LineNr">137 </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="L138" class="LineNr">138 </span> <span class="subxComment"># t-&gt;write += eax</span>
@ -215,17 +215,17 @@ if ('onhashchange' in window) {
<span id="L152" class="LineNr">152 </span>
<span id="L153" class="LineNr">153 </span><span class="subxTest">test-trace-single</span>:
<span id="L154" class="LineNr">154 </span> <span class="subxComment"># push *Trace-stream</span>
<span id="L155" class="LineNr">155 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L155" class="LineNr">155 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L156" class="LineNr">156 </span> <span class="subxComment"># *Trace-stream = _test-trace-stream</span>
<span id="L157" class="LineNr">157 </span> b8/copy-to-eax <a href='056trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L158" class="LineNr">158 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L157" class="LineNr">157 </span> b8/copy-to-eax <a href='107trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L158" class="LineNr">158 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L159" class="LineNr">159 </span> <span class="subxComment"># clear-trace-stream()</span>
<span id="L160" class="LineNr">160 </span> e8/call <a href='056trace.subx.html#L845'>clear-trace-stream</a>/disp32
<span id="L160" class="LineNr">160 </span> e8/call <a href='107trace.subx.html#L845'>clear-trace-stream</a>/disp32
<span id="L161" class="LineNr">161 </span> <span class="subxComment"># trace(&quot;Ab&quot;)</span>
<span id="L162" class="LineNr">162 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L163" class="LineNr">163 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L164" class="LineNr">164 </span> <span class="subxS2Comment"># . . call</span>
<span id="L165" class="LineNr">165 </span> e8/call <a href='056trace.subx.html#L86'>trace</a>/disp32
<span id="L165" class="LineNr">165 </span> e8/call <a href='107trace.subx.html#L86'>trace</a>/disp32
<span id="L166" class="LineNr">166 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L167" class="LineNr">167 </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="L168" class="LineNr">168 </span> <span class="subxComment"># check-ints-equal(*_test-trace-stream-&gt;data, 41/A 62/b 0a/newline 00, msg)</span>
@ -233,37 +233,37 @@ if ('onhashchange' in window) {
<span id="L170" class="LineNr">170 </span> 68/push <span class="Constant">&quot;F - test-trace-single&quot;</span>/imm32
<span id="L171" class="LineNr">171 </span> 68/push 0x0a6241/imm32/Ab-newline
<span id="L172" class="LineNr">172 </span> <span class="subxS2Comment"># . . push *_test-trace-stream-&gt;data</span>
<span id="L173" class="LineNr">173 </span> b8/copy-to-eax <a href='056trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L173" class="LineNr">173 </span> b8/copy-to-eax <a href='107trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L174" class="LineNr">174 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+12)</span>
<span id="L175" class="LineNr">175 </span> <span class="subxS2Comment"># . . call</span>
<span id="L176" class="LineNr">176 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L176" class="LineNr">176 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L177" class="LineNr">177 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L178" class="LineNr">178 </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="L179" class="LineNr">179 </span> <span class="subxComment"># pop into *Trace-stream</span>
<span id="L180" class="LineNr">180 </span> 8f 0/subop/pop 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># pop into *Trace-stream</span>
<span id="L180" class="LineNr">180 </span> 8f 0/subop/pop 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># pop into *Trace-stream</span>
<span id="L181" class="LineNr">181 </span> <span class="subxComment"># end</span>
<span id="L182" class="LineNr">182 </span> c3/return
<span id="L183" class="LineNr">183 </span>
<span id="L184" class="LineNr">184 </span><span class="subxTest">test-trace-appends</span>:
<span id="L185" class="LineNr">185 </span> <span class="subxComment"># push *Trace-stream</span>
<span id="L186" class="LineNr">186 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L186" class="LineNr">186 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L187" class="LineNr">187 </span> <span class="subxComment"># *Trace-stream = _test-trace-stream</span>
<span id="L188" class="LineNr">188 </span> b8/copy-to-eax <a href='056trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L189" class="LineNr">189 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L188" class="LineNr">188 </span> b8/copy-to-eax <a href='107trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L189" class="LineNr">189 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L190" class="LineNr">190 </span> <span class="subxComment"># clear-trace-stream()</span>
<span id="L191" class="LineNr">191 </span> e8/call <a href='056trace.subx.html#L845'>clear-trace-stream</a>/disp32
<span id="L191" class="LineNr">191 </span> e8/call <a href='107trace.subx.html#L845'>clear-trace-stream</a>/disp32
<span id="L192" class="LineNr">192 </span> <span class="subxComment"># trace(&quot;C&quot;)</span>
<span id="L193" class="LineNr">193 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L194" class="LineNr">194 </span> 68/push <span class="Constant">&quot;C&quot;</span>/imm32
<span id="L195" class="LineNr">195 </span> <span class="subxS2Comment"># . . call</span>
<span id="L196" class="LineNr">196 </span> e8/call <a href='056trace.subx.html#L86'>trace</a>/disp32
<span id="L196" class="LineNr">196 </span> e8/call <a href='107trace.subx.html#L86'>trace</a>/disp32
<span id="L197" class="LineNr">197 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L198" class="LineNr">198 </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="L199" class="LineNr">199 </span> <span class="subxComment"># trace(&quot;D&quot;)</span>
<span id="L200" class="LineNr">200 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L201" class="LineNr">201 </span> 68/push <span class="Constant">&quot;D&quot;</span>/imm32
<span id="L202" class="LineNr">202 </span> <span class="subxS2Comment"># . . call</span>
<span id="L203" class="LineNr">203 </span> e8/call <a href='056trace.subx.html#L86'>trace</a>/disp32
<span id="L203" class="LineNr">203 </span> e8/call <a href='107trace.subx.html#L86'>trace</a>/disp32
<span id="L204" class="LineNr">204 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L205" class="LineNr">205 </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="L206" class="LineNr">206 </span> <span class="subxComment"># check-ints-equal(*_test-trace-stream-&gt;data, 43/C 0a/newline 44/D 0a/newline, msg)</span>
@ -271,30 +271,30 @@ if ('onhashchange' in window) {
<span id="L208" class="LineNr">208 </span> 68/push <span class="Constant">&quot;F - test-trace-appends&quot;</span>/imm32
<span id="L209" class="LineNr">209 </span> 68/push 0x0a440a43/imm32/C-newline-D-newline
<span id="L210" class="LineNr">210 </span> <span class="subxS2Comment"># . . push *_test-trace-stream-&gt;data</span>
<span id="L211" class="LineNr">211 </span> b8/copy-to-eax <a href='056trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L211" class="LineNr">211 </span> b8/copy-to-eax <a href='107trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L212" class="LineNr">212 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+12)</span>
<span id="L213" class="LineNr">213 </span> <span class="subxS2Comment"># . . call</span>
<span id="L214" class="LineNr">214 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L214" class="LineNr">214 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L215" class="LineNr">215 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L216" class="LineNr">216 </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="L217" class="LineNr">217 </span> <span class="subxComment"># pop into *Trace-stream</span>
<span id="L218" class="LineNr">218 </span> 8f 0/subop/pop 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># pop into *Trace-stream</span>
<span id="L218" class="LineNr">218 </span> 8f 0/subop/pop 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># pop into *Trace-stream</span>
<span id="L219" class="LineNr">219 </span> <span class="subxComment"># end</span>
<span id="L220" class="LineNr">220 </span> c3/return
<span id="L221" class="LineNr">221 </span>
<span id="L222" class="LineNr">222 </span><span class="subxTest">test-trace-empty-line</span>:
<span id="L223" class="LineNr">223 </span> <span class="subxComment"># push *Trace-stream</span>
<span id="L224" class="LineNr">224 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L224" class="LineNr">224 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L225" class="LineNr">225 </span> <span class="subxComment"># *Trace-stream = _test-trace-stream</span>
<span id="L226" class="LineNr">226 </span> b8/copy-to-eax <a href='056trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L227" class="LineNr">227 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L226" class="LineNr">226 </span> b8/copy-to-eax <a href='107trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L227" class="LineNr">227 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L228" class="LineNr">228 </span> <span class="subxComment"># clear-trace-stream()</span>
<span id="L229" class="LineNr">229 </span> e8/call <a href='056trace.subx.html#L845'>clear-trace-stream</a>/disp32
<span id="L229" class="LineNr">229 </span> e8/call <a href='107trace.subx.html#L845'>clear-trace-stream</a>/disp32
<span id="L230" class="LineNr">230 </span> <span class="subxComment"># trace(&quot;&quot;)</span>
<span id="L231" class="LineNr">231 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L232" class="LineNr">232 </span> 68/push <span class="Constant">&quot;&quot;</span>/imm32
<span id="L233" class="LineNr">233 </span> <span class="subxS2Comment"># . . call</span>
<span id="L234" class="LineNr">234 </span> e8/call <a href='056trace.subx.html#L86'>trace</a>/disp32
<span id="L234" class="LineNr">234 </span> e8/call <a href='107trace.subx.html#L86'>trace</a>/disp32
<span id="L235" class="LineNr">235 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L236" class="LineNr">236 </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="L237" class="LineNr">237 </span> <span class="subxComment"># check-ints-equal(*_test-trace-stream-&gt;data, 0, msg)</span>
@ -302,14 +302,14 @@ if ('onhashchange' in window) {
<span id="L239" class="LineNr">239 </span> 68/push <span class="Constant">&quot;F - test-trace-empty-line&quot;</span>/imm32
<span id="L240" class="LineNr">240 </span> 68/push 0/imm32
<span id="L241" class="LineNr">241 </span> <span class="subxS2Comment"># . . push *_test-trace-stream-&gt;data</span>
<span id="L242" class="LineNr">242 </span> b8/copy-to-eax <a href='056trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L242" class="LineNr">242 </span> b8/copy-to-eax <a href='107trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L243" class="LineNr">243 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+12)</span>
<span id="L244" class="LineNr">244 </span> <span class="subxS2Comment"># . . call</span>
<span id="L245" class="LineNr">245 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L245" class="LineNr">245 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L246" class="LineNr">246 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L247" class="LineNr">247 </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="L248" class="LineNr">248 </span> <span class="subxComment"># pop into *Trace-stream</span>
<span id="L249" class="LineNr">249 </span> 8f 0/subop/pop 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># pop into *Trace-stream</span>
<span id="L249" class="LineNr">249 </span> 8f 0/subop/pop 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># pop into *Trace-stream</span>
<span id="L250" class="LineNr">250 </span> <span class="subxComment"># end</span>
<span id="L251" class="LineNr">251 </span> c3/return
<span id="L252" class="LineNr">252 </span>
@ -319,9 +319,9 @@ if ('onhashchange' in window) {
<span id="L256" class="LineNr">256 </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="L257" class="LineNr">257 </span> <span class="subxComment"># rewind-stream(*Trace-stream)</span>
<span id="L258" class="LineNr">258 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L259" class="LineNr">259 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L259" class="LineNr">259 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L260" class="LineNr">260 </span> <span class="subxS2Comment"># . . call</span>
<span id="L261" class="LineNr">261 </span> e8/call <a href='055stream.subx.html#L56'>rewind-stream</a>/disp32
<span id="L261" class="LineNr">261 </span> e8/call <a href='106stream.subx.html#L56'>rewind-stream</a>/disp32
<span id="L262" class="LineNr">262 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L263" class="LineNr">263 </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="L264" class="LineNr">264 </span> <span class="subxComment"># check-trace-scans-to(line, msg)</span>
@ -329,7 +329,7 @@ if ('onhashchange' in window) {
<span id="L266" class="LineNr">266 </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="L267" class="LineNr">267 </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="L268" class="LineNr">268 </span> <span class="subxS2Comment"># . . call</span>
<span id="L269" class="LineNr">269 </span> e8/call <a href='056trace.subx.html#L278'>check-trace-scans-to</a>/disp32
<span id="L269" class="LineNr">269 </span> e8/call <a href='107trace.subx.html#L278'>check-trace-scans-to</a>/disp32
<span id="L270" class="LineNr">270 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L271" class="LineNr">271 </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="L272" class="LineNr">272 </span><span class="Constant">$check-trace-contains:end</span>:
@ -348,7 +348,7 @@ if ('onhashchange' in window) {
<span id="L285" class="LineNr">285 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L286" class="LineNr">286 </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="L287" class="LineNr">287 </span> <span class="subxS2Comment"># . . call</span>
<span id="L288" class="LineNr">288 </span> e8/call <a href='056trace.subx.html#L309'>trace-scan</a>/disp32
<span id="L288" class="LineNr">288 </span> e8/call <a href='107trace.subx.html#L309'>trace-scan</a>/disp32
<span id="L289" class="LineNr">289 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L290" class="LineNr">290 </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="L291" class="LineNr">291 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -357,7 +357,7 @@ if ('onhashchange' in window) {
<span id="L294" class="LineNr">294 </span> 68/push 1/imm32
<span id="L295" class="LineNr">295 </span> 50/push-eax
<span id="L296" class="LineNr">296 </span> <span class="subxS2Comment"># . . call</span>
<span id="L297" class="LineNr">297 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L297" class="LineNr">297 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L298" class="LineNr">298 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L299" class="LineNr">299 </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="L300" class="LineNr">300 </span><span class="Constant">$check-trace-scans-to:end</span>:
@ -390,7 +390,7 @@ if ('onhashchange' in window) {
<span id="L327" class="LineNr">327 </span> 51/push-ecx
<span id="L328" class="LineNr">328 </span> 56/push-esi
<span id="L329" class="LineNr">329 </span> <span class="subxComment"># esi = *Trace-stream</span>
<span id="L330" class="LineNr">330 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 6/r32/esi <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy *Trace-stream to esi</span>
<span id="L330" class="LineNr">330 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 6/r32/esi <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy *Trace-stream to esi</span>
<span id="L331" class="LineNr">331 </span> <span class="subxComment"># ecx = Trace-stream-&gt;write</span>
<span id="L332" class="LineNr">332 </span> 8b/copy 0/mod/indirect 6/rm32/esi <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 1/r32/ecx <span class="Normal"> . </span> <span class="subxComment"># copy *esi to ecx</span>
<span id="L333" class="LineNr">333 </span> <span class="subxComment"># push Trace-stream-&gt;read</span>
@ -404,7 +404,7 @@ if ('onhashchange' in window) {
<span id="L341" class="LineNr">341 </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="L342" class="LineNr">342 </span> 56/push-esi
<span id="L343" class="LineNr">343 </span> <span class="subxS2Comment"># . . call</span>
<span id="L344" class="LineNr">344 </span> e8/call <a href='056trace.subx.html#L561'>next-line-matches?</a>/disp32
<span id="L344" class="LineNr">344 </span> e8/call <a href='107trace.subx.html#L561'>next-line-matches?</a>/disp32
<span id="L345" class="LineNr">345 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L346" class="LineNr">346 </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="L347" class="LineNr">347 </span> <span class="subxComment"># if (eax == false) continue</span>
@ -415,7 +415,7 @@ if ('onhashchange' in window) {
<span id="L352" class="LineNr">352 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L353" class="LineNr">353 </span> 56/push-esi
<span id="L354" class="LineNr">354 </span> <span class="subxS2Comment"># . . call</span>
<span id="L355" class="LineNr">355 </span> e8/call <a href='056trace.subx.html#L737'>skip-next-line</a>/disp32
<span id="L355" class="LineNr">355 </span> e8/call <a href='107trace.subx.html#L737'>skip-next-line</a>/disp32
<span id="L356" class="LineNr">356 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L357" class="LineNr">357 </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="L358" class="LineNr">358 </span> <span class="subxComment"># dump saved copy of Trace-stream-&gt;read</span>
@ -428,7 +428,7 @@ if ('onhashchange' in window) {
<span id="L365" class="LineNr">365 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L366" class="LineNr">366 </span> 56/push-esi
<span id="L367" class="LineNr">367 </span> <span class="subxS2Comment"># . . call</span>
<span id="L368" class="LineNr">368 </span> e8/call <a href='056trace.subx.html#L737'>skip-next-line</a>/disp32
<span id="L368" class="LineNr">368 </span> e8/call <a href='107trace.subx.html#L737'>skip-next-line</a>/disp32
<span id="L369" class="LineNr">369 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L370" class="LineNr">370 </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="L371" class="LineNr">371 </span> eb/jump $trace-scan:<span class="Constant">loop</span>/disp8
@ -447,25 +447,25 @@ if ('onhashchange' in window) {
<span id="L384" class="LineNr">384 </span>
<span id="L385" class="LineNr">385 </span><span class="subxTest">test-trace-scan-first</span>:
<span id="L386" class="LineNr">386 </span> <span class="subxComment"># push *Trace-stream</span>
<span id="L387" class="LineNr">387 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L387" class="LineNr">387 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L388" class="LineNr">388 </span> <span class="subxComment"># setup</span>
<span id="L389" class="LineNr">389 </span> <span class="subxS1Comment"># . *Trace-stream = _test-trace-stream</span>
<span id="L390" class="LineNr">390 </span> b8/copy-to-eax <a href='056trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L391" class="LineNr">391 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L390" class="LineNr">390 </span> b8/copy-to-eax <a href='107trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L391" class="LineNr">391 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L392" class="LineNr">392 </span> <span class="subxS1Comment"># . clear-trace-stream()</span>
<span id="L393" class="LineNr">393 </span> e8/call <a href='056trace.subx.html#L845'>clear-trace-stream</a>/disp32
<span id="L393" class="LineNr">393 </span> e8/call <a href='107trace.subx.html#L845'>clear-trace-stream</a>/disp32
<span id="L394" class="LineNr">394 </span> <span class="subxS1Comment"># . trace(&quot;Ab&quot;)</span>
<span id="L395" class="LineNr">395 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L396" class="LineNr">396 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L397" class="LineNr">397 </span> <span class="subxS2Comment"># . . call</span>
<span id="L398" class="LineNr">398 </span> e8/call <a href='056trace.subx.html#L86'>trace</a>/disp32
<span id="L398" class="LineNr">398 </span> e8/call <a href='107trace.subx.html#L86'>trace</a>/disp32
<span id="L399" class="LineNr">399 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L400" class="LineNr">400 </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="L401" class="LineNr">401 </span> <span class="subxComment"># eax = trace-scan(&quot;Ab&quot;)</span>
<span id="L402" class="LineNr">402 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L403" class="LineNr">403 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L404" class="LineNr">404 </span> <span class="subxS2Comment"># . . call</span>
<span id="L405" class="LineNr">405 </span> e8/call <a href='056trace.subx.html#L309'>trace-scan</a>/disp32
<span id="L405" class="LineNr">405 </span> e8/call <a href='107trace.subx.html#L309'>trace-scan</a>/disp32
<span id="L406" class="LineNr">406 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L407" class="LineNr">407 </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="L408" class="LineNr">408 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -474,42 +474,42 @@ if ('onhashchange' in window) {
<span id="L411" class="LineNr">411 </span> 68/push 1/imm32
<span id="L412" class="LineNr">412 </span> 50/push-eax
<span id="L413" class="LineNr">413 </span> <span class="subxS2Comment"># . . call</span>
<span id="L414" class="LineNr">414 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L414" class="LineNr">414 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L415" class="LineNr">415 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L416" class="LineNr">416 </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="L417" class="LineNr">417 </span> <span class="subxComment"># pop into *Trace-stream</span>
<span id="L418" class="LineNr">418 </span> 8f 0/subop/pop 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># pop into *Trace-stream</span>
<span id="L418" class="LineNr">418 </span> 8f 0/subop/pop 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># pop into *Trace-stream</span>
<span id="L419" class="LineNr">419 </span> <span class="subxS1Comment"># . end</span>
<span id="L420" class="LineNr">420 </span> c3/return
<span id="L421" class="LineNr">421 </span>
<span id="L422" class="LineNr">422 </span><span class="subxTest">test-trace-scan-skips-lines-until-found</span>:
<span id="L423" class="LineNr">423 </span> <span class="subxComment"># push *Trace-stream</span>
<span id="L424" class="LineNr">424 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L424" class="LineNr">424 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L425" class="LineNr">425 </span> <span class="subxComment"># setup</span>
<span id="L426" class="LineNr">426 </span> <span class="subxS1Comment"># . *Trace-stream = _test-trace-stream</span>
<span id="L427" class="LineNr">427 </span> b8/copy-to-eax <a href='056trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L428" class="LineNr">428 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L427" class="LineNr">427 </span> b8/copy-to-eax <a href='107trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L428" class="LineNr">428 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L429" class="LineNr">429 </span> <span class="subxS1Comment"># . clear-trace-stream()</span>
<span id="L430" class="LineNr">430 </span> e8/call <a href='056trace.subx.html#L845'>clear-trace-stream</a>/disp32
<span id="L430" class="LineNr">430 </span> e8/call <a href='107trace.subx.html#L845'>clear-trace-stream</a>/disp32
<span id="L431" class="LineNr">431 </span> <span class="subxS1Comment"># . trace(&quot;Ab&quot;)</span>
<span id="L432" class="LineNr">432 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L433" class="LineNr">433 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L434" class="LineNr">434 </span> <span class="subxS2Comment"># . . call</span>
<span id="L435" class="LineNr">435 </span> e8/call <a href='056trace.subx.html#L86'>trace</a>/disp32
<span id="L435" class="LineNr">435 </span> e8/call <a href='107trace.subx.html#L86'>trace</a>/disp32
<span id="L436" class="LineNr">436 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L437" class="LineNr">437 </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="L438" class="LineNr">438 </span> <span class="subxS1Comment"># . trace(&quot;cd&quot;)</span>
<span id="L439" class="LineNr">439 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L440" class="LineNr">440 </span> 68/push <span class="Constant">&quot;cd&quot;</span>/imm32
<span id="L441" class="LineNr">441 </span> <span class="subxS2Comment"># . . call</span>
<span id="L442" class="LineNr">442 </span> e8/call <a href='056trace.subx.html#L86'>trace</a>/disp32
<span id="L442" class="LineNr">442 </span> e8/call <a href='107trace.subx.html#L86'>trace</a>/disp32
<span id="L443" class="LineNr">443 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L444" class="LineNr">444 </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="L445" class="LineNr">445 </span> <span class="subxComment"># eax = trace-scan(&quot;cd&quot;)</span>
<span id="L446" class="LineNr">446 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L447" class="LineNr">447 </span> 68/push <span class="Constant">&quot;cd&quot;</span>/imm32
<span id="L448" class="LineNr">448 </span> <span class="subxS2Comment"># . . call</span>
<span id="L449" class="LineNr">449 </span> e8/call <a href='056trace.subx.html#L309'>trace-scan</a>/disp32
<span id="L449" class="LineNr">449 </span> e8/call <a href='107trace.subx.html#L309'>trace-scan</a>/disp32
<span id="L450" class="LineNr">450 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L451" class="LineNr">451 </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="L452" class="LineNr">452 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -518,35 +518,35 @@ if ('onhashchange' in window) {
<span id="L455" class="LineNr">455 </span> 68/push 1/imm32
<span id="L456" class="LineNr">456 </span> 50/push-eax
<span id="L457" class="LineNr">457 </span> <span class="subxS2Comment"># . . call</span>
<span id="L458" class="LineNr">458 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L458" class="LineNr">458 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L459" class="LineNr">459 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L460" class="LineNr">460 </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="L461" class="LineNr">461 </span> <span class="subxComment"># pop into *Trace-stream</span>
<span id="L462" class="LineNr">462 </span> 8f 0/subop/pop 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># pop into *Trace-stream</span>
<span id="L462" class="LineNr">462 </span> 8f 0/subop/pop 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># pop into *Trace-stream</span>
<span id="L463" class="LineNr">463 </span> <span class="subxS1Comment"># . end</span>
<span id="L464" class="LineNr">464 </span> c3/return
<span id="L465" class="LineNr">465 </span>
<span id="L466" class="LineNr">466 </span><span class="subxTest">test-trace-second-scan-starts-where-first-left-off</span>:
<span id="L467" class="LineNr">467 </span> <span class="subxComment"># push *Trace-stream</span>
<span id="L468" class="LineNr">468 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L468" class="LineNr">468 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L469" class="LineNr">469 </span> <span class="subxComment"># setup</span>
<span id="L470" class="LineNr">470 </span> <span class="subxS1Comment"># . *Trace-stream = _test-trace-stream</span>
<span id="L471" class="LineNr">471 </span> b8/copy-to-eax <a href='056trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L472" class="LineNr">472 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L471" class="LineNr">471 </span> b8/copy-to-eax <a href='107trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L472" class="LineNr">472 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L473" class="LineNr">473 </span> <span class="subxS1Comment"># . clear-trace-stream()</span>
<span id="L474" class="LineNr">474 </span> e8/call <a href='056trace.subx.html#L845'>clear-trace-stream</a>/disp32
<span id="L474" class="LineNr">474 </span> e8/call <a href='107trace.subx.html#L845'>clear-trace-stream</a>/disp32
<span id="L475" class="LineNr">475 </span> <span class="subxS1Comment"># . trace(&quot;Ab&quot;)</span>
<span id="L476" class="LineNr">476 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L477" class="LineNr">477 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L478" class="LineNr">478 </span> <span class="subxS2Comment"># . . call</span>
<span id="L479" class="LineNr">479 </span> e8/call <a href='056trace.subx.html#L86'>trace</a>/disp32
<span id="L479" class="LineNr">479 </span> e8/call <a href='107trace.subx.html#L86'>trace</a>/disp32
<span id="L480" class="LineNr">480 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L481" class="LineNr">481 </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="L482" class="LineNr">482 </span> <span class="subxS1Comment"># . eax = trace-scan(&quot;Ab&quot;)</span>
<span id="L483" class="LineNr">483 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L484" class="LineNr">484 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L485" class="LineNr">485 </span> <span class="subxS2Comment"># . . call</span>
<span id="L486" class="LineNr">486 </span> e8/call <a href='056trace.subx.html#L309'>trace-scan</a>/disp32
<span id="L486" class="LineNr">486 </span> e8/call <a href='107trace.subx.html#L309'>trace-scan</a>/disp32
<span id="L487" class="LineNr">487 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L488" class="LineNr">488 </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="L489" class="LineNr">489 </span> <span class="subxComment"># second scan fails</span>
@ -554,7 +554,7 @@ if ('onhashchange' in window) {
<span id="L491" class="LineNr">491 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L492" class="LineNr">492 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L493" class="LineNr">493 </span> <span class="subxS2Comment"># . . call</span>
<span id="L494" class="LineNr">494 </span> e8/call <a href='056trace.subx.html#L309'>trace-scan</a>/disp32
<span id="L494" class="LineNr">494 </span> e8/call <a href='107trace.subx.html#L309'>trace-scan</a>/disp32
<span id="L495" class="LineNr">495 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L496" class="LineNr">496 </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="L497" class="LineNr">497 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -563,38 +563,38 @@ if ('onhashchange' in window) {
<span id="L500" class="LineNr">500 </span> 68/push 0/imm32
<span id="L501" class="LineNr">501 </span> 50/push-eax
<span id="L502" class="LineNr">502 </span> <span class="subxS2Comment"># . . call</span>
<span id="L503" class="LineNr">503 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L503" class="LineNr">503 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L504" class="LineNr">504 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L505" class="LineNr">505 </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="L506" class="LineNr">506 </span> <span class="subxComment"># pop into *Trace-stream</span>
<span id="L507" class="LineNr">507 </span> 8f 0/subop/pop 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># pop into *Trace-stream</span>
<span id="L507" class="LineNr">507 </span> 8f 0/subop/pop 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># pop into *Trace-stream</span>
<span id="L508" class="LineNr">508 </span> <span class="subxS1Comment"># . end</span>
<span id="L509" class="LineNr">509 </span> c3/return
<span id="L510" class="LineNr">510 </span>
<span id="L511" class="LineNr">511 </span><span class="subxTest">test-trace-scan-failure-leaves-read-index-untouched</span>:
<span id="L512" class="LineNr">512 </span> <span class="subxComment"># push *Trace-stream</span>
<span id="L513" class="LineNr">513 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L513" class="LineNr">513 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L514" class="LineNr">514 </span> <span class="subxComment"># setup</span>
<span id="L515" class="LineNr">515 </span> <span class="subxS1Comment"># . *Trace-stream = _test-trace-stream</span>
<span id="L516" class="LineNr">516 </span> b8/copy-to-eax <a href='056trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L517" class="LineNr">517 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L516" class="LineNr">516 </span> b8/copy-to-eax <a href='107trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L517" class="LineNr">517 </span> 89/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># copy eax to *Trace-stream</span>
<span id="L518" class="LineNr">518 </span> <span class="subxS1Comment"># . clear-trace-stream()</span>
<span id="L519" class="LineNr">519 </span> e8/call <a href='056trace.subx.html#L845'>clear-trace-stream</a>/disp32
<span id="L519" class="LineNr">519 </span> e8/call <a href='107trace.subx.html#L845'>clear-trace-stream</a>/disp32
<span id="L520" class="LineNr">520 </span> <span class="subxS1Comment"># . trace(&quot;Ab&quot;)</span>
<span id="L521" class="LineNr">521 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L522" class="LineNr">522 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L523" class="LineNr">523 </span> <span class="subxS2Comment"># . . call</span>
<span id="L524" class="LineNr">524 </span> e8/call <a href='056trace.subx.html#L86'>trace</a>/disp32
<span id="L524" class="LineNr">524 </span> e8/call <a href='107trace.subx.html#L86'>trace</a>/disp32
<span id="L525" class="LineNr">525 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L526" class="LineNr">526 </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="L527" class="LineNr">527 </span> <span class="subxS1Comment"># . check-ints-equal(_test-trace-stream-&gt;read, 0, msg)</span>
<span id="L528" class="LineNr">528 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L529" class="LineNr">529 </span> 68/push <span class="Constant">&quot;F - <a href='056trace.subx.html#L466'>test-trace-second-scan-starts-where-first-left-off</a>/precondition-failure&quot;</span>/imm32
<span id="L529" class="LineNr">529 </span> 68/push <span class="Constant">&quot;F - <a href='107trace.subx.html#L466'>test-trace-second-scan-starts-where-first-left-off</a>/precondition-failure&quot;</span>/imm32
<span id="L530" class="LineNr">530 </span> 68/push 0/imm32
<span id="L531" class="LineNr">531 </span> b8/copy-to-eax <a href='056trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L531" class="LineNr">531 </span> b8/copy-to-eax <a href='107trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L532" class="LineNr">532 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+4)</span>
<span id="L533" class="LineNr">533 </span> <span class="subxS2Comment"># . . call</span>
<span id="L534" class="LineNr">534 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L534" class="LineNr">534 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L535" class="LineNr">535 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L536" class="LineNr">536 </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="L537" class="LineNr">537 </span> <span class="subxComment"># perform a failing scan</span>
@ -602,7 +602,7 @@ if ('onhashchange' in window) {
<span id="L539" class="LineNr">539 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L540" class="LineNr">540 </span> 68/push <span class="Constant">&quot;Ax&quot;</span>/imm32
<span id="L541" class="LineNr">541 </span> <span class="subxS2Comment"># . . call</span>
<span id="L542" class="LineNr">542 </span> e8/call <a href='056trace.subx.html#L309'>trace-scan</a>/disp32
<span id="L542" class="LineNr">542 </span> e8/call <a href='107trace.subx.html#L309'>trace-scan</a>/disp32
<span id="L543" class="LineNr">543 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L544" class="LineNr">544 </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="L545" class="LineNr">545 </span> <span class="subxComment"># no change in read index</span>
@ -610,14 +610,14 @@ if ('onhashchange' in window) {
<span id="L547" class="LineNr">547 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L548" class="LineNr">548 </span> 68/push <span class="Constant">&quot;F - test-trace-second-scan-starts-where-first-left-off&quot;</span>/imm32
<span id="L549" class="LineNr">549 </span> 68/push 0/imm32
<span id="L550" class="LineNr">550 </span> b8/copy-to-eax <a href='056trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L550" class="LineNr">550 </span> b8/copy-to-eax <a href='107trace.subx.html#L31'>_test-trace-stream</a>/imm32
<span id="L551" class="LineNr">551 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+4)</span>
<span id="L552" class="LineNr">552 </span> <span class="subxS2Comment"># . . call</span>
<span id="L553" class="LineNr">553 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L553" class="LineNr">553 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L554" class="LineNr">554 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L555" class="LineNr">555 </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="L556" class="LineNr">556 </span> <span class="subxComment"># pop into *Trace-stream</span>
<span id="L557" class="LineNr">557 </span> 8f 0/subop/pop 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># pop into *Trace-stream</span>
<span id="L557" class="LineNr">557 </span> 8f 0/subop/pop 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># pop into *Trace-stream</span>
<span id="L558" class="LineNr">558 </span> <span class="subxS1Comment"># . end</span>
<span id="L559" class="LineNr">559 </span> c3/return
<span id="L560" class="LineNr">560 </span>
@ -717,9 +717,9 @@ if ('onhashchange' in window) {
<span id="L654" class="LineNr">654 </span> <span class="subxS1Comment"># . eax = next-line-matches?(_test-stream-line-ABABA, &quot;blah blah&quot;)</span>
<span id="L655" class="LineNr">655 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L656" class="LineNr">656 </span> 68/push <span class="Constant">&quot;blah blah&quot;</span>/imm32
<span id="L657" class="LineNr">657 </span> 68/push <a href='056trace.subx.html#L962'>_test-stream-line-ABABA</a>/imm32
<span id="L657" class="LineNr">657 </span> 68/push <a href='107trace.subx.html#L962'>_test-stream-line-ABABA</a>/imm32
<span id="L658" class="LineNr">658 </span> <span class="subxS2Comment"># . . call</span>
<span id="L659" class="LineNr">659 </span> e8/call <a href='056trace.subx.html#L561'>next-line-matches?</a>/disp32
<span id="L659" class="LineNr">659 </span> e8/call <a href='107trace.subx.html#L561'>next-line-matches?</a>/disp32
<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="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="L662" class="LineNr">662 </span> <span class="subxS1Comment"># . check-ints-equal(eax, 0, msg)</span>
@ -728,7 +728,7 @@ if ('onhashchange' in window) {
<span id="L665" class="LineNr">665 </span> 68/push 0/imm32
<span id="L666" class="LineNr">666 </span> 50/push-eax
<span id="L667" class="LineNr">667 </span> <span class="subxS2Comment"># . . call</span>
<span id="L668" class="LineNr">668 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L668" class="LineNr">668 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L669" class="LineNr">669 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L670" class="LineNr">670 </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="L671" class="LineNr">671 </span> c3/return
@ -738,9 +738,9 @@ if ('onhashchange' in window) {
<span id="L675" class="LineNr">675 </span> <span class="subxS1Comment"># . eax = next-line-matches?(_test-stream-line-ABABA, &quot;&quot;)</span>
<span id="L676" class="LineNr">676 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L677" class="LineNr">677 </span> 68/push <span class="Constant">&quot;&quot;</span>/imm32
<span id="L678" class="LineNr">678 </span> 68/push <a href='056trace.subx.html#L962'>_test-stream-line-ABABA</a>/imm32
<span id="L678" class="LineNr">678 </span> 68/push <a href='107trace.subx.html#L962'>_test-stream-line-ABABA</a>/imm32
<span id="L679" class="LineNr">679 </span> <span class="subxS2Comment"># . . call</span>
<span id="L680" class="LineNr">680 </span> e8/call <a href='056trace.subx.html#L561'>next-line-matches?</a>/disp32
<span id="L680" class="LineNr">680 </span> e8/call <a href='107trace.subx.html#L561'>next-line-matches?</a>/disp32
<span id="L681" class="LineNr">681 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L682" class="LineNr">682 </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="L683" class="LineNr">683 </span> <span class="subxS1Comment"># . check-ints-equal(eax, 0, msg)</span>
@ -749,7 +749,7 @@ if ('onhashchange' in window) {
<span id="L686" class="LineNr">686 </span> 68/push 0/imm32
<span id="L687" class="LineNr">687 </span> 50/push-eax
<span id="L688" class="LineNr">688 </span> <span class="subxS2Comment"># . . call</span>
<span id="L689" class="LineNr">689 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L689" class="LineNr">689 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L690" class="LineNr">690 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L691" class="LineNr">691 </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="L692" class="LineNr">692 </span> c3/return
@ -759,9 +759,9 @@ if ('onhashchange' in window) {
<span id="L696" class="LineNr">696 </span> <span class="subxS1Comment"># . eax = next-line-matches?(_test-stream-line-ABABA, &quot;AA&quot;)</span>
<span id="L697" class="LineNr">697 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L698" class="LineNr">698 </span> 68/push <span class="Constant">&quot;AA&quot;</span>/imm32
<span id="L699" class="LineNr">699 </span> 68/push <a href='056trace.subx.html#L962'>_test-stream-line-ABABA</a>/imm32
<span id="L699" class="LineNr">699 </span> 68/push <a href='107trace.subx.html#L962'>_test-stream-line-ABABA</a>/imm32
<span id="L700" class="LineNr">700 </span> <span class="subxS2Comment"># . . call</span>
<span id="L701" class="LineNr">701 </span> e8/call <a href='056trace.subx.html#L561'>next-line-matches?</a>/disp32
<span id="L701" class="LineNr">701 </span> e8/call <a href='107trace.subx.html#L561'>next-line-matches?</a>/disp32
<span id="L702" class="LineNr">702 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L703" class="LineNr">703 </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="L704" class="LineNr">704 </span> <span class="subxS1Comment"># . check-ints-equal(eax, 0, msg)</span>
@ -770,7 +770,7 @@ if ('onhashchange' in window) {
<span id="L707" class="LineNr">707 </span> 68/push 0/imm32
<span id="L708" class="LineNr">708 </span> 50/push-eax
<span id="L709" class="LineNr">709 </span> <span class="subxS2Comment"># . . call</span>
<span id="L710" class="LineNr">710 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L710" class="LineNr">710 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L711" class="LineNr">711 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L712" class="LineNr">712 </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="L713" class="LineNr">713 </span> c3/return
@ -780,9 +780,9 @@ if ('onhashchange' in window) {
<span id="L717" class="LineNr">717 </span> <span class="subxS1Comment"># . eax = next-line-matches?(_test-stream-line-ABABA, &quot;ABABA&quot;)</span>
<span id="L718" class="LineNr">718 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L719" class="LineNr">719 </span> 68/push <span class="Constant">&quot;ABABA&quot;</span>/imm32
<span id="L720" class="LineNr">720 </span> 68/push <a href='056trace.subx.html#L962'>_test-stream-line-ABABA</a>/imm32
<span id="L720" class="LineNr">720 </span> 68/push <a href='107trace.subx.html#L962'>_test-stream-line-ABABA</a>/imm32
<span id="L721" class="LineNr">721 </span> <span class="subxS2Comment"># . . call</span>
<span id="L722" class="LineNr">722 </span> e8/call <a href='056trace.subx.html#L561'>next-line-matches?</a>/disp32
<span id="L722" class="LineNr">722 </span> e8/call <a href='107trace.subx.html#L561'>next-line-matches?</a>/disp32
<span id="L723" class="LineNr">723 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L724" class="LineNr">724 </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="L725" class="LineNr">725 </span> <span class="subxS1Comment"># . check-ints-equal(eax, 1, msg)</span>
@ -791,7 +791,7 @@ if ('onhashchange' in window) {
<span id="L728" class="LineNr">728 </span> 68/push 1/imm32
<span id="L729" class="LineNr">729 </span> 50/push-eax
<span id="L730" class="LineNr">730 </span> <span class="subxS2Comment"># . . call</span>
<span id="L731" class="LineNr">731 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L731" class="LineNr">731 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L732" class="LineNr">732 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L733" class="LineNr">733 </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="L734" class="LineNr">734 </span> c3/return
@ -865,20 +865,20 @@ if ('onhashchange' in window) {
<span id="L802" class="LineNr">802 </span> <span class="subxComment"># skipping next line in empty stream leaves read pointer at 0</span>
<span id="L803" class="LineNr">803 </span> <span class="subxS1Comment"># . skip-next-line(_test-stream-empty)</span>
<span id="L804" class="LineNr">804 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L805" class="LineNr">805 </span> 68/push <a href='056trace.subx.html#L972'>_test-stream-empty</a>/imm32
<span id="L805" class="LineNr">805 </span> 68/push <a href='107trace.subx.html#L972'>_test-stream-empty</a>/imm32
<span id="L806" class="LineNr">806 </span> <span class="subxS2Comment"># . . call</span>
<span id="L807" class="LineNr">807 </span> e8/call <a href='056trace.subx.html#L737'>skip-next-line</a>/disp32
<span id="L807" class="LineNr">807 </span> e8/call <a href='107trace.subx.html#L737'>skip-next-line</a>/disp32
<span id="L808" class="LineNr">808 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L809" class="LineNr">809 </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="L810" class="LineNr">810 </span> <span class="subxS1Comment"># . check-ints-equal(_test-stream-empty-&gt;read, 0, msg)</span>
<span id="L811" class="LineNr">811 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L812" class="LineNr">812 </span> 68/push <span class="Constant">&quot;F - test-skip-next-line-empty&quot;</span>/imm32
<span id="L813" class="LineNr">813 </span> 68/push 0/imm32
<span id="L814" class="LineNr">814 </span> b8/copy-to-eax <a href='056trace.subx.html#L972'>_test-stream-empty</a>/imm32
<span id="L814" class="LineNr">814 </span> b8/copy-to-eax <a href='107trace.subx.html#L972'>_test-stream-empty</a>/imm32
<span id="L815" class="LineNr">815 </span> 8b/copy 1/mod/*+disp8 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(eax+4) to eax</span>
<span id="L816" class="LineNr">816 </span> 50/push-eax
<span id="L817" class="LineNr">817 </span> <span class="subxS2Comment"># . . call</span>
<span id="L818" class="LineNr">818 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L818" class="LineNr">818 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L819" class="LineNr">819 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L820" class="LineNr">820 </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="L821" class="LineNr">821 </span> c3/return
@ -887,20 +887,20 @@ if ('onhashchange' in window) {
<span id="L824" class="LineNr">824 </span> <span class="subxComment"># skipping next line increments read pointer by length of line + 1 (for newline)</span>
<span id="L825" class="LineNr">825 </span> <span class="subxS1Comment"># . skip-next-line(_test-stream-filled)</span>
<span id="L826" class="LineNr">826 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L827" class="LineNr">827 </span> 68/push <a href='056trace.subx.html#L982'>_test-stream-filled</a>/imm32
<span id="L827" class="LineNr">827 </span> 68/push <a href='107trace.subx.html#L982'>_test-stream-filled</a>/imm32
<span id="L828" class="LineNr">828 </span> <span class="subxS2Comment"># . . call</span>
<span id="L829" class="LineNr">829 </span> e8/call <a href='056trace.subx.html#L737'>skip-next-line</a>/disp32
<span id="L829" class="LineNr">829 </span> e8/call <a href='107trace.subx.html#L737'>skip-next-line</a>/disp32
<span id="L830" class="LineNr">830 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L831" class="LineNr">831 </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="L832" class="LineNr">832 </span> <span class="subxS1Comment"># . check-ints-equal(_test-stream-filled-&gt;read, 5, msg)</span>
<span id="L833" class="LineNr">833 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L834" class="LineNr">834 </span> 68/push <span class="Constant">&quot;F - test-skip-next-line-filled&quot;</span>/imm32
<span id="L835" class="LineNr">835 </span> 68/push 5/imm32
<span id="L836" class="LineNr">836 </span> b8/copy-to-eax <a href='056trace.subx.html#L982'>_test-stream-filled</a>/imm32
<span id="L836" class="LineNr">836 </span> b8/copy-to-eax <a href='107trace.subx.html#L982'>_test-stream-filled</a>/imm32
<span id="L837" class="LineNr">837 </span> 8b/copy 1/mod/*+disp8 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(eax+4) to eax</span>
<span id="L838" class="LineNr">838 </span> 50/push-eax
<span id="L839" class="LineNr">839 </span> <span class="subxS2Comment"># . . call</span>
<span id="L840" class="LineNr">840 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L840" class="LineNr">840 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L841" class="LineNr">841 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L842" class="LineNr">842 </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="L843" class="LineNr">843 </span> c3/return
@ -911,9 +911,9 @@ if ('onhashchange' in window) {
<span id="L848" class="LineNr">848 </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="L849" class="LineNr">849 </span> <span class="subxComment"># clear-stream(*Trace-stream)</span>
<span id="L850" class="LineNr">850 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L851" class="LineNr">851 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='056trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L851" class="LineNr">851 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='107trace.subx.html#L21'>Trace-stream</a></span>/disp32 <span class="subxComment"># push *Trace-stream</span>
<span id="L852" class="LineNr">852 </span> <span class="subxS2Comment"># . . call</span>
<span id="L853" class="LineNr">853 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L853" class="LineNr">853 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L854" class="LineNr">854 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L855" class="LineNr">855 </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="L856" class="LineNr">856 </span><span class="Constant">$clear-trace-stream:end</span>:
@ -945,7 +945,7 @@ if ('onhashchange' in window) {
<span id="L882" class="LineNr">882 </span> <span class="subxS2Comment"># . . push out</span>
<span id="L883" class="LineNr">883 </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="L884" class="LineNr">884 </span> <span class="subxS2Comment"># . . call</span>
<span id="L885" class="LineNr">885 </span> e8/call <a href='056trace.subx.html#L897'>_append-4</a>/disp32
<span id="L885" class="LineNr">885 </span> e8/call <a href='107trace.subx.html#L897'>_append-4</a>/disp32
<span id="L886" class="LineNr">886 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L887" class="LineNr">887 </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> 0x10/imm32 <span class="subxComment"># add to esp</span>
<span id="L888" class="LineNr">888 </span><span class="Constant">$_append-3:end</span>:
@ -1012,7 +1012,7 @@ if ('onhashchange' in window) {
<span id="L949" class="LineNr">949 </span> 68/push <span class="Constant">&quot;stream overflow\n&quot;</span>/imm32
<span id="L950" class="LineNr">950 </span> 68/push 2/imm32/stderr
<span id="L951" class="LineNr">951 </span> <span class="subxS2Comment"># . . call</span>
<span id="L952" class="LineNr">952 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L952" class="LineNr">952 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L953" class="LineNr">953 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L954" class="LineNr">954 </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="L955" class="LineNr">955 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 057write.subx</title>
<title>Mu - 108write.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -56,7 +56,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/057write.subx'>https://github.com/akkartik/mu/blob/master/057write.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/108write.subx'>https://github.com/akkartik/mu/blob/master/108write.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># write: like _write, but also support in-memory streams in addition to file</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># descriptors.</span>
@ -92,7 +92,7 @@ if ('onhashchange' in window) {
<span id="L32" class="LineNr"> 32 </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="L33" class="LineNr"> 33 </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="L34" class="LineNr"> 34 </span> <span class="subxS2Comment"># . . call</span>
<span id="L35" class="LineNr"> 35 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L35" class="LineNr"> 35 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L36" class="LineNr"> 36 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L37" class="LineNr"> 37 </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="L38" class="LineNr"> 38 </span> eb/jump $write:end/disp8
@ -119,7 +119,7 @@ if ('onhashchange' in window) {
<span id="L59" class="LineNr"> 59 </span> 8d/copy-address 1/mod/*+disp8 4/rm32/sib 1/base/ecx 2/index/edx <span class="Normal"> . </span> 3/r32/ebx 0xc/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy ecx+edx+12 to ebx</span>
<span id="L60" class="LineNr"> 60 </span> 53/push-ebx
<span id="L61" class="LineNr"> 61 </span> <span class="subxS2Comment"># . . call</span>
<span id="L62" class="LineNr"> 62 </span> e8/call <a href='056trace.subx.html#L865'>_append-3</a>/disp32
<span id="L62" class="LineNr"> 62 </span> e8/call <a href='107trace.subx.html#L865'>_append-3</a>/disp32
<span id="L63" class="LineNr"> 63 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L64" class="LineNr"> 64 </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="L65" class="LineNr"> 65 </span> <span class="subxComment"># f-&gt;write += eax</span>
@ -138,17 +138,17 @@ if ('onhashchange' in window) {
<span id="L78" class="LineNr"> 78 </span><span class="subxTest">test-write-single</span>:
<span id="L79" class="LineNr"> 79 </span> <span class="subxComment"># clear-stream(_test-stream)</span>
<span id="L80" class="LineNr"> 80 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L81" class="LineNr"> 81 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L81" class="LineNr"> 81 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L82" class="LineNr"> 82 </span> <span class="subxS2Comment"># . . call</span>
<span id="L83" class="LineNr"> 83 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L83" class="LineNr"> 83 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L84" class="LineNr"> 84 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L85" class="LineNr"> 85 </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="L86" class="LineNr"> 86 </span> <span class="subxComment"># write(_test-stream, &quot;Ab&quot;)</span>
<span id="L87" class="LineNr"> 87 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L88" class="LineNr"> 88 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L89" class="LineNr"> 89 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L89" class="LineNr"> 89 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L90" class="LineNr"> 90 </span> <span class="subxS2Comment"># . . call</span>
<span id="L91" class="LineNr"> 91 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L91" class="LineNr"> 91 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L92" class="LineNr"> 92 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L93" class="LineNr"> 93 </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="L94" class="LineNr"> 94 </span> <span class="subxComment"># check-ints-equal(*_test-stream-&gt;data, 41/A 62/b 00 00, msg)</span>
@ -156,10 +156,10 @@ if ('onhashchange' in window) {
<span id="L96" class="LineNr"> 96 </span> 68/push <span class="Constant">&quot;F - test-write-single&quot;</span>/imm32
<span id="L97" class="LineNr"> 97 </span> 68/push 0x006241/imm32/Ab
<span id="L98" class="LineNr"> 98 </span> <span class="subxS2Comment"># . . push *_test-stream-&gt;data</span>
<span id="L99" class="LineNr"> 99 </span> b8/copy-to-eax <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L99" class="LineNr"> 99 </span> b8/copy-to-eax <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L100" class="LineNr">100 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+12)</span>
<span id="L101" class="LineNr">101 </span> <span class="subxS2Comment"># . . call</span>
<span id="L102" class="LineNr">102 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L102" class="LineNr">102 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L103" class="LineNr">103 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L104" class="LineNr">104 </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="L105" class="LineNr">105 </span> <span class="subxComment"># end</span>
@ -168,25 +168,25 @@ if ('onhashchange' in window) {
<span id="L108" class="LineNr">108 </span><span class="subxTest">test-write-appends</span>:
<span id="L109" class="LineNr">109 </span> <span class="subxComment"># clear-stream(_test-stream)</span>
<span id="L110" class="LineNr">110 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L111" class="LineNr">111 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L111" class="LineNr">111 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L112" class="LineNr">112 </span> <span class="subxS2Comment"># . . call</span>
<span id="L113" class="LineNr">113 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L113" class="LineNr">113 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L114" class="LineNr">114 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L115" class="LineNr">115 </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="L116" class="LineNr">116 </span> <span class="subxComment"># write(_test-stream, &quot;C&quot;)</span>
<span id="L117" class="LineNr">117 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L118" class="LineNr">118 </span> 68/push <span class="Constant">&quot;C&quot;</span>/imm32
<span id="L119" class="LineNr">119 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L119" class="LineNr">119 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L120" class="LineNr">120 </span> <span class="subxS2Comment"># . . call</span>
<span id="L121" class="LineNr">121 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L121" class="LineNr">121 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L122" class="LineNr">122 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L123" class="LineNr">123 </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="L124" class="LineNr">124 </span> <span class="subxComment"># write(_test-stream, &quot;D&quot;)</span>
<span id="L125" class="LineNr">125 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L126" class="LineNr">126 </span> 68/push <span class="Constant">&quot;D&quot;</span>/imm32
<span id="L127" class="LineNr">127 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L127" class="LineNr">127 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L128" class="LineNr">128 </span> <span class="subxS2Comment"># . . call</span>
<span id="L129" class="LineNr">129 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L129" class="LineNr">129 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L130" class="LineNr">130 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L131" class="LineNr">131 </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="L132" class="LineNr">132 </span> <span class="subxComment"># check-ints-equal(*_test-stream-&gt;data, 43/C 44/D 00 00, msg)</span>
@ -194,10 +194,10 @@ if ('onhashchange' in window) {
<span id="L134" class="LineNr">134 </span> 68/push <span class="Constant">&quot;F - test-write-appends&quot;</span>/imm32
<span id="L135" class="LineNr">135 </span> 68/push 0x00004443/imm32/C-D
<span id="L136" class="LineNr">136 </span> <span class="subxS2Comment"># . . push *_test-stream-&gt;data</span>
<span id="L137" class="LineNr">137 </span> b8/copy-to-eax <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L137" class="LineNr">137 </span> b8/copy-to-eax <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L138" class="LineNr">138 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+12)</span>
<span id="L139" class="LineNr">139 </span> <span class="subxS2Comment"># . . call</span>
<span id="L140" class="LineNr">140 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L140" class="LineNr">140 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L141" class="LineNr">141 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L142" class="LineNr">142 </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="L143" class="LineNr">143 </span> <span class="subxComment"># end</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 058stream-equal.subx</title>
<title>Mu - 109stream-equal.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -55,7 +55,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/058stream-equal.subx'>https://github.com/akkartik/mu/blob/master/058stream-equal.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/109stream-equal.subx'>https://github.com/akkartik/mu/blob/master/109stream-equal.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># some primitives for checking stream contents</span>
<span id="L2" class="LineNr"> 2 </span>
@ -65,7 +65,7 @@ if ('onhashchange' in window) {
<span id="L6" class="LineNr"> 6 </span><span class="subxS1Comment"># . 1-3 bytes 3 bits 2 bits 3 bits 3 bits 3 bits 2 bits 2 bits 0/1/2/4 bytes 0/1/2/4 bytes</span>
<span id="L7" class="LineNr"> 7 </span>
<span id="L8" class="LineNr"> 8 </span><span class="subxComment"># compare all the data in a stream (ignoring the read pointer)</span>
<span id="L9" class="LineNr"> 9 </span><span class="subxFunction">stream-data-equal?</span>: <span class="subxComment"># f: (addr stream byte), s: (addr array byte) -&gt; eax: boolean</span>
<span id="L9" class="LineNr"> 9 </span><span class="subxFunction">stream-data-equal?</span>: <span class="subxComment"># f: (addr stream byte), s: (addr array byte) -&gt; result/eax: boolean</span>
<span id="L10" class="LineNr"> 10 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L11" class="LineNr"> 11 </span> 55/push-ebp
<span id="L12" class="LineNr"> 12 </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>
@ -132,25 +132,25 @@ if ('onhashchange' in window) {
<span id="L73" class="LineNr"> 73 </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="L74" class="LineNr"> 74 </span> <span class="subxComment"># clear-stream(_test-stream)</span>
<span id="L75" class="LineNr"> 75 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L76" class="LineNr"> 76 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L76" class="LineNr"> 76 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L77" class="LineNr"> 77 </span> <span class="subxS2Comment"># . . call</span>
<span id="L78" class="LineNr"> 78 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L78" class="LineNr"> 78 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L79" class="LineNr"> 79 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L80" class="LineNr"> 80 </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="L81" class="LineNr"> 81 </span> <span class="subxComment"># write(_test-stream, &quot;Abc&quot;)</span>
<span id="L82" class="LineNr"> 82 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L83" class="LineNr"> 83 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L84" class="LineNr"> 84 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L84" class="LineNr"> 84 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L85" class="LineNr"> 85 </span> <span class="subxS2Comment"># . . call</span>
<span id="L86" class="LineNr"> 86 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L86" class="LineNr"> 86 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L87" class="LineNr"> 87 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L88" class="LineNr"> 88 </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="L89" class="LineNr"> 89 </span> <span class="subxComment"># eax = stream-data-equal?(_test-stream, &quot;Abc&quot;)</span>
<span id="L90" class="LineNr"> 90 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L91" class="LineNr"> 91 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L92" class="LineNr"> 92 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L92" class="LineNr"> 92 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L93" class="LineNr"> 93 </span> <span class="subxS2Comment"># . . call</span>
<span id="L94" class="LineNr"> 94 </span> e8/call <a href='058stream-equal.subx.html#L9'>stream-data-equal?</a>/disp32
<span id="L94" class="LineNr"> 94 </span> e8/call <a href='109stream-equal.subx.html#L9'>stream-data-equal?</a>/disp32
<span id="L95" class="LineNr"> 95 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L96" class="LineNr"> 96 </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="L97" class="LineNr"> 97 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -159,7 +159,7 @@ if ('onhashchange' in window) {
<span id="L100" class="LineNr">100 </span> 68/push 1/imm32
<span id="L101" class="LineNr">101 </span> 50/push-eax
<span id="L102" class="LineNr">102 </span> <span class="subxS2Comment"># . . call</span>
<span id="L103" class="LineNr">103 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L103" class="LineNr">103 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L104" class="LineNr">104 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L105" class="LineNr">105 </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="L106" class="LineNr">106 </span> <span class="subxS1Comment"># . epilogue</span>
@ -173,25 +173,25 @@ if ('onhashchange' in window) {
<span id="L114" class="LineNr">114 </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="L115" class="LineNr">115 </span> <span class="subxComment"># clear-stream(_test-stream)</span>
<span id="L116" class="LineNr">116 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L117" class="LineNr">117 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L117" class="LineNr">117 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L118" class="LineNr">118 </span> <span class="subxS2Comment"># . . call</span>
<span id="L119" class="LineNr">119 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L119" class="LineNr">119 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L120" class="LineNr">120 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L121" class="LineNr">121 </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="L122" class="LineNr">122 </span> <span class="subxComment"># write(_test-stream, &quot;Abc&quot;)</span>
<span id="L123" class="LineNr">123 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L124" class="LineNr">124 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L125" class="LineNr">125 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L125" class="LineNr">125 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L126" class="LineNr">126 </span> <span class="subxS2Comment"># . . call</span>
<span id="L127" class="LineNr">127 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L127" class="LineNr">127 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L128" class="LineNr">128 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L129" class="LineNr">129 </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="L130" class="LineNr">130 </span> <span class="subxComment"># eax = stream-data-equal?(_test-stream, &quot;Abd&quot;)</span>
<span id="L131" class="LineNr">131 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L132" class="LineNr">132 </span> 68/push <span class="Constant">&quot;Abd&quot;</span>/imm32
<span id="L133" class="LineNr">133 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L133" class="LineNr">133 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L134" class="LineNr">134 </span> <span class="subxS2Comment"># . . call</span>
<span id="L135" class="LineNr">135 </span> e8/call <a href='058stream-equal.subx.html#L9'>stream-data-equal?</a>/disp32
<span id="L135" class="LineNr">135 </span> e8/call <a href='109stream-equal.subx.html#L9'>stream-data-equal?</a>/disp32
<span id="L136" class="LineNr">136 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L137" class="LineNr">137 </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="L138" class="LineNr">138 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -200,7 +200,7 @@ if ('onhashchange' in window) {
<span id="L141" class="LineNr">141 </span> 68/push 0/imm32
<span id="L142" class="LineNr">142 </span> 50/push-eax
<span id="L143" class="LineNr">143 </span> <span class="subxS2Comment"># . . call</span>
<span id="L144" class="LineNr">144 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L144" class="LineNr">144 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L145" class="LineNr">145 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L146" class="LineNr">146 </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="L147" class="LineNr">147 </span> <span class="subxS1Comment"># . epilogue</span>
@ -214,25 +214,25 @@ if ('onhashchange' in window) {
<span id="L155" class="LineNr">155 </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="L156" class="LineNr">156 </span> <span class="subxComment"># clear-stream(_test-stream)</span>
<span id="L157" class="LineNr">157 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L158" class="LineNr">158 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L158" class="LineNr">158 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L159" class="LineNr">159 </span> <span class="subxS2Comment"># . . call</span>
<span id="L160" class="LineNr">160 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L160" class="LineNr">160 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L161" class="LineNr">161 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L162" class="LineNr">162 </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="L163" class="LineNr">163 </span> <span class="subxComment"># write(_test-stream, &quot;Abc&quot;)</span>
<span id="L164" class="LineNr">164 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L165" class="LineNr">165 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L166" class="LineNr">166 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L166" class="LineNr">166 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L167" class="LineNr">167 </span> <span class="subxS2Comment"># . . call</span>
<span id="L168" class="LineNr">168 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L168" class="LineNr">168 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L169" class="LineNr">169 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L170" class="LineNr">170 </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="L171" class="LineNr">171 </span> <span class="subxComment"># eax = stream-data-equal?(_test-stream, &quot;Abcd&quot;)</span>
<span id="L172" class="LineNr">172 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L173" class="LineNr">173 </span> 68/push <span class="Constant">&quot;Abcd&quot;</span>/imm32
<span id="L174" class="LineNr">174 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L174" class="LineNr">174 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L175" class="LineNr">175 </span> <span class="subxS2Comment"># . . call</span>
<span id="L176" class="LineNr">176 </span> e8/call <a href='058stream-equal.subx.html#L9'>stream-data-equal?</a>/disp32
<span id="L176" class="LineNr">176 </span> e8/call <a href='109stream-equal.subx.html#L9'>stream-data-equal?</a>/disp32
<span id="L177" class="LineNr">177 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L178" class="LineNr">178 </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="L179" class="LineNr">179 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -241,7 +241,7 @@ if ('onhashchange' in window) {
<span id="L182" class="LineNr">182 </span> 68/push 0/imm32
<span id="L183" class="LineNr">183 </span> 50/push-eax
<span id="L184" class="LineNr">184 </span> <span class="subxS2Comment"># . . call</span>
<span id="L185" class="LineNr">185 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L185" class="LineNr">185 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L186" class="LineNr">186 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L187" class="LineNr">187 </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="L188" class="LineNr">188 </span> <span class="subxS1Comment"># . epilogue</span>
@ -261,7 +261,7 @@ if ('onhashchange' in window) {
<span id="L202" class="LineNr">202 </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="L203" class="LineNr">203 </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="L204" class="LineNr">204 </span> <span class="subxS2Comment"># . . call</span>
<span id="L205" class="LineNr">205 </span> e8/call <a href='058stream-equal.subx.html#L9'>stream-data-equal?</a>/disp32
<span id="L205" class="LineNr">205 </span> e8/call <a href='109stream-equal.subx.html#L9'>stream-data-equal?</a>/disp32
<span id="L206" class="LineNr">206 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L207" class="LineNr">207 </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="L208" class="LineNr">208 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -270,7 +270,7 @@ if ('onhashchange' in window) {
<span id="L211" class="LineNr">211 </span> 68/push 1/imm32
<span id="L212" class="LineNr">212 </span> 50/push-eax
<span id="L213" class="LineNr">213 </span> <span class="subxS2Comment"># . . call</span>
<span id="L214" class="LineNr">214 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L214" class="LineNr">214 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L215" class="LineNr">215 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L216" class="LineNr">216 </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="L217" class="LineNr">217 </span><span class="Constant">$check-stream-equal:end</span>:
@ -286,7 +286,7 @@ if ('onhashchange' in window) {
<span id="L227" class="LineNr">227 </span><span class="subxComment"># on success, set f-&gt;read to after the next newline</span>
<span id="L228" class="LineNr">228 </span><span class="subxComment"># on failure, leave f-&gt;read unmodified</span>
<span id="L229" class="LineNr">229 </span><span class="subxComment"># this function is usually used only in tests, so we repeatedly write f-&gt;read</span>
<span id="L230" class="LineNr">230 </span><span class="subxFunction">next-stream-line-equal?</span>: <span class="subxComment"># f: (addr stream byte), s: (addr array byte) -&gt; eax: boolean</span>
<span id="L230" class="LineNr">230 </span><span class="subxFunction">next-stream-line-equal?</span>: <span class="subxComment"># f: (addr stream byte), s: (addr array byte) -&gt; result/eax: boolean</span>
<span id="L231" class="LineNr">231 </span> <span class="subxComment"># pseudocode:</span>
<span id="L232" class="LineNr">232 </span> <span class="subxComment"># currf = f-&gt;read # bound: f-&gt;write</span>
<span id="L233" class="LineNr">233 </span> <span class="subxComment"># currs = 0 # bound: s-&gt;size</span>
@ -395,25 +395,25 @@ if ('onhashchange' in window) {
<span id="L336" class="LineNr">336 </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="L337" class="LineNr">337 </span> <span class="subxComment"># clear-stream(_test-stream)</span>
<span id="L338" class="LineNr">338 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L339" class="LineNr">339 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L339" class="LineNr">339 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L340" class="LineNr">340 </span> <span class="subxS2Comment"># . . call</span>
<span id="L341" class="LineNr">341 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L341" class="LineNr">341 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L342" class="LineNr">342 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L343" class="LineNr">343 </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="L344" class="LineNr">344 </span> <span class="subxComment"># write(_test-stream, &quot;Abc\ndef&quot;)</span>
<span id="L345" class="LineNr">345 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L346" class="LineNr">346 </span> 68/push <span class="Constant">&quot;Abc\ndef&quot;</span>/imm32
<span id="L347" class="LineNr">347 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L347" class="LineNr">347 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L348" class="LineNr">348 </span> <span class="subxS2Comment"># . . call</span>
<span id="L349" class="LineNr">349 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L349" class="LineNr">349 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L350" class="LineNr">350 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L351" class="LineNr">351 </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="L352" class="LineNr">352 </span> <span class="subxComment"># eax = next-stream-line-equal?(_test-stream, &quot;Abc&quot;)</span>
<span id="L353" class="LineNr">353 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L354" class="LineNr">354 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L355" class="LineNr">355 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L355" class="LineNr">355 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L356" class="LineNr">356 </span> <span class="subxS2Comment"># . . call</span>
<span id="L357" class="LineNr">357 </span> e8/call <a href='058stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L357" class="LineNr">357 </span> e8/call <a href='109stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L358" class="LineNr">358 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L359" class="LineNr">359 </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="L360" class="LineNr">360 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -422,7 +422,7 @@ if ('onhashchange' in window) {
<span id="L363" class="LineNr">363 </span> 68/push 1/imm32
<span id="L364" class="LineNr">364 </span> 50/push-eax
<span id="L365" class="LineNr">365 </span> <span class="subxS2Comment"># . . call</span>
<span id="L366" class="LineNr">366 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L366" class="LineNr">366 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L367" class="LineNr">367 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L368" class="LineNr">368 </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="L369" class="LineNr">369 </span> <span class="subxS1Comment"># . epilogue</span>
@ -436,25 +436,25 @@ if ('onhashchange' in window) {
<span id="L377" class="LineNr">377 </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="L378" class="LineNr">378 </span> <span class="subxComment"># clear-stream(_test-stream)</span>
<span id="L379" class="LineNr">379 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L380" class="LineNr">380 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L380" class="LineNr">380 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L381" class="LineNr">381 </span> <span class="subxS2Comment"># . . call</span>
<span id="L382" class="LineNr">382 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L382" class="LineNr">382 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L383" class="LineNr">383 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L384" class="LineNr">384 </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="L385" class="LineNr">385 </span> <span class="subxComment"># write(_test-stream, &quot;Abc\ndef&quot;)</span>
<span id="L386" class="LineNr">386 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L387" class="LineNr">387 </span> 68/push <span class="Constant">&quot;Abc\ndef&quot;</span>/imm32
<span id="L388" class="LineNr">388 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L388" class="LineNr">388 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L389" class="LineNr">389 </span> <span class="subxS2Comment"># . . call</span>
<span id="L390" class="LineNr">390 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L390" class="LineNr">390 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L391" class="LineNr">391 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L392" class="LineNr">392 </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="L393" class="LineNr">393 </span> <span class="subxComment"># eax = next-stream-line-equal?(_test-stream, &quot;def&quot;)</span>
<span id="L394" class="LineNr">394 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L395" class="LineNr">395 </span> 68/push <span class="Constant">&quot;def&quot;</span>/imm32
<span id="L396" class="LineNr">396 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L396" class="LineNr">396 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L397" class="LineNr">397 </span> <span class="subxS2Comment"># . . call</span>
<span id="L398" class="LineNr">398 </span> e8/call <a href='058stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L398" class="LineNr">398 </span> e8/call <a href='109stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L399" class="LineNr">399 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L400" class="LineNr">400 </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="L401" class="LineNr">401 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -463,7 +463,7 @@ if ('onhashchange' in window) {
<span id="L404" class="LineNr">404 </span> 68/push 0/imm32
<span id="L405" class="LineNr">405 </span> 50/push-eax
<span id="L406" class="LineNr">406 </span> <span class="subxS2Comment"># . . call</span>
<span id="L407" class="LineNr">407 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L407" class="LineNr">407 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L408" class="LineNr">408 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L409" class="LineNr">409 </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="L410" class="LineNr">410 </span> <span class="subxS1Comment"># . epilogue</span>
@ -477,33 +477,33 @@ if ('onhashchange' in window) {
<span id="L418" class="LineNr">418 </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="L419" class="LineNr">419 </span> <span class="subxComment"># clear-stream(_test-stream)</span>
<span id="L420" class="LineNr">420 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L421" class="LineNr">421 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L421" class="LineNr">421 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L422" class="LineNr">422 </span> <span class="subxS2Comment"># . . call</span>
<span id="L423" class="LineNr">423 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L423" class="LineNr">423 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L424" class="LineNr">424 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L425" class="LineNr">425 </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="L426" class="LineNr">426 </span> <span class="subxComment"># write(_test-stream, &quot;Abc\ndef\n&quot;)</span>
<span id="L427" class="LineNr">427 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L428" class="LineNr">428 </span> 68/push <span class="Constant">&quot;Abc\ndef\n&quot;</span>/imm32
<span id="L429" class="LineNr">429 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L429" class="LineNr">429 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L430" class="LineNr">430 </span> <span class="subxS2Comment"># . . call</span>
<span id="L431" class="LineNr">431 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L431" class="LineNr">431 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L432" class="LineNr">432 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L433" class="LineNr">433 </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="L434" class="LineNr">434 </span> <span class="subxComment"># next-stream-line-equal?(_test-stream, &quot;Abc&quot;)</span>
<span id="L435" class="LineNr">435 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L436" class="LineNr">436 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L437" class="LineNr">437 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L437" class="LineNr">437 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L438" class="LineNr">438 </span> <span class="subxS2Comment"># . . call</span>
<span id="L439" class="LineNr">439 </span> e8/call <a href='058stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L439" class="LineNr">439 </span> e8/call <a href='109stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L440" class="LineNr">440 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L441" class="LineNr">441 </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="L442" class="LineNr">442 </span> <span class="subxComment"># eax = next-stream-line-equal?(_test-stream, &quot;def&quot;)</span>
<span id="L443" class="LineNr">443 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L444" class="LineNr">444 </span> 68/push <span class="Constant">&quot;def&quot;</span>/imm32
<span id="L445" class="LineNr">445 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L445" class="LineNr">445 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L446" class="LineNr">446 </span> <span class="subxS2Comment"># . . call</span>
<span id="L447" class="LineNr">447 </span> e8/call <a href='058stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L447" class="LineNr">447 </span> e8/call <a href='109stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L448" class="LineNr">448 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L449" class="LineNr">449 </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="L450" class="LineNr">450 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -512,7 +512,7 @@ if ('onhashchange' in window) {
<span id="L453" class="LineNr">453 </span> 68/push 1/imm32
<span id="L454" class="LineNr">454 </span> 50/push-eax
<span id="L455" class="LineNr">455 </span> <span class="subxS2Comment"># . . call</span>
<span id="L456" class="LineNr">456 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L456" class="LineNr">456 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L457" class="LineNr">457 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L458" class="LineNr">458 </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="L459" class="LineNr">459 </span> <span class="subxS1Comment"># . epilogue</span>
@ -526,33 +526,33 @@ if ('onhashchange' in window) {
<span id="L467" class="LineNr">467 </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="L468" class="LineNr">468 </span> <span class="subxComment"># clear-stream(_test-stream)</span>
<span id="L469" class="LineNr">469 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L470" class="LineNr">470 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L470" class="LineNr">470 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L471" class="LineNr">471 </span> <span class="subxS2Comment"># . . call</span>
<span id="L472" class="LineNr">472 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L472" class="LineNr">472 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L473" class="LineNr">473 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L474" class="LineNr">474 </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="L475" class="LineNr">475 </span> <span class="subxComment"># write(_test-stream, &quot;Abc\ndef&quot;)</span>
<span id="L476" class="LineNr">476 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L477" class="LineNr">477 </span> 68/push <span class="Constant">&quot;Abc\ndef&quot;</span>/imm32
<span id="L478" class="LineNr">478 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L478" class="LineNr">478 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L479" class="LineNr">479 </span> <span class="subxS2Comment"># . . call</span>
<span id="L480" class="LineNr">480 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L480" class="LineNr">480 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L481" class="LineNr">481 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L482" class="LineNr">482 </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="L483" class="LineNr">483 </span> <span class="subxComment"># next-stream-line-equal?(_test-stream, &quot;Abc&quot;)</span>
<span id="L484" class="LineNr">484 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L485" class="LineNr">485 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L486" class="LineNr">486 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L486" class="LineNr">486 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L487" class="LineNr">487 </span> <span class="subxS2Comment"># . . call</span>
<span id="L488" class="LineNr">488 </span> e8/call <a href='058stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L488" class="LineNr">488 </span> e8/call <a href='109stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L489" class="LineNr">489 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L490" class="LineNr">490 </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="L491" class="LineNr">491 </span> <span class="subxComment"># eax = next-stream-line-equal?(_test-stream, &quot;def&quot;)</span>
<span id="L492" class="LineNr">492 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L493" class="LineNr">493 </span> 68/push <span class="Constant">&quot;def&quot;</span>/imm32
<span id="L494" class="LineNr">494 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L494" class="LineNr">494 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L495" class="LineNr">495 </span> <span class="subxS2Comment"># . . call</span>
<span id="L496" class="LineNr">496 </span> e8/call <a href='058stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L496" class="LineNr">496 </span> e8/call <a href='109stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L497" class="LineNr">497 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L498" class="LineNr">498 </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="L499" class="LineNr">499 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -561,7 +561,7 @@ if ('onhashchange' in window) {
<span id="L502" class="LineNr">502 </span> 68/push 1/imm32
<span id="L503" class="LineNr">503 </span> 50/push-eax
<span id="L504" class="LineNr">504 </span> <span class="subxS2Comment"># . . call</span>
<span id="L505" class="LineNr">505 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L505" class="LineNr">505 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L506" class="LineNr">506 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L507" class="LineNr">507 </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="L508" class="LineNr">508 </span> <span class="subxS1Comment"># . epilogue</span>
@ -575,18 +575,18 @@ if ('onhashchange' in window) {
<span id="L516" class="LineNr">516 </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="L517" class="LineNr">517 </span> <span class="subxComment"># clear-stream(_test-stream)</span>
<span id="L518" class="LineNr">518 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L519" class="LineNr">519 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L519" class="LineNr">519 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L520" class="LineNr">520 </span> <span class="subxS2Comment"># . . call</span>
<span id="L521" class="LineNr">521 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L521" class="LineNr">521 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L522" class="LineNr">522 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L523" class="LineNr">523 </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="L524" class="LineNr">524 </span> <span class="subxComment"># write nothing</span>
<span id="L525" class="LineNr">525 </span> <span class="subxComment"># eax = next-stream-line-equal?(_test-stream, &quot;&quot;)</span>
<span id="L526" class="LineNr">526 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L527" class="LineNr">527 </span> 68/push <span class="Constant">&quot;&quot;</span>/imm32
<span id="L528" class="LineNr">528 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L528" class="LineNr">528 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L529" class="LineNr">529 </span> <span class="subxS2Comment"># . . call</span>
<span id="L530" class="LineNr">530 </span> e8/call <a href='058stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L530" class="LineNr">530 </span> e8/call <a href='109stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L531" class="LineNr">531 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L532" class="LineNr">532 </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="L533" class="LineNr">533 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -595,24 +595,24 @@ if ('onhashchange' in window) {
<span id="L536" class="LineNr">536 </span> 68/push 1/imm32
<span id="L537" class="LineNr">537 </span> 50/push-eax
<span id="L538" class="LineNr">538 </span> <span class="subxS2Comment"># . . call</span>
<span id="L539" class="LineNr">539 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L539" class="LineNr">539 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L540" class="LineNr">540 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L541" class="LineNr">541 </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="L542" class="LineNr">542 </span> <span class="subxComment"># eax = next-stream-line-equal?(_test-stream, &quot;&quot;)</span>
<span id="L543" class="LineNr">543 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L544" class="LineNr">544 </span> 68/push <span class="Constant">&quot;&quot;</span>/imm32
<span id="L545" class="LineNr">545 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L545" class="LineNr">545 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L546" class="LineNr">546 </span> <span class="subxS2Comment"># . . call</span>
<span id="L547" class="LineNr">547 </span> e8/call <a href='058stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L547" class="LineNr">547 </span> e8/call <a href='109stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L548" class="LineNr">548 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L549" class="LineNr">549 </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="L550" class="LineNr">550 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
<span id="L551" class="LineNr">551 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L552" class="LineNr">552 </span> 68/push <span class="Constant">&quot;F - <a href='058stream-equal.subx.html#L513'>test-next-stream-line-equal-always-fails-after-Eof</a>/2&quot;</span>/imm32
<span id="L552" class="LineNr">552 </span> 68/push <span class="Constant">&quot;F - <a href='109stream-equal.subx.html#L513'>test-next-stream-line-equal-always-fails-after-Eof</a>/2&quot;</span>/imm32
<span id="L553" class="LineNr">553 </span> 68/push 1/imm32
<span id="L554" class="LineNr">554 </span> 50/push-eax
<span id="L555" class="LineNr">555 </span> <span class="subxS2Comment"># . . call</span>
<span id="L556" class="LineNr">556 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L556" class="LineNr">556 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L557" class="LineNr">557 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L558" class="LineNr">558 </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="L559" class="LineNr">559 </span> <span class="subxS1Comment"># . epilogue</span>
@ -632,7 +632,7 @@ if ('onhashchange' in window) {
<span id="L573" class="LineNr">573 </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="L574" class="LineNr">574 </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="L575" class="LineNr">575 </span> <span class="subxS2Comment"># . . call</span>
<span id="L576" class="LineNr">576 </span> e8/call <a href='058stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L576" class="LineNr">576 </span> e8/call <a href='109stream-equal.subx.html#L230'>next-stream-line-equal?</a>/disp32
<span id="L577" class="LineNr">577 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L578" class="LineNr">578 </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="L579" class="LineNr">579 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -641,7 +641,7 @@ if ('onhashchange' in window) {
<span id="L582" class="LineNr">582 </span> 68/push 1/imm32
<span id="L583" class="LineNr">583 </span> 50/push-eax
<span id="L584" class="LineNr">584 </span> <span class="subxS2Comment"># . . call</span>
<span id="L585" class="LineNr">585 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L585" class="LineNr">585 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L586" class="LineNr">586 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L587" class="LineNr">587 </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="L588" class="LineNr">588 </span> <span class="subxS1Comment"># . restore registers</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 059stop.subx</title>
<title>Mu - 110stop.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -57,7 +57,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/059stop.subx'>https://github.com/akkartik/mu/blob/master/059stop.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/110stop.subx'>https://github.com/akkartik/mu/blob/master/110stop.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># stop: dependency-injected wrapper around the exit() syscall</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment">#</span>
@ -200,14 +200,14 @@ if ('onhashchange' in window) {
<span id="L139" class="LineNr">139 </span> 68/push 4/imm32/nbytes-of-args-for-_test-stop-1
<span id="L140" class="LineNr">140 </span> 50/push-eax
<span id="L141" class="LineNr">141 </span> <span class="subxS2Comment"># . . call</span>
<span id="L142" class="LineNr">142 </span> e8/call <a href='059stop.subx.html#L44'>tailor-exit-descriptor</a>/disp32
<span id="L142" class="LineNr">142 </span> e8/call <a href='110stop.subx.html#L44'>tailor-exit-descriptor</a>/disp32
<span id="L143" class="LineNr">143 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L144" class="LineNr">144 </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="L145" class="LineNr">145 </span> <span class="subxS1Comment"># . _test-stop-1(ed)</span>
<span id="L146" class="LineNr">146 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L147" class="LineNr">147 </span> 50/push-eax
<span id="L148" class="LineNr">148 </span> <span class="subxS2Comment"># . . call</span>
<span id="L149" class="LineNr">149 </span> e8/call <a href='059stop.subx.html#L170'>_test-stop-1</a>/disp32
<span id="L149" class="LineNr">149 </span> e8/call <a href='110stop.subx.html#L170'>_test-stop-1</a>/disp32
<span id="L150" class="LineNr">150 </span> <span class="subxComment"># registers except esp may be clobbered at this point</span>
<span id="L151" class="LineNr">151 </span> <span class="subxComment"># restore args</span>
<span id="L152" class="LineNr">152 </span> 58/pop-to-eax
@ -219,7 +219,7 @@ if ('onhashchange' in window) {
<span id="L158" class="LineNr">158 </span> <span class="subxS2Comment"># . . push ed-&gt;value</span>
<span id="L159" class="LineNr">159 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+4)</span>
<span id="L160" class="LineNr">160 </span> <span class="subxS2Comment"># . . call</span>
<span id="L161" class="LineNr">161 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L161" class="LineNr">161 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L162" class="LineNr">162 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L163" class="LineNr">163 </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="L164" class="LineNr">164 </span> <span class="subxS1Comment"># . epilogue</span>
@ -236,7 +236,7 @@ if ('onhashchange' in window) {
<span id="L175" class="LineNr">175 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L176" class="LineNr">176 </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="L177" class="LineNr">177 </span> <span class="subxS2Comment"># . . call</span>
<span id="L178" class="LineNr">178 </span> e8/call <a href='059stop.subx.html#L197'>_test-stop-2</a>/disp32
<span id="L178" class="LineNr">178 </span> e8/call <a href='110stop.subx.html#L197'>_test-stop-2</a>/disp32
<span id="L179" class="LineNr">179 </span> <span class="subxComment"># should never get past this point</span>
<span id="L180" class="LineNr">180 </span><span class="Constant">$_test-stop-1:dead-end</span>:
<span id="L181" class="LineNr">181 </span> <span class="subxS2Comment"># . . discard args</span>
@ -247,7 +247,7 @@ if ('onhashchange' in window) {
<span id="L186" class="LineNr">186 </span> 68/push 0/imm32
<span id="L187" class="LineNr">187 </span> 68/push 1/imm32
<span id="L188" class="LineNr">188 </span> <span class="subxS2Comment"># . . call</span>
<span id="L189" class="LineNr">189 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L189" class="LineNr">189 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L190" class="LineNr">190 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L191" class="LineNr">191 </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="L192" class="LineNr">192 </span> <span class="subxS1Comment"># . epilogue</span>
@ -264,7 +264,7 @@ if ('onhashchange' in window) {
<span id="L203" class="LineNr">203 </span> 68/push 1/imm32
<span id="L204" class="LineNr">204 </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="L205" class="LineNr">205 </span> <span class="subxS2Comment"># . . call</span>
<span id="L206" class="LineNr">206 </span> e8/call <a href='059stop.subx.html#L92'>stop</a>/disp32
<span id="L206" class="LineNr">206 </span> e8/call <a href='110stop.subx.html#L92'>stop</a>/disp32
<span id="L207" class="LineNr">207 </span> <span class="subxComment"># should never get past this point</span>
<span id="L208" class="LineNr">208 </span><span class="Constant">$_test-stop-2:dead-end</span>:
<span id="L209" class="LineNr">209 </span> <span class="subxS1Comment"># . epilogue</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 060read.subx</title>
<title>Mu - 111read.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -57,7 +57,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/060read.subx'>https://github.com/akkartik/mu/blob/master/060read.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/111read.subx'>https://github.com/akkartik/mu/blob/master/111read.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># read: analogously to write, support reading from in-memory streams in</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># addition to file descriptors.</span>
@ -117,7 +117,7 @@ if ('onhashchange' in window) {
<span id="L56" class="LineNr"> 56 </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="L57" class="LineNr"> 57 </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="L58" class="LineNr"> 58 </span> <span class="subxS2Comment"># . . call</span>
<span id="L59" class="LineNr"> 59 </span> e8/call <a href='060read.subx.html#L198'>_read</a>/disp32
<span id="L59" class="LineNr"> 59 </span> e8/call <a href='111read.subx.html#L198'>_read</a>/disp32
<span id="L60" class="LineNr"> 60 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L61" class="LineNr"> 61 </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="L62" class="LineNr"> 62 </span> <span class="subxComment"># return</span>
@ -150,7 +150,7 @@ if ('onhashchange' in window) {
<span id="L89" class="LineNr"> 89 </span> 8d/copy-address 1/mod/*+disp8 4/rm32/sib 7/base/edi 0/index/eax <span class="Normal"> . </span> 0/r32/eax 0xc/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy edi+eax+12 to eax</span>
<span id="L90" class="LineNr"> 90 </span> 50/push-eax
<span id="L91" class="LineNr"> 91 </span> <span class="subxS2Comment"># . . call</span>
<span id="L92" class="LineNr"> 92 </span> e8/call <a href='060read.subx.html#L145'>_buffer-4</a>/disp32
<span id="L92" class="LineNr"> 92 </span> e8/call <a href='111read.subx.html#L145'>_buffer-4</a>/disp32
<span id="L93" class="LineNr"> 93 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L94" class="LineNr"> 94 </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> 0x10/imm32 <span class="subxComment"># add to esp</span>
<span id="L95" class="LineNr"> 95 </span> <span class="subxComment"># s-&gt;write += eax</span>
@ -191,7 +191,7 @@ if ('onhashchange' in window) {
<span id="L130" class="LineNr">130 </span> <span class="subxS2Comment"># . . push out</span>
<span id="L131" class="LineNr">131 </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="L132" class="LineNr">132 </span> <span class="subxS2Comment"># . . call</span>
<span id="L133" class="LineNr">133 </span> e8/call <a href='060read.subx.html#L145'>_buffer-4</a>/disp32
<span id="L133" class="LineNr">133 </span> e8/call <a href='111read.subx.html#L145'>_buffer-4</a>/disp32
<span id="L134" class="LineNr">134 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L135" class="LineNr">135 </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> 0x10/imm32 <span class="subxComment"># add to esp</span>
<span id="L136" class="LineNr">136 </span><span class="Constant">$_buffer-3:end</span>:
@ -320,50 +320,50 @@ if ('onhashchange' in window) {
<span id="L259" class="LineNr">259 </span> <span class="subxH1Comment"># - write a single character into _test-stream, then read from it</span>
<span id="L260" class="LineNr">260 </span> <span class="subxComment"># clear-stream(_test-stream)</span>
<span id="L261" class="LineNr">261 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L262" class="LineNr">262 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L262" class="LineNr">262 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L263" class="LineNr">263 </span> <span class="subxS2Comment"># . . call</span>
<span id="L264" class="LineNr">264 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L264" class="LineNr">264 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L265" class="LineNr">265 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L266" class="LineNr">266 </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="L267" class="LineNr">267 </span> <span class="subxComment"># clear-stream(_test-tmp-stream)</span>
<span id="L268" class="LineNr">268 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L269" class="LineNr">269 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L269" class="LineNr">269 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L270" class="LineNr">270 </span> <span class="subxS2Comment"># . . call</span>
<span id="L271" class="LineNr">271 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L271" class="LineNr">271 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L272" class="LineNr">272 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L273" class="LineNr">273 </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="L274" class="LineNr">274 </span> <span class="subxComment"># write(_test-stream, &quot;Ab&quot;)</span>
<span id="L275" class="LineNr">275 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L276" class="LineNr">276 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L277" class="LineNr">277 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L277" class="LineNr">277 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L278" class="LineNr">278 </span> <span class="subxS2Comment"># . . call</span>
<span id="L279" class="LineNr">279 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L279" class="LineNr">279 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L280" class="LineNr">280 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L281" class="LineNr">281 </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="L282" class="LineNr">282 </span> <span class="subxComment"># eax = read(_test-stream, _test-tmp-stream)</span>
<span id="L283" class="LineNr">283 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L284" class="LineNr">284 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L285" class="LineNr">285 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L284" class="LineNr">284 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L285" class="LineNr">285 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L286" class="LineNr">286 </span> <span class="subxS2Comment"># . . call</span>
<span id="L287" class="LineNr">287 </span> e8/call <a href='060read.subx.html#L48'>read</a>/disp32
<span id="L287" class="LineNr">287 </span> e8/call <a href='111read.subx.html#L48'>read</a>/disp32
<span id="L288" class="LineNr">288 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L289" class="LineNr">289 </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="L290" class="LineNr">290 </span> <span class="subxComment"># check-ints-equal(eax, 2, msg)</span>
<span id="L291" class="LineNr">291 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L292" class="LineNr">292 </span> 68/push <span class="Constant">&quot;F - <a href='060read.subx.html#L258'>test-read-single</a>: return value&quot;</span>/imm32
<span id="L292" class="LineNr">292 </span> 68/push <span class="Constant">&quot;F - <a href='111read.subx.html#L258'>test-read-single</a>: return value&quot;</span>/imm32
<span id="L293" class="LineNr">293 </span> 68/push 2/imm32
<span id="L294" class="LineNr">294 </span> 50/push-eax
<span id="L295" class="LineNr">295 </span> <span class="subxS2Comment"># . . call</span>
<span id="L296" class="LineNr">296 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L296" class="LineNr">296 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L297" class="LineNr">297 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L298" class="LineNr">298 </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="L299" class="LineNr">299 </span> <span class="subxComment"># check-stream-equal(_test-tmp-stream, &quot;Ab&quot;, msg)</span>
<span id="L300" class="LineNr">300 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L301" class="LineNr">301 </span> 68/push <span class="Constant">&quot;F - test-read-single&quot;</span>/imm32
<span id="L302" class="LineNr">302 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L303" class="LineNr">303 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L303" class="LineNr">303 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L304" class="LineNr">304 </span> <span class="subxS2Comment"># . . call</span>
<span id="L305" class="LineNr">305 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L305" class="LineNr">305 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L306" class="LineNr">306 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L307" class="LineNr">307 </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="L308" class="LineNr">308 </span> <span class="subxComment"># end</span>
@ -373,57 +373,57 @@ if ('onhashchange' in window) {
<span id="L312" class="LineNr">312 </span> <span class="subxH1Comment"># - make two consecutive reads, check that their results are appended</span>
<span id="L313" class="LineNr">313 </span> <span class="subxComment"># clear-stream(_test-stream)</span>
<span id="L314" class="LineNr">314 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L315" class="LineNr">315 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L315" class="LineNr">315 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L316" class="LineNr">316 </span> <span class="subxS2Comment"># . . call</span>
<span id="L317" class="LineNr">317 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L317" class="LineNr">317 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L318" class="LineNr">318 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L319" class="LineNr">319 </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="L320" class="LineNr">320 </span> <span class="subxComment"># clear-stream(_test-tmp-stream)</span>
<span id="L321" class="LineNr">321 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L322" class="LineNr">322 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L322" class="LineNr">322 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L323" class="LineNr">323 </span> <span class="subxS2Comment"># . . call</span>
<span id="L324" class="LineNr">324 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L324" class="LineNr">324 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L325" class="LineNr">325 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L326" class="LineNr">326 </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="L327" class="LineNr">327 </span> <span class="subxComment"># write(_test-stream, &quot;C&quot;)</span>
<span id="L328" class="LineNr">328 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L329" class="LineNr">329 </span> 68/push <span class="Constant">&quot;C&quot;</span>/imm32
<span id="L330" class="LineNr">330 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L330" class="LineNr">330 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L331" class="LineNr">331 </span> <span class="subxS2Comment"># . . call</span>
<span id="L332" class="LineNr">332 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L332" class="LineNr">332 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L333" class="LineNr">333 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L334" class="LineNr">334 </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="L335" class="LineNr">335 </span> <span class="subxComment"># read(_test-stream, _test-tmp-stream)</span>
<span id="L336" class="LineNr">336 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L337" class="LineNr">337 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L338" class="LineNr">338 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L337" class="LineNr">337 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L338" class="LineNr">338 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L339" class="LineNr">339 </span> <span class="subxS2Comment"># . . call</span>
<span id="L340" class="LineNr">340 </span> e8/call <a href='060read.subx.html#L48'>read</a>/disp32
<span id="L340" class="LineNr">340 </span> e8/call <a href='111read.subx.html#L48'>read</a>/disp32
<span id="L341" class="LineNr">341 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L342" class="LineNr">342 </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="L343" class="LineNr">343 </span> <span class="subxComment"># write(_test-stream, &quot;D&quot;)</span>
<span id="L344" class="LineNr">344 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L345" class="LineNr">345 </span> 68/push <span class="Constant">&quot;D&quot;</span>/imm32
<span id="L346" class="LineNr">346 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L346" class="LineNr">346 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L347" class="LineNr">347 </span> <span class="subxS2Comment"># . . call</span>
<span id="L348" class="LineNr">348 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L348" class="LineNr">348 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L349" class="LineNr">349 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L350" class="LineNr">350 </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="L351" class="LineNr">351 </span> <span class="subxComment"># read(_test-stream, _test-tmp-stream)</span>
<span id="L352" class="LineNr">352 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L353" class="LineNr">353 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L354" class="LineNr">354 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L353" class="LineNr">353 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L354" class="LineNr">354 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L355" class="LineNr">355 </span> <span class="subxS2Comment"># . . call</span>
<span id="L356" class="LineNr">356 </span> e8/call <a href='060read.subx.html#L48'>read</a>/disp32
<span id="L356" class="LineNr">356 </span> e8/call <a href='111read.subx.html#L48'>read</a>/disp32
<span id="L357" class="LineNr">357 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L358" class="LineNr">358 </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="L359" class="LineNr">359 </span> <span class="subxComment"># check-stream-equal(_test-tmp-stream, &quot;CD&quot;, msg)</span>
<span id="L360" class="LineNr">360 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L361" class="LineNr">361 </span> 68/push <span class="Constant">&quot;F - test-read-is-stateful&quot;</span>/imm32
<span id="L362" class="LineNr">362 </span> 68/push <span class="Constant">&quot;CD&quot;</span>/imm32
<span id="L363" class="LineNr">363 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L363" class="LineNr">363 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L364" class="LineNr">364 </span> <span class="subxS2Comment"># . . call</span>
<span id="L365" class="LineNr">365 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L365" class="LineNr">365 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L366" class="LineNr">366 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L367" class="LineNr">367 </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="L368" class="LineNr">368 </span> <span class="subxComment"># end</span>
@ -434,42 +434,42 @@ if ('onhashchange' in window) {
<span id="L373" class="LineNr">373 </span> <span class="subxComment"># setup</span>
<span id="L374" class="LineNr">374 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L375" class="LineNr">375 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L376" class="LineNr">376 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L376" class="LineNr">376 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L377" class="LineNr">377 </span> <span class="subxS2Comment"># . . call</span>
<span id="L378" class="LineNr">378 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L378" class="LineNr">378 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L379" class="LineNr">379 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L380" class="LineNr">380 </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="L381" class="LineNr">381 </span> <span class="subxS1Comment"># . clear-stream(_test-tmp-stream)</span>
<span id="L382" class="LineNr">382 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L383" class="LineNr">383 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L383" class="LineNr">383 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L384" class="LineNr">384 </span> <span class="subxS2Comment"># . . call</span>
<span id="L385" class="LineNr">385 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L385" class="LineNr">385 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L386" class="LineNr">386 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L387" class="LineNr">387 </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="L388" class="LineNr">388 </span> <span class="subxS1Comment"># . write(_test-stream, &quot;Ab&quot;)</span>
<span id="L389" class="LineNr">389 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L390" class="LineNr">390 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L391" class="LineNr">391 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L391" class="LineNr">391 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L392" class="LineNr">392 </span> <span class="subxS2Comment"># . . call</span>
<span id="L393" class="LineNr">393 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L393" class="LineNr">393 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L394" class="LineNr">394 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L395" class="LineNr">395 </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="L396" class="LineNr">396 </span> <span class="subxComment"># first read gets to end-of-file</span>
<span id="L397" class="LineNr">397 </span> <span class="subxS1Comment"># . read(_test-stream, _test-tmp-stream)</span>
<span id="L398" class="LineNr">398 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L399" class="LineNr">399 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L400" class="LineNr">400 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L399" class="LineNr">399 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L400" class="LineNr">400 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L401" class="LineNr">401 </span> <span class="subxS2Comment"># . . call</span>
<span id="L402" class="LineNr">402 </span> e8/call <a href='060read.subx.html#L48'>read</a>/disp32
<span id="L402" class="LineNr">402 </span> e8/call <a href='111read.subx.html#L48'>read</a>/disp32
<span id="L403" class="LineNr">403 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L404" class="LineNr">404 </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="L405" class="LineNr">405 </span> <span class="subxComment"># second read</span>
<span id="L406" class="LineNr">406 </span> <span class="subxS1Comment"># . read(_test-stream, _test-tmp-stream)</span>
<span id="L407" class="LineNr">407 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L408" class="LineNr">408 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L409" class="LineNr">409 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L408" class="LineNr">408 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L409" class="LineNr">409 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L410" class="LineNr">410 </span> <span class="subxS2Comment"># . . call</span>
<span id="L411" class="LineNr">411 </span> e8/call <a href='060read.subx.html#L48'>read</a>/disp32
<span id="L411" class="LineNr">411 </span> e8/call <a href='111read.subx.html#L48'>read</a>/disp32
<span id="L412" class="LineNr">412 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L413" class="LineNr">413 </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="L414" class="LineNr">414 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -478,7 +478,7 @@ if ('onhashchange' in window) {
<span id="L417" class="LineNr">417 </span> 68/push 0/imm32
<span id="L418" class="LineNr">418 </span> 50/push-eax
<span id="L419" class="LineNr">419 </span> <span class="subxS2Comment"># . . call</span>
<span id="L420" class="LineNr">420 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L420" class="LineNr">420 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L421" class="LineNr">421 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L422" class="LineNr">422 </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="L423" class="LineNr">423 </span> <span class="subxComment"># end</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 061read-byte.subx</title>
<title>Mu - 112read-byte.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -58,7 +58,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/061read-byte.subx'>https://github.com/akkartik/mu/blob/master/061read-byte.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/112read-byte.subx'>https://github.com/akkartik/mu/blob/master/112read-byte.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># read-byte-buffered: one higher-level abstraction atop 'read'.</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment">#</span>
@ -116,7 +116,7 @@ if ('onhashchange' in window) {
<span id="L54" class="LineNr"> 54 </span> 8d/copy-address 1/mod/*+disp8 6/rm32/esi <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy esi+4 to eax</span>
<span id="L55" class="LineNr"> 55 </span> 50/push-eax
<span id="L56" class="LineNr"> 56 </span> <span class="subxS2Comment"># . . call</span>
<span id="L57" class="LineNr"> 57 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L57" class="LineNr"> 57 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L58" class="LineNr"> 58 </span> <span class="subxS2Comment"># . . discard args</span>
<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> 4/imm32 <span class="subxComment"># add to esp</span>
<span id="L60" class="LineNr"> 60 </span> <span class="subxS1Comment"># . f-&gt;read must now be 0; update its cache at ecx</span>
@ -126,7 +126,7 @@ if ('onhashchange' in window) {
<span id="L64" class="LineNr"> 64 </span> 50/push-eax
<span id="L65" class="LineNr"> 65 </span> ff 6/subop/push 0/mod/indirect 6/rm32/esi <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 *esi</span>
<span id="L66" class="LineNr"> 66 </span> <span class="subxS2Comment"># . . call</span>
<span id="L67" class="LineNr"> 67 </span> e8/call <a href='060read.subx.html#L48'>read</a>/disp32
<span id="L67" class="LineNr"> 67 </span> e8/call <a href='111read.subx.html#L48'>read</a>/disp32
<span id="L68" class="LineNr"> 68 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L69" class="LineNr"> 69 </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="L70" class="LineNr"> 70 </span> <span class="subxComment"># if (eax == 0) return 0xffffffff</span>
@ -156,31 +156,31 @@ if ('onhashchange' in window) {
<span id="L94" class="LineNr"> 94 </span> <span class="subxComment"># setup</span>
<span id="L95" class="LineNr"> 95 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L96" class="LineNr"> 96 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L97" class="LineNr"> 97 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L97" class="LineNr"> 97 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L98" class="LineNr"> 98 </span> <span class="subxS2Comment"># . . call</span>
<span id="L99" class="LineNr"> 99 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L99" class="LineNr"> 99 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L100" class="LineNr">100 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L101" class="LineNr">101 </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="L102" class="LineNr">102 </span> <span class="subxS1Comment"># . clear-stream(_test-buffered-file-&gt;buffer)</span>
<span id="L103" class="LineNr">103 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L104" class="LineNr">104 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L105" class="LineNr">105 </span> <span class="subxS2Comment"># . . call</span>
<span id="L106" class="LineNr">106 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L106" class="LineNr">106 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L107" class="LineNr">107 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L108" class="LineNr">108 </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="L109" class="LineNr">109 </span> <span class="subxS1Comment"># . write(_test-stream, &quot;Ab&quot;)</span>
<span id="L110" class="LineNr">110 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L111" class="LineNr">111 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L112" class="LineNr">112 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L112" class="LineNr">112 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L113" class="LineNr">113 </span> <span class="subxS2Comment"># . . call</span>
<span id="L114" class="LineNr">114 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L114" class="LineNr">114 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L115" class="LineNr">115 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L116" class="LineNr">116 </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="L117" class="LineNr">117 </span> <span class="subxComment"># read-byte-buffered(_test-buffered-file)</span>
<span id="L118" class="LineNr">118 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L119" class="LineNr">119 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L119" class="LineNr">119 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L120" class="LineNr">120 </span> <span class="subxS2Comment"># . . call</span>
<span id="L121" class="LineNr">121 </span> e8/call <a href='061read-byte.subx.html#L38'>read-byte-buffered</a>/disp32
<span id="L121" class="LineNr">121 </span> e8/call <a href='112read-byte.subx.html#L38'>read-byte-buffered</a>/disp32
<span id="L122" class="LineNr">122 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L123" class="LineNr">123 </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="L124" class="LineNr">124 </span> <span class="subxComment"># check-ints-equal(eax, 'A', msg)</span>
@ -189,7 +189,7 @@ if ('onhashchange' in window) {
<span id="L127" class="LineNr">127 </span> 68/push 0x41/imm32
<span id="L128" class="LineNr">128 </span> 50/push-eax
<span id="L129" class="LineNr">129 </span> <span class="subxS2Comment"># . . call</span>
<span id="L130" class="LineNr">130 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L130" class="LineNr">130 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L131" class="LineNr">131 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L132" class="LineNr">132 </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="L133" class="LineNr">133 </span> <span class="subxS1Comment"># . end</span>
@ -200,38 +200,38 @@ if ('onhashchange' in window) {
<span id="L138" class="LineNr">138 </span> <span class="subxComment"># setup</span>
<span id="L139" class="LineNr">139 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L140" class="LineNr">140 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L141" class="LineNr">141 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L141" class="LineNr">141 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L142" class="LineNr">142 </span> <span class="subxS2Comment"># . . call</span>
<span id="L143" class="LineNr">143 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L143" class="LineNr">143 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L144" class="LineNr">144 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L145" class="LineNr">145 </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="L146" class="LineNr">146 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L147" class="LineNr">147 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L148" class="LineNr">148 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L149" class="LineNr">149 </span> <span class="subxS2Comment"># . . call</span>
<span id="L150" class="LineNr">150 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L150" class="LineNr">150 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L151" class="LineNr">151 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L152" class="LineNr">152 </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="L153" class="LineNr">153 </span> <span class="subxS1Comment"># . write(_test-stream, &quot;Ab&quot;)</span>
<span id="L154" class="LineNr">154 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L155" class="LineNr">155 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L156" class="LineNr">156 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L156" class="LineNr">156 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L157" class="LineNr">157 </span> <span class="subxS2Comment"># . . call</span>
<span id="L158" class="LineNr">158 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L158" class="LineNr">158 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L159" class="LineNr">159 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L160" class="LineNr">160 </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="L161" class="LineNr">161 </span> <span class="subxComment"># read-byte-buffered(_test-buffered-file)</span>
<span id="L162" class="LineNr">162 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L163" class="LineNr">163 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L163" class="LineNr">163 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L164" class="LineNr">164 </span> <span class="subxS2Comment"># . . call</span>
<span id="L165" class="LineNr">165 </span> e8/call <a href='061read-byte.subx.html#L38'>read-byte-buffered</a>/disp32
<span id="L165" class="LineNr">165 </span> e8/call <a href='112read-byte.subx.html#L38'>read-byte-buffered</a>/disp32
<span id="L166" class="LineNr">166 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L167" class="LineNr">167 </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="L168" class="LineNr">168 </span> <span class="subxComment"># read-byte-buffered(_test-buffered-file)</span>
<span id="L169" class="LineNr">169 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L170" class="LineNr">170 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L170" class="LineNr">170 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L171" class="LineNr">171 </span> <span class="subxS2Comment"># . . call</span>
<span id="L172" class="LineNr">172 </span> e8/call <a href='061read-byte.subx.html#L38'>read-byte-buffered</a>/disp32
<span id="L172" class="LineNr">172 </span> e8/call <a href='112read-byte.subx.html#L38'>read-byte-buffered</a>/disp32
<span id="L173" class="LineNr">173 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L174" class="LineNr">174 </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="L175" class="LineNr">175 </span> <span class="subxComment"># check-ints-equal(eax, 'b', msg)</span>
@ -240,7 +240,7 @@ if ('onhashchange' in window) {
<span id="L178" class="LineNr">178 </span> 68/push 0x62/imm32
<span id="L179" class="LineNr">179 </span> 50/push-eax
<span id="L180" class="LineNr">180 </span> <span class="subxS2Comment"># . . call</span>
<span id="L181" class="LineNr">181 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L181" class="LineNr">181 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L182" class="LineNr">182 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L183" class="LineNr">183 </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="L184" class="LineNr">184 </span> <span class="subxS1Comment"># . end</span>
@ -251,23 +251,23 @@ if ('onhashchange' in window) {
<span id="L189" class="LineNr">189 </span> <span class="subxComment"># setup</span>
<span id="L190" class="LineNr">190 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L191" class="LineNr">191 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L192" class="LineNr">192 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L192" class="LineNr">192 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L193" class="LineNr">193 </span> <span class="subxS2Comment"># . . call</span>
<span id="L194" class="LineNr">194 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L194" class="LineNr">194 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L195" class="LineNr">195 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L196" class="LineNr">196 </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="L197" class="LineNr">197 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L198" class="LineNr">198 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L199" class="LineNr">199 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L200" class="LineNr">200 </span> <span class="subxS2Comment"># . . call</span>
<span id="L201" class="LineNr">201 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L201" class="LineNr">201 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L202" class="LineNr">202 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L203" class="LineNr">203 </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="L204" class="LineNr">204 </span> <span class="subxComment"># read-byte-buffered(_test-buffered-file)</span>
<span id="L205" class="LineNr">205 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L206" class="LineNr">206 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L206" class="LineNr">206 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L207" class="LineNr">207 </span> <span class="subxS2Comment"># . . call</span>
<span id="L208" class="LineNr">208 </span> e8/call <a href='061read-byte.subx.html#L38'>read-byte-buffered</a>/disp32
<span id="L208" class="LineNr">208 </span> e8/call <a href='112read-byte.subx.html#L38'>read-byte-buffered</a>/disp32
<span id="L209" class="LineNr">209 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L210" class="LineNr">210 </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="L211" class="LineNr">211 </span> <span class="subxComment"># check-ints-equal(eax, 0xffffffff, msg)</span>
@ -276,7 +276,7 @@ if ('onhashchange' in window) {
<span id="L214" class="LineNr">214 </span> 68/push 0xffffffff/imm32/Eof
<span id="L215" class="LineNr">215 </span> 50/push-eax
<span id="L216" class="LineNr">216 </span> <span class="subxS2Comment"># . . call</span>
<span id="L217" class="LineNr">217 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L217" class="LineNr">217 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L218" class="LineNr">218 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L219" class="LineNr">219 </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="L220" class="LineNr">220 </span> <span class="subxS1Comment"># . end</span>
@ -287,35 +287,35 @@ if ('onhashchange' in window) {
<span id="L225" class="LineNr">225 </span> <span class="subxComment"># setup</span>
<span id="L226" class="LineNr">226 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L227" class="LineNr">227 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L228" class="LineNr">228 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L228" class="LineNr">228 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L229" class="LineNr">229 </span> <span class="subxS2Comment"># . . call</span>
<span id="L230" class="LineNr">230 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L230" class="LineNr">230 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L231" class="LineNr">231 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L232" class="LineNr">232 </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="L233" class="LineNr">233 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L234" class="LineNr">234 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L235" class="LineNr">235 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L236" class="LineNr">236 </span> <span class="subxS2Comment"># . . call</span>
<span id="L237" class="LineNr">237 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L237" class="LineNr">237 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L238" class="LineNr">238 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L239" class="LineNr">239 </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="L240" class="LineNr">240 </span> <span class="subxS1Comment"># . write(_test-stream, &quot;Abcdefgh&quot;)</span>
<span id="L241" class="LineNr">241 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L242" class="LineNr">242 </span> 68/push <span class="Constant">&quot;Abcdefgh&quot;</span>/imm32
<span id="L243" class="LineNr">243 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L243" class="LineNr">243 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L244" class="LineNr">244 </span> <span class="subxS2Comment"># . . call</span>
<span id="L245" class="LineNr">245 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L245" class="LineNr">245 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L246" class="LineNr">246 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L247" class="LineNr">247 </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="L248" class="LineNr">248 </span> <span class="subxComment"># pretend buffer is full</span>
<span id="L249" class="LineNr">249 </span> <span class="subxS1Comment"># . _test-buffered-file-&gt;read = 6 # &gt;= _test-buffered-file-&gt;size</span>
<span id="L250" class="LineNr">250 </span> b8/copy-to-eax <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L250" class="LineNr">250 </span> b8/copy-to-eax <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L251" class="LineNr">251 </span> c7 0/subop/copy 1/mod/*+disp8 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 8/disp8 6/imm32 <span class="subxComment"># copy to *(eax+8)</span>
<span id="L252" class="LineNr">252 </span> <span class="subxComment"># read-byte-buffered(_test-buffered-file)</span>
<span id="L253" class="LineNr">253 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L254" class="LineNr">254 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L254" class="LineNr">254 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L255" class="LineNr">255 </span> <span class="subxS2Comment"># . . call</span>
<span id="L256" class="LineNr">256 </span> e8/call <a href='061read-byte.subx.html#L38'>read-byte-buffered</a>/disp32
<span id="L256" class="LineNr">256 </span> e8/call <a href='112read-byte.subx.html#L38'>read-byte-buffered</a>/disp32
<span id="L257" class="LineNr">257 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L258" class="LineNr">258 </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="L259" class="LineNr">259 </span> <span class="subxComment"># check-ints-equal(eax, 'A', msg)</span>
@ -324,7 +324,7 @@ if ('onhashchange' in window) {
<span id="L262" class="LineNr">262 </span> 68/push 0x41/imm32
<span id="L263" class="LineNr">263 </span> 50/push-eax
<span id="L264" class="LineNr">264 </span> <span class="subxS2Comment"># . . call</span>
<span id="L265" class="LineNr">265 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L265" class="LineNr">265 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L266" class="LineNr">266 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L267" class="LineNr">267 </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="L268" class="LineNr">268 </span> <span class="subxS1Comment"># . end</span>
@ -335,7 +335,7 @@ if ('onhashchange' in window) {
<span id="L273" class="LineNr">273 </span><span class="subxComment"># a test buffered file for _test-stream</span>
<span id="L274" class="LineNr">274 </span><span class="subxMinorFunction">_test-buffered-file</span>: <span class="subxComment"># buffered-file</span>
<span id="L275" class="LineNr">275 </span> <span class="subxComment"># file descriptor or (addr stream byte)</span>
<span id="L276" class="LineNr">276 </span> <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L276" class="LineNr">276 </span> <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L277" class="LineNr">277 </span><span class="Constant">$_test-buffered-file-&gt;buffer</span>:
<span id="L278" class="LineNr">278 </span> <span class="subxComment"># current write index</span>
<span id="L279" class="LineNr">279 </span> 0/imm32
@ -374,7 +374,7 @@ if ('onhashchange' in window) {
<span id="L312" class="LineNr">312 </span><span class="subxComment"># a test buffered file for _test-input-stream</span>
<span id="L313" class="LineNr">313 </span><span class="subxMinorFunction">_test-input-buffered-file</span>: <span class="subxComment"># buffered-file</span>
<span id="L314" class="LineNr">314 </span> <span class="subxComment"># file descriptor or (addr stream byte)</span>
<span id="L315" class="LineNr">315 </span> <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L315" class="LineNr">315 </span> <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L316" class="LineNr">316 </span><span class="Constant">$_test-input-buffered-file-&gt;buffer</span>:
<span id="L317" class="LineNr">317 </span> <span class="subxComment"># current write index</span>
<span id="L318" class="LineNr">318 </span> 0/imm32

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 062write-stream.subx</title>
<title>Mu - 113write-stream.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -57,7 +57,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/062write-stream.subx'>https://github.com/akkartik/mu/blob/master/062write-stream.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/113write-stream.subx'>https://github.com/akkartik/mu/blob/master/113write-stream.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># write-stream: like write, but write streams rather than strings</span>
<span id="L2" class="LineNr"> 2 </span>
@ -86,7 +86,7 @@ if ('onhashchange' in window) {
<span id="L25" class="LineNr"> 25 </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="L26" class="LineNr"> 26 </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="L27" class="LineNr"> 27 </span> <span class="subxS2Comment"># . . call</span>
<span id="L28" class="LineNr"> 28 </span> e8/call <a href='062write-stream.subx.html#L77'>_write-stream</a>/disp32
<span id="L28" class="LineNr"> 28 </span> e8/call <a href='113write-stream.subx.html#L77'>_write-stream</a>/disp32
<span id="L29" class="LineNr"> 29 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L30" class="LineNr"> 30 </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="L31" class="LineNr"> 31 </span> eb/jump $write-stream:end/disp8
@ -118,7 +118,7 @@ if ('onhashchange' in window) {
<span id="L57" class="LineNr"> 57 </span> 8d/copy-address 1/mod/*+disp8 4/rm32/sib 7/base/edi 0/index/eax <span class="Normal"> . </span> 0/r32/eax 0xc/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy edi+eax+12 to eax</span>
<span id="L58" class="LineNr"> 58 </span> 50/push-eax
<span id="L59" class="LineNr"> 59 </span> <span class="subxS2Comment"># . . call</span>
<span id="L60" class="LineNr"> 60 </span> e8/call <a href='056trace.subx.html#L897'>_append-4</a>/disp32
<span id="L60" class="LineNr"> 60 </span> e8/call <a href='107trace.subx.html#L897'>_append-4</a>/disp32
<span id="L61" class="LineNr"> 61 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L62" class="LineNr"> 62 </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> 0x10/imm32 <span class="subxComment"># add to esp</span>
<span id="L63" class="LineNr"> 63 </span> <span class="subxComment"># f-&gt;write += eax</span>
@ -181,10 +181,10 @@ if ('onhashchange' in window) {
<span id="L120" class="LineNr">120 </span><span class="Constant">$_write-stream:abort</span>:
<span id="L121" class="LineNr">121 </span> <span class="subxS1Comment"># . _write(2/stderr, error)</span>
<span id="L122" class="LineNr">122 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L123" class="LineNr">123 </span> 68/push <span class="Constant">&quot;_write-stream: failed to <a href='057write.subx.html#L24'>write</a> to file\n&quot;</span>/imm32
<span id="L123" class="LineNr">123 </span> 68/push <span class="Constant">&quot;_write-stream: failed to <a href='108write.subx.html#L24'>write</a> to file\n&quot;</span>/imm32
<span id="L124" class="LineNr">124 </span> 68/push 2/imm32/stderr
<span id="L125" class="LineNr">125 </span> <span class="subxS2Comment"># . . call</span>
<span id="L126" class="LineNr">126 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L126" class="LineNr">126 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L127" class="LineNr">127 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L128" class="LineNr">128 </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="L129" class="LineNr">129 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -196,41 +196,41 @@ if ('onhashchange' in window) {
<span id="L135" class="LineNr">135 </span> <span class="subxComment"># setup</span>
<span id="L136" class="LineNr">136 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L137" class="LineNr">137 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L138" class="LineNr">138 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L138" class="LineNr">138 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L139" class="LineNr">139 </span> <span class="subxS2Comment"># . . call</span>
<span id="L140" class="LineNr">140 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L140" class="LineNr">140 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L141" class="LineNr">141 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L142" class="LineNr">142 </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="L143" class="LineNr">143 </span> <span class="subxS1Comment"># . clear-stream(_test-stream2)</span>
<span id="L144" class="LineNr">144 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L145" class="LineNr">145 </span> 68/push <a href='062write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L145" class="LineNr">145 </span> 68/push <a href='113write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L146" class="LineNr">146 </span> <span class="subxS2Comment"># . . call</span>
<span id="L147" class="LineNr">147 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L147" class="LineNr">147 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L148" class="LineNr">148 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L149" class="LineNr">149 </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="L150" class="LineNr">150 </span> <span class="subxS1Comment"># . write(_test-stream2, &quot;Ab&quot;)</span>
<span id="L151" class="LineNr">151 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L152" class="LineNr">152 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L153" class="LineNr">153 </span> 68/push <a href='062write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L153" class="LineNr">153 </span> 68/push <a href='113write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L154" class="LineNr">154 </span> <span class="subxS2Comment"># . . call</span>
<span id="L155" class="LineNr">155 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L155" class="LineNr">155 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L156" class="LineNr">156 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L157" class="LineNr">157 </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="L158" class="LineNr">158 </span> <span class="subxComment"># write-stream(_test-stream, _test-stream2)</span>
<span id="L159" class="LineNr">159 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L160" class="LineNr">160 </span> 68/push <a href='062write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L161" class="LineNr">161 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L160" class="LineNr">160 </span> 68/push <a href='113write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L161" class="LineNr">161 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L162" class="LineNr">162 </span> <span class="subxS2Comment"># . . call</span>
<span id="L163" class="LineNr">163 </span> e8/call <a href='062write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L163" class="LineNr">163 </span> e8/call <a href='113write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L164" class="LineNr">164 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L165" class="LineNr">165 </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="L166" class="LineNr">166 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;Ab&quot;, msg)</span>
<span id="L167" class="LineNr">167 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L168" class="LineNr">168 </span> 68/push <span class="Constant">&quot;F - test-write-stream-single&quot;</span>/imm32
<span id="L169" class="LineNr">169 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L170" class="LineNr">170 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L170" class="LineNr">170 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L171" class="LineNr">171 </span> <span class="subxS2Comment"># . . call</span>
<span id="L172" class="LineNr">172 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L172" class="LineNr">172 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L173" class="LineNr">173 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L174" class="LineNr">174 </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="L175" class="LineNr">175 </span> <span class="subxS1Comment"># . end</span>
@ -240,59 +240,59 @@ if ('onhashchange' in window) {
<span id="L179" class="LineNr">179 </span> <span class="subxComment"># setup</span>
<span id="L180" class="LineNr">180 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L181" class="LineNr">181 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L182" class="LineNr">182 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L182" class="LineNr">182 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L183" class="LineNr">183 </span> <span class="subxS2Comment"># . . call</span>
<span id="L184" class="LineNr">184 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L184" class="LineNr">184 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L185" class="LineNr">185 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L186" class="LineNr">186 </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="L187" class="LineNr">187 </span> <span class="subxS1Comment"># . clear-stream(_test-stream2)</span>
<span id="L188" class="LineNr">188 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L189" class="LineNr">189 </span> 68/push <a href='062write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L189" class="LineNr">189 </span> 68/push <a href='113write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L190" class="LineNr">190 </span> <span class="subxS2Comment"># . . call</span>
<span id="L191" class="LineNr">191 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L191" class="LineNr">191 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L192" class="LineNr">192 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L193" class="LineNr">193 </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="L194" class="LineNr">194 </span> <span class="subxS1Comment"># . write(_test-stream2, &quot;C&quot;)</span>
<span id="L195" class="LineNr">195 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L196" class="LineNr">196 </span> 68/push <span class="Constant">&quot;C&quot;</span>/imm32
<span id="L197" class="LineNr">197 </span> 68/push <a href='062write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L197" class="LineNr">197 </span> 68/push <a href='113write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L198" class="LineNr">198 </span> <span class="subxS2Comment"># . . call</span>
<span id="L199" class="LineNr">199 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L199" class="LineNr">199 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L200" class="LineNr">200 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L201" class="LineNr">201 </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="L202" class="LineNr">202 </span> <span class="subxComment"># first write</span>
<span id="L203" class="LineNr">203 </span> <span class="subxS1Comment"># . write-stream(_test-stream, _test-stream2)</span>
<span id="L204" class="LineNr">204 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L205" class="LineNr">205 </span> 68/push <a href='062write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L206" class="LineNr">206 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L205" class="LineNr">205 </span> 68/push <a href='113write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L206" class="LineNr">206 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L207" class="LineNr">207 </span> <span class="subxS2Comment"># . . call</span>
<span id="L208" class="LineNr">208 </span> e8/call <a href='062write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L208" class="LineNr">208 </span> e8/call <a href='113write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L209" class="LineNr">209 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L210" class="LineNr">210 </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="L211" class="LineNr">211 </span> <span class="subxComment"># second write</span>
<span id="L212" class="LineNr">212 </span> <span class="subxS1Comment"># . write(_test-stream2, &quot;D&quot;)</span>
<span id="L213" class="LineNr">213 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L214" class="LineNr">214 </span> 68/push <span class="Constant">&quot;D&quot;</span>/imm32
<span id="L215" class="LineNr">215 </span> 68/push <a href='062write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L215" class="LineNr">215 </span> 68/push <a href='113write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L216" class="LineNr">216 </span> <span class="subxS2Comment"># . . call</span>
<span id="L217" class="LineNr">217 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L217" class="LineNr">217 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L218" class="LineNr">218 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L219" class="LineNr">219 </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="L220" class="LineNr">220 </span> <span class="subxS1Comment"># . write-stream(_test-stream, _test-stream2)</span>
<span id="L221" class="LineNr">221 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L222" class="LineNr">222 </span> 68/push <a href='062write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L223" class="LineNr">223 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L222" class="LineNr">222 </span> 68/push <a href='113write-stream.subx.html#L242'>_test-stream2</a>/imm32
<span id="L223" class="LineNr">223 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L224" class="LineNr">224 </span> <span class="subxS2Comment"># . . call</span>
<span id="L225" class="LineNr">225 </span> e8/call <a href='062write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L225" class="LineNr">225 </span> e8/call <a href='113write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L226" class="LineNr">226 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L227" class="LineNr">227 </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="L228" class="LineNr">228 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;CD&quot;, msg)</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">&quot;F - test-write-stream-appends&quot;</span>/imm32
<span id="L231" class="LineNr">231 </span> 68/push <span class="Constant">&quot;CD&quot;</span>/imm32
<span id="L232" class="LineNr">232 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L232" class="LineNr">232 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L233" class="LineNr">233 </span> <span class="subxS2Comment"># . . call</span>
<span id="L234" class="LineNr">234 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L234" class="LineNr">234 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L235" class="LineNr">235 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L236" class="LineNr">236 </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="L237" class="LineNr">237 </span> <span class="subxS1Comment"># . end</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 063error.subx</title>
<title>Mu - 114error.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -55,7 +55,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/063error.subx'>https://github.com/akkartik/mu/blob/master/063error.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/114error.subx'>https://github.com/akkartik/mu/blob/master/114error.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Print an error message and exit.</span>
<span id="L2" class="LineNr"> 2 </span>
@ -74,7 +74,7 @@ if ('onhashchange' in window) {
<span id="L15" class="LineNr">15 </span> 68/push <span class="Constant">&quot;Error: &quot;</span>/imm32
<span id="L16" class="LineNr">16 </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="L17" class="LineNr">17 </span> <span class="subxS2Comment"># . . call</span>
<span id="L18" class="LineNr">18 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L18" class="LineNr">18 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L19" class="LineNr">19 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L20" class="LineNr">20 </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="L21" class="LineNr">21 </span> <span class="subxComment"># write(out, msg)</span>
@ -82,15 +82,15 @@ if ('onhashchange' in window) {
<span id="L23" class="LineNr">23 </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> 0x10/disp8 <span class="Normal"> . </span> <span class="subxComment"># push *(ebp+16)</span>
<span id="L24" class="LineNr">24 </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="L25" class="LineNr">25 </span> <span class="subxS2Comment"># . . call</span>
<span id="L26" class="LineNr">26 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L26" class="LineNr">26 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L27" class="LineNr">27 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L28" class="LineNr">28 </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="L29" class="LineNr">29 </span> <span class="subxComment"># write(out, &quot;\n&quot;)</span>
<span id="L30" class="LineNr">30 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L31" class="LineNr">31 </span> 68/push <span class="SpecialChar"><a href='051test.subx.html#L82'>Newline</a></span>/imm32
<span id="L31" class="LineNr">31 </span> 68/push <span class="SpecialChar"><a href='102test.subx.html#L82'>Newline</a></span>/imm32
<span id="L32" class="LineNr">32 </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="L33" class="LineNr">33 </span> <span class="subxS2Comment"># . . call</span>
<span id="L34" class="LineNr">34 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L34" class="LineNr">34 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L35" class="LineNr">35 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L36" class="LineNr">36 </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="L37" class="LineNr">37 </span> <span class="subxComment"># stop(ed, 1)</span>
@ -98,7 +98,7 @@ if ('onhashchange' in window) {
<span id="L39" class="LineNr">39 </span> 68/push 1/imm32
<span id="L40" class="LineNr">40 </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="L41" class="LineNr">41 </span> <span class="subxS2Comment"># . . call</span>
<span id="L42" class="LineNr">42 </span> e8/call <a href='059stop.subx.html#L92'>stop</a>/disp32
<span id="L42" class="LineNr">42 </span> e8/call <a href='110stop.subx.html#L92'>stop</a>/disp32
<span id="L43" class="LineNr">43 </span> <span class="subxComment"># should never get past this point</span>
<span id="L44" class="LineNr">44 </span><span class="Constant">$error:dead-end</span>:
<span id="L45" class="LineNr">45 </span> <span class="subxS1Comment"># . epilogue</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 064write-byte.subx</title>
<title>Mu - 115write-byte.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -58,7 +58,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/064write-byte.subx'>https://github.com/akkartik/mu/blob/master/064write-byte.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/115write-byte.subx'>https://github.com/akkartik/mu/blob/master/115write-byte.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># write-byte-buffered: add a single byte to a buffered-file.</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># flush: write out any buffered writes to disk.</span>
@ -110,7 +110,7 @@ if ('onhashchange' in window) {
<span id="L48" class="LineNr"> 48 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L49" class="LineNr"> 49 </span> 57/push-edi
<span id="L50" class="LineNr"> 50 </span> <span class="subxS2Comment"># . . call</span>
<span id="L51" class="LineNr"> 51 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L51" class="LineNr"> 51 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L52" class="LineNr"> 52 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L53" class="LineNr"> 53 </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="L54" class="LineNr"> 54 </span> <span class="subxS1Comment"># . clear-stream(stream = f+4)</span>
@ -118,7 +118,7 @@ if ('onhashchange' in window) {
<span id="L56" class="LineNr"> 56 </span> 8d/copy-address 1/mod/*+disp8 7/rm32/edi <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy edi+4 to eax</span>
<span id="L57" class="LineNr"> 57 </span> 50/push-eax
<span id="L58" class="LineNr"> 58 </span> <span class="subxS2Comment"># . . call</span>
<span id="L59" class="LineNr"> 59 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L59" class="LineNr"> 59 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L60" class="LineNr"> 60 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L61" class="LineNr"> 61 </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="L62" class="LineNr"> 62 </span> <span class="subxS1Comment"># . f-&gt;write must now be 0; update its cache at ecx</span>
@ -155,7 +155,7 @@ if ('onhashchange' in window) {
<span id="L93" class="LineNr"> 93 </span> 51/push-ecx
<span id="L94" class="LineNr"> 94 </span> ff 6/subop/push 0/mod/indirect 0/rm32/eax <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 *eax</span>
<span id="L95" class="LineNr"> 95 </span> <span class="subxS2Comment"># . . call</span>
<span id="L96" class="LineNr"> 96 </span> e8/call <a href='062write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L96" class="LineNr"> 96 </span> e8/call <a href='113write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L97" class="LineNr"> 97 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L98" class="LineNr"> 98 </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="L99" class="LineNr"> 99 </span><span class="Constant">$flush:end</span>:
@ -172,40 +172,40 @@ if ('onhashchange' in window) {
<span id="L110" class="LineNr">110 </span> <span class="subxComment"># setup</span>
<span id="L111" class="LineNr">111 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L112" class="LineNr">112 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L113" class="LineNr">113 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L113" class="LineNr">113 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L114" class="LineNr">114 </span> <span class="subxS2Comment"># . . call</span>
<span id="L115" class="LineNr">115 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L115" class="LineNr">115 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L116" class="LineNr">116 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L117" class="LineNr">117 </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="L118" class="LineNr">118 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L119" class="LineNr">119 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L120" class="LineNr">120 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L121" class="LineNr">121 </span> <span class="subxS2Comment"># . . call</span>
<span id="L122" class="LineNr">122 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L122" class="LineNr">122 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L123" class="LineNr">123 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L124" class="LineNr">124 </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="L125" class="LineNr">125 </span> <span class="subxComment"># write-byte-buffered(_test-buffered-file, 'A')</span>
<span id="L126" class="LineNr">126 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L127" class="LineNr">127 </span> 68/push 0x41/imm32
<span id="L128" class="LineNr">128 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L128" class="LineNr">128 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L129" class="LineNr">129 </span> <span class="subxS2Comment"># . . call</span>
<span id="L130" class="LineNr">130 </span> e8/call <a href='064write-byte.subx.html#L33'>write-byte-buffered</a>/disp32
<span id="L130" class="LineNr">130 </span> e8/call <a href='115write-byte.subx.html#L33'>write-byte-buffered</a>/disp32
<span id="L131" class="LineNr">131 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L132" class="LineNr">132 </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="L133" class="LineNr">133 </span> <span class="subxComment"># flush(_test-buffered-file)</span>
<span id="L134" class="LineNr">134 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L135" class="LineNr">135 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L135" class="LineNr">135 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L136" class="LineNr">136 </span> <span class="subxS2Comment"># . . call</span>
<span id="L137" class="LineNr">137 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L137" class="LineNr">137 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L138" class="LineNr">138 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L139" class="LineNr">139 </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="L140" class="LineNr">140 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;A&quot;, msg)</span>
<span id="L141" class="LineNr">141 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L142" class="LineNr">142 </span> 68/push <span class="Constant">&quot;F - test-write-byte-buffered-single&quot;</span>/imm32
<span id="L143" class="LineNr">143 </span> 68/push <span class="Constant">&quot;A&quot;</span>/imm32
<span id="L144" class="LineNr">144 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L144" class="LineNr">144 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L145" class="LineNr">145 </span> <span class="subxS2Comment"># . . call</span>
<span id="L146" class="LineNr">146 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L146" class="LineNr">146 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L147" class="LineNr">147 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L148" class="LineNr">148 </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="L149" class="LineNr">149 </span> <span class="subxS1Comment"># . end</span>
@ -216,16 +216,16 @@ if ('onhashchange' in window) {
<span id="L154" class="LineNr">154 </span> <span class="subxComment"># setup</span>
<span id="L155" class="LineNr">155 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L156" class="LineNr">156 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L157" class="LineNr">157 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L157" class="LineNr">157 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L158" class="LineNr">158 </span> <span class="subxS2Comment"># . . call</span>
<span id="L159" class="LineNr">159 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L159" class="LineNr">159 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L160" class="LineNr">160 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L161" class="LineNr">161 </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="L162" class="LineNr">162 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L163" class="LineNr">163 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L164" class="LineNr">164 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L165" class="LineNr">165 </span> <span class="subxS2Comment"># . . call</span>
<span id="L166" class="LineNr">166 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L166" class="LineNr">166 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L167" class="LineNr">167 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L168" class="LineNr">168 </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="L169" class="LineNr">169 </span> <span class="subxComment"># fill up the buffer for _test-buffered-file</span>
@ -234,31 +234,31 @@ if ('onhashchange' in window) {
<span id="L172" class="LineNr">172 </span> 68/push <span class="Constant">&quot;abcdef&quot;</span>/imm32
<span id="L173" class="LineNr">173 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L174" class="LineNr">174 </span> <span class="subxS2Comment"># . . call</span>
<span id="L175" class="LineNr">175 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L175" class="LineNr">175 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L176" class="LineNr">176 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L177" class="LineNr">177 </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="L178" class="LineNr">178 </span> <span class="subxComment"># write-byte-buffered(_test-buffered-file, 'g')</span>
<span id="L179" class="LineNr">179 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L180" class="LineNr">180 </span> 68/push 0x67/imm32
<span id="L181" class="LineNr">181 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L181" class="LineNr">181 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L182" class="LineNr">182 </span> <span class="subxS2Comment"># . . call</span>
<span id="L183" class="LineNr">183 </span> e8/call <a href='064write-byte.subx.html#L33'>write-byte-buffered</a>/disp32
<span id="L183" class="LineNr">183 </span> e8/call <a href='115write-byte.subx.html#L33'>write-byte-buffered</a>/disp32
<span id="L184" class="LineNr">184 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L185" class="LineNr">185 </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="L186" class="LineNr">186 </span> <span class="subxComment"># flush(_test-buffered-file)</span>
<span id="L187" class="LineNr">187 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L188" class="LineNr">188 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L188" class="LineNr">188 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L189" class="LineNr">189 </span> <span class="subxS2Comment"># . . call</span>
<span id="L190" class="LineNr">190 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L190" class="LineNr">190 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L191" class="LineNr">191 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L192" class="LineNr">192 </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="L193" class="LineNr">193 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;abcdefg&quot;, msg)</span>
<span id="L194" class="LineNr">194 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L195" class="LineNr">195 </span> 68/push <span class="Constant">&quot;F - test-write-byte-buffered-multiple-flushes&quot;</span>/imm32
<span id="L196" class="LineNr">196 </span> 68/push <span class="Constant">&quot;abcdefg&quot;</span>/imm32
<span id="L197" class="LineNr">197 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L197" class="LineNr">197 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L198" class="LineNr">198 </span> <span class="subxS2Comment"># . . call</span>
<span id="L199" class="LineNr">199 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L199" class="LineNr">199 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L200" class="LineNr">200 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L201" class="LineNr">201 </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="L202" class="LineNr">202 </span> <span class="subxS1Comment"># . end</span>
@ -304,7 +304,7 @@ if ('onhashchange' in window) {
<span id="L242" class="LineNr">242 </span> 68/push <span class="Constant">&quot;append-byte: out of space\n&quot;</span>/imm32
<span id="L243" class="LineNr">243 </span> 68/push 2/imm32/stderr
<span id="L244" class="LineNr">244 </span> <span class="subxS2Comment"># . . call</span>
<span id="L245" class="LineNr">245 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L245" class="LineNr">245 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L246" class="LineNr">246 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L247" class="LineNr">247 </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="L248" class="LineNr">248 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -317,26 +317,26 @@ if ('onhashchange' in window) {
<span id="L255" class="LineNr">255 </span> <span class="subxComment"># setup</span>
<span id="L256" class="LineNr">256 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L257" class="LineNr">257 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L258" class="LineNr">258 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L258" class="LineNr">258 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L259" class="LineNr">259 </span> <span class="subxS2Comment"># . . call</span>
<span id="L260" class="LineNr">260 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L260" class="LineNr">260 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L261" class="LineNr">261 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L262" class="LineNr">262 </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="L263" class="LineNr">263 </span> <span class="subxComment"># append-byte(_test-stream, 'A')</span>
<span id="L264" class="LineNr">264 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L265" class="LineNr">265 </span> 68/push 0x41/imm32
<span id="L266" class="LineNr">266 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L266" class="LineNr">266 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L267" class="LineNr">267 </span> <span class="subxS2Comment"># . . call</span>
<span id="L268" class="LineNr">268 </span> e8/call <a href='064write-byte.subx.html#L208'>append-byte</a>/disp32
<span id="L268" class="LineNr">268 </span> e8/call <a href='115write-byte.subx.html#L208'>append-byte</a>/disp32
<span id="L269" class="LineNr">269 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L270" class="LineNr">270 </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="L271" class="LineNr">271 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;A&quot;, msg)</span>
<span id="L272" class="LineNr">272 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L273" class="LineNr">273 </span> 68/push <span class="Constant">&quot;F - test-append-byte-single&quot;</span>/imm32
<span id="L274" class="LineNr">274 </span> 68/push <span class="Constant">&quot;A&quot;</span>/imm32
<span id="L275" class="LineNr">275 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L275" class="LineNr">275 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L276" class="LineNr">276 </span> <span class="subxS2Comment"># . . call</span>
<span id="L277" class="LineNr">277 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L277" class="LineNr">277 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L278" class="LineNr">278 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L279" class="LineNr">279 </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="L280" class="LineNr">280 </span> <span class="subxS1Comment"># . end</span>
@ -420,7 +420,7 @@ if ('onhashchange' in window) {
<span id="L358" class="LineNr">358 </span><span class="subxComment"># a test buffered file for _test-output-stream</span>
<span id="L359" class="LineNr">359 </span><span class="subxMinorFunction">_test-output-buffered-file</span>: <span class="subxComment"># buffered-file</span>
<span id="L360" class="LineNr">360 </span> <span class="subxComment"># file descriptor or (addr stream byte)</span>
<span id="L361" class="LineNr">361 </span> <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L361" class="LineNr">361 </span> <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L362" class="LineNr">362 </span><span class="Constant">$_test-output-buffered-file-&gt;buffer</span>:
<span id="L363" class="LineNr">363 </span> <span class="subxComment"># current write index</span>
<span id="L364" class="LineNr">364 </span> 0/imm32
@ -451,7 +451,7 @@ if ('onhashchange' in window) {
<span id="L389" class="LineNr">389 </span><span class="subxComment"># a test buffered file for _test-error-stream</span>
<span id="L390" class="LineNr">390 </span><span class="subxMinorFunction">_test-error-buffered-file</span>: <span class="subxComment"># buffered-file</span>
<span id="L391" class="LineNr">391 </span> <span class="subxComment"># file descriptor or (addr stream byte)</span>
<span id="L392" class="LineNr">392 </span> <a href='064write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L392" class="LineNr">392 </span> <a href='115write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L393" class="LineNr">393 </span><span class="Constant">$_test-error-buffered-file-&gt;buffer</span>:
<span id="L394" class="LineNr">394 </span> <span class="subxComment"># current write index</span>
<span id="L395" class="LineNr">395 </span> 0/imm32

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 065write-buffered.subx</title>
<title>Mu - 116write-buffered.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -57,7 +57,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/065write-buffered.subx'>https://github.com/akkartik/mu/blob/master/065write-buffered.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/116write-buffered.subx'>https://github.com/akkartik/mu/blob/master/116write-buffered.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># write-buffered: like 'write', but for a buffered-file</span>
<span id="L2" class="LineNr"> 2 </span>
@ -123,7 +123,7 @@ if ('onhashchange' in window) {
<span id="L62" class="LineNr"> 62 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L63" class="LineNr"> 63 </span> 57/push-edi
<span id="L64" class="LineNr"> 64 </span> <span class="subxS2Comment"># . . call</span>
<span id="L65" class="LineNr"> 65 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L65" class="LineNr"> 65 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L66" class="LineNr"> 66 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L67" class="LineNr"> 67 </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="L68" class="LineNr"> 68 </span> <span class="subxS1Comment"># . clear-stream(stream = f+4)</span>
@ -131,7 +131,7 @@ if ('onhashchange' in window) {
<span id="L70" class="LineNr"> 70 </span> 8d/copy-address 1/mod/*+disp8 7/rm32/edi <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy edi+4 to eax</span>
<span id="L71" class="LineNr"> 71 </span> 50/push-eax
<span id="L72" class="LineNr"> 72 </span> <span class="subxS2Comment"># . . call</span>
<span id="L73" class="LineNr"> 73 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L73" class="LineNr"> 73 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L74" class="LineNr"> 74 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L75" class="LineNr"> 75 </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="L76" class="LineNr"> 76 </span> <span class="subxS1Comment"># . f-&gt;write must now be 0; update its cache at ebx</span>
@ -170,40 +170,40 @@ if ('onhashchange' in window) {
<span id="L109" class="LineNr">109 </span> <span class="subxComment"># setup</span>
<span id="L110" class="LineNr">110 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L111" class="LineNr">111 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L112" class="LineNr">112 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L112" class="LineNr">112 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L113" class="LineNr">113 </span> <span class="subxS2Comment"># . . call</span>
<span id="L114" class="LineNr">114 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L114" class="LineNr">114 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L115" class="LineNr">115 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L116" class="LineNr">116 </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="L117" class="LineNr">117 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L118" class="LineNr">118 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L119" class="LineNr">119 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L120" class="LineNr">120 </span> <span class="subxS2Comment"># . . call</span>
<span id="L121" class="LineNr">121 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L121" class="LineNr">121 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L122" class="LineNr">122 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L123" class="LineNr">123 </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="L124" class="LineNr">124 </span> <span class="subxComment"># write-buffered(_test-buffered-file, &quot;Abc&quot;)</span>
<span id="L125" class="LineNr">125 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L126" class="LineNr">126 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L127" class="LineNr">127 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L127" class="LineNr">127 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L128" class="LineNr">128 </span> <span class="subxS2Comment"># . . call</span>
<span id="L129" class="LineNr">129 </span> e8/call <a href='065write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L129" class="LineNr">129 </span> e8/call <a href='116write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L130" class="LineNr">130 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L131" class="LineNr">131 </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="L132" class="LineNr">132 </span> <span class="subxComment"># flush(_test-buffered-file)</span>
<span id="L133" class="LineNr">133 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L134" class="LineNr">134 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L134" class="LineNr">134 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L135" class="LineNr">135 </span> <span class="subxS2Comment"># . . call</span>
<span id="L136" class="LineNr">136 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L136" class="LineNr">136 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L137" class="LineNr">137 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L138" class="LineNr">138 </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="L139" class="LineNr">139 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;Abc&quot;, msg)</span>
<span id="L140" class="LineNr">140 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L141" class="LineNr">141 </span> 68/push <span class="Constant">&quot;F - test-write-buffered-single&quot;</span>/imm32
<span id="L142" class="LineNr">142 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L143" class="LineNr">143 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L143" class="LineNr">143 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L144" class="LineNr">144 </span> <span class="subxS2Comment"># . . call</span>
<span id="L145" class="LineNr">145 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L145" class="LineNr">145 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L146" class="LineNr">146 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L147" class="LineNr">147 </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="L148" class="LineNr">148 </span> <span class="subxS1Comment"># . end</span>
@ -214,16 +214,16 @@ if ('onhashchange' in window) {
<span id="L153" class="LineNr">153 </span> <span class="subxComment"># setup</span>
<span id="L154" class="LineNr">154 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L155" class="LineNr">155 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L156" class="LineNr">156 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L156" class="LineNr">156 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L157" class="LineNr">157 </span> <span class="subxS2Comment"># . . call</span>
<span id="L158" class="LineNr">158 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L158" class="LineNr">158 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L159" class="LineNr">159 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L160" class="LineNr">160 </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="L161" class="LineNr">161 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L162" class="LineNr">162 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L163" class="LineNr">163 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L164" class="LineNr">164 </span> <span class="subxS2Comment"># . . call</span>
<span id="L165" class="LineNr">165 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L165" class="LineNr">165 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L166" class="LineNr">166 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L167" class="LineNr">167 </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="L168" class="LineNr">168 </span> <span class="subxComment"># _test-stream can hold 8 bytes, but _test-buffered-file can hold only 6.</span>
@ -231,34 +231,34 @@ if ('onhashchange' in window) {
<span id="L170" class="LineNr">170 </span> <span class="subxS1Comment"># . write-buffered(_test-buffered-file, &quot;Abcdefg&quot;)</span>
<span id="L171" class="LineNr">171 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L172" class="LineNr">172 </span> 68/push <span class="Constant">&quot;Abcdefg&quot;</span>/imm32
<span id="L173" class="LineNr">173 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L173" class="LineNr">173 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L174" class="LineNr">174 </span> <span class="subxS2Comment"># . . call</span>
<span id="L175" class="LineNr">175 </span> e8/call <a href='065write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L175" class="LineNr">175 </span> e8/call <a href='116write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L176" class="LineNr">176 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L177" class="LineNr">177 </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="L178" class="LineNr">178 </span> <span class="subxComment"># don't flush</span>
<span id="L179" class="LineNr">179 </span> <span class="subxComment"># 6 bytes should still have gotten to _test-stream</span>
<span id="L180" class="LineNr">180 </span> <span class="subxS1Comment"># . check-ints-equal(*_test-stream-&gt;write, 6, msg)</span>
<span id="L181" class="LineNr">181 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L182" class="LineNr">182 </span> 68/push <span class="Constant">&quot;F - <a href='065write-buffered.subx.html#L151'>test-write-buffered-with-intermediate-flush</a>: flushed data&quot;</span>/imm32
<span id="L182" class="LineNr">182 </span> 68/push <span class="Constant">&quot;F - <a href='116write-buffered.subx.html#L151'>test-write-buffered-with-intermediate-flush</a>: flushed data&quot;</span>/imm32
<span id="L183" class="LineNr">183 </span> 68/push 6/imm32
<span id="L184" class="LineNr">184 </span> <span class="subxS2Comment"># . . push *_test-stream-&gt;write</span>
<span id="L185" class="LineNr">185 </span> b8/copy-to-eax <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L185" class="LineNr">185 </span> b8/copy-to-eax <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L186" class="LineNr">186 </span> ff 6/subop/push 0/mod/indirect 0/rm32/eax <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 *eax</span>
<span id="L187" class="LineNr">187 </span> <span class="subxS2Comment"># . . call</span>
<span id="L188" class="LineNr">188 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L188" class="LineNr">188 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L189" class="LineNr">189 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L190" class="LineNr">190 </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="L191" class="LineNr">191 </span> <span class="subxComment"># and 1 byte should still be in _test-buffered-file</span>
<span id="L192" class="LineNr">192 </span> <span class="subxS1Comment"># . check-ints-equal(*_test-buffered-file-&gt;write, 1, msg)</span>
<span id="L193" class="LineNr">193 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L194" class="LineNr">194 </span> 68/push <span class="Constant">&quot;F - <a href='065write-buffered.subx.html#L151'>test-write-buffered-with-intermediate-flush</a>: unflushed bytes&quot;</span>/imm32
<span id="L194" class="LineNr">194 </span> 68/push <span class="Constant">&quot;F - <a href='116write-buffered.subx.html#L151'>test-write-buffered-with-intermediate-flush</a>: unflushed bytes&quot;</span>/imm32
<span id="L195" class="LineNr">195 </span> 68/push 1/imm32
<span id="L196" class="LineNr">196 </span> <span class="subxS2Comment"># . . push *_test-buffered-file-&gt;write</span>
<span id="L197" class="LineNr">197 </span> b8/copy-to-eax <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L197" class="LineNr">197 </span> b8/copy-to-eax <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L198" class="LineNr">198 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+4)</span>
<span id="L199" class="LineNr">199 </span> <span class="subxS2Comment"># . . call</span>
<span id="L200" class="LineNr">200 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L200" class="LineNr">200 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L201" class="LineNr">201 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L202" class="LineNr">202 </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="L203" class="LineNr">203 </span> <span class="subxS1Comment"># . end</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 066write-int-hex.subx</title>
<title>Mu - 117write-int-hex.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -57,7 +57,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/066write-int-hex.subx'>https://github.com/akkartik/mu/blob/master/066write-int-hex.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/117write-int-hex.subx'>https://github.com/akkartik/mu/blob/master/117write-int-hex.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Write out the (hex) textual representation of numbers.</span>
<span id="L2" class="LineNr"> 2 </span>
@ -90,26 +90,26 @@ if ('onhashchange' in window) {
<span id="L29" class="LineNr"> 29 </span> c1/shift 5/subop/logic-right 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 4/imm8 <span class="subxComment"># shift eax right by 4 bits, while padding zeroes</span>
<span id="L30" class="LineNr"> 30 </span> 25/and-eax 0xf/imm32
<span id="L31" class="LineNr"> 31 </span> <span class="subxS1Comment"># . AL = to-hex-char(AL)</span>
<span id="L32" class="LineNr"> 32 </span> e8/call <a href='066write-int-hex.subx.html#L9'>to-hex-char</a>/disp32
<span id="L32" class="LineNr"> 32 </span> e8/call <a href='117write-int-hex.subx.html#L9'>to-hex-char</a>/disp32
<span id="L33" class="LineNr"> 33 </span> <span class="subxComment"># append-byte(f, AL)</span>
<span id="L34" class="LineNr"> 34 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L35" class="LineNr"> 35 </span> 50/push-eax
<span id="L36" class="LineNr"> 36 </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="L37" class="LineNr"> 37 </span> <span class="subxS2Comment"># . . call</span>
<span id="L38" class="LineNr"> 38 </span> e8/call <a href='064write-byte.subx.html#L208'>append-byte</a>/disp32
<span id="L38" class="LineNr"> 38 </span> e8/call <a href='115write-byte.subx.html#L208'>append-byte</a>/disp32
<span id="L39" class="LineNr"> 39 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L40" class="LineNr"> 40 </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="L41" class="LineNr"> 41 </span> <span class="subxComment"># AL = convert lower nibble to hex</span>
<span id="L42" class="LineNr"> 42 </span> 8b/copy 1/mod/*+disp8 5/rm32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 0xc/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ebp+12) to eax</span>
<span id="L43" class="LineNr"> 43 </span> 25/and-eax 0xf/imm32
<span id="L44" class="LineNr"> 44 </span> <span class="subxS1Comment"># . AL = to-hex-char(AL)</span>
<span id="L45" class="LineNr"> 45 </span> e8/call <a href='066write-int-hex.subx.html#L9'>to-hex-char</a>/disp32
<span id="L45" class="LineNr"> 45 </span> e8/call <a href='117write-int-hex.subx.html#L9'>to-hex-char</a>/disp32
<span id="L46" class="LineNr"> 46 </span> <span class="subxComment"># append-byte(f, AL)</span>
<span id="L47" class="LineNr"> 47 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L48" class="LineNr"> 48 </span> 50/push-eax
<span id="L49" class="LineNr"> 49 </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="L50" class="LineNr"> 50 </span> <span class="subxS2Comment"># . . call</span>
<span id="L51" class="LineNr"> 51 </span> e8/call <a href='064write-byte.subx.html#L208'>append-byte</a>/disp32
<span id="L51" class="LineNr"> 51 </span> e8/call <a href='115write-byte.subx.html#L208'>append-byte</a>/disp32
<span id="L52" class="LineNr"> 52 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L53" class="LineNr"> 53 </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="L54" class="LineNr"> 54 </span><span class="Constant">$append-byte-hex:end</span>:
@ -125,26 +125,26 @@ if ('onhashchange' in window) {
<span id="L64" class="LineNr"> 64 </span> <span class="subxComment"># setup</span>
<span id="L65" class="LineNr"> 65 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L66" class="LineNr"> 66 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L67" class="LineNr"> 67 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L67" class="LineNr"> 67 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L68" class="LineNr"> 68 </span> <span class="subxS2Comment"># . . call</span>
<span id="L69" class="LineNr"> 69 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L69" class="LineNr"> 69 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L70" class="LineNr"> 70 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L71" class="LineNr"> 71 </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="L72" class="LineNr"> 72 </span> <span class="subxComment"># append-byte-hex(_test-stream, 0xa) # exercises digit, non-digit as well as leading zero</span>
<span id="L73" class="LineNr"> 73 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L74" class="LineNr"> 74 </span> 68/push 0xa/imm32
<span id="L75" class="LineNr"> 75 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L75" class="LineNr"> 75 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L76" class="LineNr"> 76 </span> <span class="subxS2Comment"># . . call</span>
<span id="L77" class="LineNr"> 77 </span> e8/call <a href='066write-int-hex.subx.html#L21'>append-byte-hex</a>/disp32
<span id="L77" class="LineNr"> 77 </span> e8/call <a href='117write-int-hex.subx.html#L21'>append-byte-hex</a>/disp32
<span id="L78" class="LineNr"> 78 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L79" class="LineNr"> 79 </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="L80" class="LineNr"> 80 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;0a&quot;, msg)</span>
<span id="L81" class="LineNr"> 81 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L82" class="LineNr"> 82 </span> 68/push <span class="Constant">&quot;F - test-append-byte-hex&quot;</span>/imm32
<span id="L83" class="LineNr"> 83 </span> 68/push <span class="Constant">&quot;0a&quot;</span>/imm32
<span id="L84" class="LineNr"> 84 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L84" class="LineNr"> 84 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L85" class="LineNr"> 85 </span> <span class="subxS2Comment"># . . call</span>
<span id="L86" class="LineNr"> 86 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L86" class="LineNr"> 86 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L87" class="LineNr"> 87 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L88" class="LineNr"> 88 </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="L89" class="LineNr"> 89 </span> <span class="subxS1Comment"># . end</span>
@ -162,26 +162,26 @@ if ('onhashchange' in window) {
<span id="L101" class="LineNr">101 </span> c1/shift 5/subop/logic-right 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 4/imm8 <span class="subxComment"># shift eax right by 4 bits, while padding zeroes</span>
<span id="L102" class="LineNr">102 </span> 25/and-eax 0xf/imm32
<span id="L103" class="LineNr">103 </span> <span class="subxS1Comment"># . AL = to-hex-char(AL)</span>
<span id="L104" class="LineNr">104 </span> e8/call <a href='066write-int-hex.subx.html#L9'>to-hex-char</a>/disp32
<span id="L104" class="LineNr">104 </span> e8/call <a href='117write-int-hex.subx.html#L9'>to-hex-char</a>/disp32
<span id="L105" class="LineNr">105 </span> <span class="subxComment"># write-byte-buffered(f, AL)</span>
<span id="L106" class="LineNr">106 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L107" class="LineNr">107 </span> 50/push-eax
<span id="L108" class="LineNr">108 </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="L109" class="LineNr">109 </span> <span class="subxS2Comment"># . . call</span>
<span id="L110" class="LineNr">110 </span> e8/call <a href='064write-byte.subx.html#L33'>write-byte-buffered</a>/disp32
<span id="L110" class="LineNr">110 </span> e8/call <a href='115write-byte.subx.html#L33'>write-byte-buffered</a>/disp32
<span id="L111" class="LineNr">111 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L112" class="LineNr">112 </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="L113" class="LineNr">113 </span> <span class="subxComment"># AL = convert lower nibble to hex</span>
<span id="L114" class="LineNr">114 </span> 8b/copy 1/mod/*+disp8 5/rm32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 0xc/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ebp+12) to eax</span>
<span id="L115" class="LineNr">115 </span> 25/and-eax 0xf/imm32
<span id="L116" class="LineNr">116 </span> <span class="subxS1Comment"># . AL = to-hex-char(AL)</span>
<span id="L117" class="LineNr">117 </span> e8/call <a href='066write-int-hex.subx.html#L9'>to-hex-char</a>/disp32
<span id="L117" class="LineNr">117 </span> e8/call <a href='117write-int-hex.subx.html#L9'>to-hex-char</a>/disp32
<span id="L118" class="LineNr">118 </span> <span class="subxComment"># write-byte-buffered(f, AL)</span>
<span id="L119" class="LineNr">119 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L120" class="LineNr">120 </span> 50/push-eax
<span id="L121" class="LineNr">121 </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="L122" class="LineNr">122 </span> <span class="subxS2Comment"># . . call</span>
<span id="L123" class="LineNr">123 </span> e8/call <a href='064write-byte.subx.html#L33'>write-byte-buffered</a>/disp32
<span id="L123" class="LineNr">123 </span> e8/call <a href='115write-byte.subx.html#L33'>write-byte-buffered</a>/disp32
<span id="L124" class="LineNr">124 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L125" class="LineNr">125 </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="L126" class="LineNr">126 </span><span class="Constant">$write-byte-hex-buffered:end</span>:
@ -197,40 +197,40 @@ if ('onhashchange' in window) {
<span id="L136" class="LineNr">136 </span> <span class="subxComment"># setup</span>
<span id="L137" class="LineNr">137 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L138" class="LineNr">138 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L139" class="LineNr">139 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L139" class="LineNr">139 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L140" class="LineNr">140 </span> <span class="subxS2Comment"># . . call</span>
<span id="L141" class="LineNr">141 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L141" class="LineNr">141 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L142" class="LineNr">142 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L143" class="LineNr">143 </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="L144" class="LineNr">144 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L145" class="LineNr">145 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L146" class="LineNr">146 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L147" class="LineNr">147 </span> <span class="subxS2Comment"># . . call</span>
<span id="L148" class="LineNr">148 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L148" class="LineNr">148 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L149" class="LineNr">149 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L150" class="LineNr">150 </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="L151" class="LineNr">151 </span> <span class="subxComment"># write-byte-hex-buffered(_test-buffered-file, 0xa) # exercises digit, non-digit as well as leading zero</span>
<span id="L152" class="LineNr">152 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L153" class="LineNr">153 </span> 68/push 0xa/imm32
<span id="L154" class="LineNr">154 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L154" class="LineNr">154 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L155" class="LineNr">155 </span> <span class="subxS2Comment"># . . call</span>
<span id="L156" class="LineNr">156 </span> e8/call <a href='066write-int-hex.subx.html#L93'>write-byte-hex-buffered</a>/disp32
<span id="L156" class="LineNr">156 </span> e8/call <a href='117write-int-hex.subx.html#L93'>write-byte-hex-buffered</a>/disp32
<span id="L157" class="LineNr">157 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L158" class="LineNr">158 </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="L159" class="LineNr">159 </span> <span class="subxComment"># flush(_test-buffered-file)</span>
<span id="L160" class="LineNr">160 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L161" class="LineNr">161 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L161" class="LineNr">161 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L162" class="LineNr">162 </span> <span class="subxS2Comment"># . . call</span>
<span id="L163" class="LineNr">163 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L163" class="LineNr">163 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L164" class="LineNr">164 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L165" class="LineNr">165 </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="L166" class="LineNr">166 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;0a&quot;, msg)</span>
<span id="L167" class="LineNr">167 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L168" class="LineNr">168 </span> 68/push <span class="Constant">&quot;F - test-write-byte-hex-buffered&quot;</span>/imm32
<span id="L169" class="LineNr">169 </span> 68/push <span class="Constant">&quot;0a&quot;</span>/imm32
<span id="L170" class="LineNr">170 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L170" class="LineNr">170 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L171" class="LineNr">171 </span> <span class="subxS2Comment"># . . call</span>
<span id="L172" class="LineNr">172 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L172" class="LineNr">172 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L173" class="LineNr">173 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L174" class="LineNr">174 </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="L175" class="LineNr">175 </span> <span class="subxS1Comment"># . end</span>
@ -261,7 +261,7 @@ if ('onhashchange' in window) {
<span id="L200" class="LineNr">200 </span> 68/push <span class="Constant">&quot;0x&quot;</span>/imm32
<span id="L201" class="LineNr">201 </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="L202" class="LineNr">202 </span> <span class="subxS2Comment"># . . call</span>
<span id="L203" class="LineNr">203 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L203" class="LineNr">203 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L204" class="LineNr">204 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L205" class="LineNr">205 </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="L206" class="LineNr">206 </span><span class="Constant">$write-int32-hex:loop</span>:
@ -273,13 +273,13 @@ if ('onhashchange' in window) {
<span id="L212" class="LineNr">212 </span> d3/&gt;&gt;ecx 5/subop/pad-zeroes 3/mod/direct 0/rm32/eax <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"># shift eax right by ecx bits, padding zeroes</span>
<span id="L213" class="LineNr">213 </span> <span class="subxComment"># eax = to-hex-char(AL)</span>
<span id="L214" class="LineNr">214 </span> 25/and-eax 0xf/imm32
<span id="L215" class="LineNr">215 </span> e8/call <a href='066write-int-hex.subx.html#L9'>to-hex-char</a>/disp32
<span id="L215" class="LineNr">215 </span> e8/call <a href='117write-int-hex.subx.html#L9'>to-hex-char</a>/disp32
<span id="L216" class="LineNr">216 </span> <span class="subxComment"># append-byte(f, AL)</span>
<span id="L217" class="LineNr">217 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L218" class="LineNr">218 </span> 50/push-eax
<span id="L219" class="LineNr">219 </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="L220" class="LineNr">220 </span> <span class="subxS2Comment"># . . call</span>
<span id="L221" class="LineNr">221 </span> e8/call <a href='064write-byte.subx.html#L208'>append-byte</a>/disp32
<span id="L221" class="LineNr">221 </span> e8/call <a href='115write-byte.subx.html#L208'>append-byte</a>/disp32
<span id="L222" class="LineNr">222 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L223" class="LineNr">223 </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="L224" class="LineNr">224 </span> <span class="subxComment"># ecx -= 4</span>
@ -299,26 +299,26 @@ if ('onhashchange' in window) {
<span id="L238" class="LineNr">238 </span> <span class="subxComment"># setup</span>
<span id="L239" class="LineNr">239 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L240" class="LineNr">240 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L241" class="LineNr">241 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L241" class="LineNr">241 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L242" class="LineNr">242 </span> <span class="subxS2Comment"># . . call</span>
<span id="L243" class="LineNr">243 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L243" class="LineNr">243 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L244" class="LineNr">244 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L245" class="LineNr">245 </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="L246" class="LineNr">246 </span> <span class="subxComment"># write-int32-hex(_test-stream, 0x8899aa)</span>
<span id="L247" class="LineNr">247 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L248" class="LineNr">248 </span> 68/push 0x8899aa/imm32
<span id="L249" class="LineNr">249 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L249" class="LineNr">249 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L250" class="LineNr">250 </span> <span class="subxS2Comment"># . . call</span>
<span id="L251" class="LineNr">251 </span> e8/call <a href='066write-int-hex.subx.html#L178'>write-int32-hex</a>/disp32
<span id="L251" class="LineNr">251 </span> e8/call <a href='117write-int-hex.subx.html#L178'>write-int32-hex</a>/disp32
<span id="L252" class="LineNr">252 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L253" class="LineNr">253 </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="L254" class="LineNr">254 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;0x008899aa&quot;, msg)</span>
<span id="L255" class="LineNr">255 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L256" class="LineNr">256 </span> 68/push <span class="Constant">&quot;F - test-write-int32-hex&quot;</span>/imm32
<span id="L257" class="LineNr">257 </span> 68/push <span class="Constant">&quot;0x008899aa&quot;</span>/imm32
<span id="L258" class="LineNr">258 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L258" class="LineNr">258 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L259" class="LineNr">259 </span> <span class="subxS2Comment"># . . call</span>
<span id="L260" class="LineNr">260 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L260" class="LineNr">260 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L261" class="LineNr">261 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L262" class="LineNr">262 </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="L263" class="LineNr">263 </span> <span class="subxS1Comment"># . end</span>
@ -349,7 +349,7 @@ if ('onhashchange' in window) {
<span id="L288" class="LineNr">288 </span> 68/push <span class="Constant">&quot;0x&quot;</span>/imm32
<span id="L289" class="LineNr">289 </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="L290" class="LineNr">290 </span> <span class="subxS2Comment"># . . call</span>
<span id="L291" class="LineNr">291 </span> e8/call <a href='065write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L291" class="LineNr">291 </span> e8/call <a href='116write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L292" class="LineNr">292 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L293" class="LineNr">293 </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="L294" class="LineNr">294 </span><span class="Constant">$write-int32-hex-buffered:loop</span>:
@ -361,13 +361,13 @@ if ('onhashchange' in window) {
<span id="L300" class="LineNr">300 </span> d3/&gt;&gt;ecx 5/subop/pad-zeroes 3/mod/direct 0/rm32/eax <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"># shift eax right by ecx bits, padding zeroes</span>
<span id="L301" class="LineNr">301 </span> <span class="subxComment"># eax = to-hex-char(AL)</span>
<span id="L302" class="LineNr">302 </span> 25/and-eax 0xf/imm32
<span id="L303" class="LineNr">303 </span> e8/call <a href='066write-int-hex.subx.html#L9'>to-hex-char</a>/disp32
<span id="L303" class="LineNr">303 </span> e8/call <a href='117write-int-hex.subx.html#L9'>to-hex-char</a>/disp32
<span id="L304" class="LineNr">304 </span> <span class="subxComment"># write-byte-buffered(f, AL)</span>
<span id="L305" class="LineNr">305 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L306" class="LineNr">306 </span> 50/push-eax
<span id="L307" class="LineNr">307 </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="L308" class="LineNr">308 </span> <span class="subxS2Comment"># . . call</span>
<span id="L309" class="LineNr">309 </span> e8/call <a href='064write-byte.subx.html#L33'>write-byte-buffered</a>/disp32
<span id="L309" class="LineNr">309 </span> e8/call <a href='115write-byte.subx.html#L33'>write-byte-buffered</a>/disp32
<span id="L310" class="LineNr">310 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L311" class="LineNr">311 </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="L312" class="LineNr">312 </span> <span class="subxComment"># ecx -= 4</span>
@ -387,31 +387,31 @@ if ('onhashchange' in window) {
<span id="L326" class="LineNr">326 </span> <span class="subxComment"># setup</span>
<span id="L327" class="LineNr">327 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L328" class="LineNr">328 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L329" class="LineNr">329 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L329" class="LineNr">329 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L330" class="LineNr">330 </span> <span class="subxS2Comment"># . . call</span>
<span id="L331" class="LineNr">331 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L331" class="LineNr">331 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L332" class="LineNr">332 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L333" class="LineNr">333 </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="L334" class="LineNr">334 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L335" class="LineNr">335 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L336" class="LineNr">336 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L337" class="LineNr">337 </span> <span class="subxS2Comment"># . . call</span>
<span id="L338" class="LineNr">338 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L338" class="LineNr">338 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L339" class="LineNr">339 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L340" class="LineNr">340 </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="L341" class="LineNr">341 </span> <span class="subxComment"># write-int32-hex-buffered(_test-buffered-file, 0x8899aa)</span>
<span id="L342" class="LineNr">342 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L343" class="LineNr">343 </span> 68/push 0x8899aa/imm32
<span id="L344" class="LineNr">344 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L344" class="LineNr">344 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L345" class="LineNr">345 </span> <span class="subxS2Comment"># . . call</span>
<span id="L346" class="LineNr">346 </span> e8/call <a href='066write-int-hex.subx.html#L266'>write-int32-hex-buffered</a>/disp32
<span id="L346" class="LineNr">346 </span> e8/call <a href='117write-int-hex.subx.html#L266'>write-int32-hex-buffered</a>/disp32
<span id="L347" class="LineNr">347 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L348" class="LineNr">348 </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="L349" class="LineNr">349 </span> <span class="subxComment"># flush(_test-buffered-file)</span>
<span id="L350" class="LineNr">350 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L351" class="LineNr">351 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L351" class="LineNr">351 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L352" class="LineNr">352 </span> <span class="subxS2Comment"># . . call</span>
<span id="L353" class="LineNr">353 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L353" class="LineNr">353 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L354" class="LineNr">354 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L355" class="LineNr">355 </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="L356" class="Folded">356 </span><span class="Folded">+-- 18 lines: #? # dump line --------------------------------------------------------------------------------------------------------------------------------------------------------</span>
@ -419,9 +419,9 @@ if ('onhashchange' in window) {
<span id="L375" class="LineNr">375 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L376" class="LineNr">376 </span> 68/push <span class="Constant">&quot;F - test-write-int32-hex-buffered&quot;</span>/imm32
<span id="L377" class="LineNr">377 </span> 68/push <span class="Constant">&quot;0x008899aa&quot;</span>/imm32
<span id="L378" class="LineNr">378 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L378" class="LineNr">378 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L379" class="LineNr">379 </span> <span class="subxS2Comment"># . . call</span>
<span id="L380" class="LineNr">380 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L380" class="LineNr">380 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L381" class="LineNr">381 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L382" class="LineNr">382 </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="L383" class="LineNr">383 </span> <span class="subxS1Comment"># . end</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 067parse-hex.subx</title>
<title>Mu - 118parse-hex.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -56,7 +56,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/067parse-hex.subx'>https://github.com/akkartik/mu/blob/master/067parse-hex.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/118parse-hex.subx'>https://github.com/akkartik/mu/blob/master/118parse-hex.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># some utilities for converting numbers from hex</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># lowercase letters only for now</span>
@ -66,7 +66,7 @@ if ('onhashchange' in window) {
<span id="L6" class="LineNr"> 6 </span><span class="subxS1Comment"># . op subop mod rm32 base index scale r32</span>
<span id="L7" class="LineNr"> 7 </span><span class="subxS1Comment"># . 1-3 bytes 3 bits 2 bits 3 bits 3 bits 3 bits 2 bits 2 bits 0/1/2/4 bytes 0/1/2/4 bytes</span>
<span id="L8" class="LineNr"> 8 </span>
<span id="L9" class="LineNr"> 9 </span><span class="subxFunction">is-hex-int?</span>: <span class="subxComment"># in: (addr slice) -&gt; eax: boolean</span>
<span id="L9" class="LineNr"> 9 </span><span class="subxFunction">is-hex-int?</span>: <span class="subxComment"># in: (addr slice) -&gt; result/eax: boolean</span>
<span id="L10" class="LineNr"> 10 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L11" class="LineNr"> 11 </span> 55/push-ebp
<span id="L12" class="LineNr"> 12 </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>
@ -121,7 +121,7 @@ if ('onhashchange' in window) {
<span id="L61" class="LineNr"> 61 </span> 8a/copy-byte 0/mod/indirect 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/AL <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy byte at *ecx to AL</span>
<span id="L62" class="LineNr"> 62 </span> 50/push-eax
<span id="L63" class="LineNr"> 63 </span> <span class="subxS2Comment"># . . call</span>
<span id="L64" class="LineNr"> 64 </span> e8/call <a href='067parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L64" class="LineNr"> 64 </span> e8/call <a href='118parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L65" class="LineNr"> 65 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L66" class="LineNr"> 66 </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="L67" class="LineNr"> 67 </span> <span class="subxComment"># if (eax == false) return false</span>
@ -161,7 +161,7 @@ if ('onhashchange' in window) {
<span id="L101" class="LineNr">101 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L102" class="LineNr">102 </span> 51/push-ecx
<span id="L103" class="LineNr">103 </span> <span class="subxS2Comment"># . . call</span>
<span id="L104" class="LineNr">104 </span> e8/call <a href='067parse-hex.subx.html#L9'>is-hex-int?</a>/disp32
<span id="L104" class="LineNr">104 </span> e8/call <a href='118parse-hex.subx.html#L9'>is-hex-int?</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> 4/imm32 <span class="subxComment"># add to esp</span>
<span id="L107" class="LineNr">107 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -170,7 +170,7 @@ if ('onhashchange' in window) {
<span id="L110" class="LineNr">110 </span> 68/push 1/imm32/true
<span id="L111" class="LineNr">111 </span> 50/push-eax
<span id="L112" class="LineNr">112 </span> <span class="subxS2Comment"># . . call</span>
<span id="L113" class="LineNr">113 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L113" class="LineNr">113 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L114" class="LineNr">114 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L115" class="LineNr">115 </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="L116" class="LineNr">116 </span> <span class="subxS1Comment"># . epilogue</span>
@ -195,7 +195,7 @@ if ('onhashchange' in window) {
<span id="L135" class="LineNr">135 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L136" class="LineNr">136 </span> 51/push-ecx
<span id="L137" class="LineNr">137 </span> <span class="subxS2Comment"># . . call</span>
<span id="L138" class="LineNr">138 </span> e8/call <a href='067parse-hex.subx.html#L9'>is-hex-int?</a>/disp32
<span id="L138" class="LineNr">138 </span> e8/call <a href='118parse-hex.subx.html#L9'>is-hex-int?</a>/disp32
<span id="L139" class="LineNr">139 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L140" class="LineNr">140 </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="L141" class="LineNr">141 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -204,7 +204,7 @@ if ('onhashchange' in window) {
<span id="L144" class="LineNr">144 </span> 68/push 1/imm32/true
<span id="L145" class="LineNr">145 </span> 50/push-eax
<span id="L146" class="LineNr">146 </span> <span class="subxS2Comment"># . . call</span>
<span id="L147" class="LineNr">147 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L147" class="LineNr">147 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L148" class="LineNr">148 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L149" class="LineNr">149 </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="L150" class="LineNr">150 </span> <span class="subxS1Comment"># . epilogue</span>
@ -229,7 +229,7 @@ if ('onhashchange' in window) {
<span id="L169" class="LineNr">169 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L170" class="LineNr">170 </span> 51/push-ecx
<span id="L171" class="LineNr">171 </span> <span class="subxS2Comment"># . . call</span>
<span id="L172" class="LineNr">172 </span> e8/call <a href='067parse-hex.subx.html#L9'>is-hex-int?</a>/disp32
<span id="L172" class="LineNr">172 </span> e8/call <a href='118parse-hex.subx.html#L9'>is-hex-int?</a>/disp32
<span id="L173" class="LineNr">173 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L174" class="LineNr">174 </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="L175" class="LineNr">175 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -238,7 +238,7 @@ if ('onhashchange' in window) {
<span id="L178" class="LineNr">178 </span> 68/push 0/imm32/false
<span id="L179" class="LineNr">179 </span> 50/push-eax
<span id="L180" class="LineNr">180 </span> <span class="subxS2Comment"># . . call</span>
<span id="L181" class="LineNr">181 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L181" class="LineNr">181 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L182" class="LineNr">182 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L183" class="LineNr">183 </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="L184" class="LineNr">184 </span> <span class="subxS1Comment"># . epilogue</span>
@ -263,7 +263,7 @@ if ('onhashchange' in window) {
<span id="L203" class="LineNr">203 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L204" class="LineNr">204 </span> 51/push-ecx
<span id="L205" class="LineNr">205 </span> <span class="subxS2Comment"># . . call</span>
<span id="L206" class="LineNr">206 </span> e8/call <a href='067parse-hex.subx.html#L9'>is-hex-int?</a>/disp32
<span id="L206" class="LineNr">206 </span> e8/call <a href='118parse-hex.subx.html#L9'>is-hex-int?</a>/disp32
<span id="L207" class="LineNr">207 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L208" class="LineNr">208 </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="L209" class="LineNr">209 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -272,7 +272,7 @@ if ('onhashchange' in window) {
<span id="L212" class="LineNr">212 </span> 68/push 0/imm32/false
<span id="L213" class="LineNr">213 </span> 50/push-eax
<span id="L214" class="LineNr">214 </span> <span class="subxS2Comment"># . . call</span>
<span id="L215" class="LineNr">215 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L215" class="LineNr">215 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L216" class="LineNr">216 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L217" class="LineNr">217 </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="L218" class="LineNr">218 </span> <span class="subxS1Comment"># . epilogue</span>
@ -292,7 +292,7 @@ if ('onhashchange' in window) {
<span id="L232" class="LineNr">232 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L233" class="LineNr">233 </span> 51/push-ecx
<span id="L234" class="LineNr">234 </span> <span class="subxS2Comment"># . . call</span>
<span id="L235" class="LineNr">235 </span> e8/call <a href='067parse-hex.subx.html#L9'>is-hex-int?</a>/disp32
<span id="L235" class="LineNr">235 </span> e8/call <a href='118parse-hex.subx.html#L9'>is-hex-int?</a>/disp32
<span id="L236" class="LineNr">236 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L237" class="LineNr">237 </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="L238" class="LineNr">238 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -301,7 +301,7 @@ if ('onhashchange' in window) {
<span id="L241" class="LineNr">241 </span> 68/push 0/imm32/false
<span id="L242" class="LineNr">242 </span> 50/push-eax
<span id="L243" class="LineNr">243 </span> <span class="subxS2Comment"># . . call</span>
<span id="L244" class="LineNr">244 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L244" class="LineNr">244 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L245" class="LineNr">245 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L246" class="LineNr">246 </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="L247" class="LineNr">247 </span> <span class="subxS1Comment"># . epilogue</span>
@ -326,7 +326,7 @@ if ('onhashchange' in window) {
<span id="L266" class="LineNr">266 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L267" class="LineNr">267 </span> 51/push-ecx
<span id="L268" class="LineNr">268 </span> <span class="subxS2Comment"># . . call</span>
<span id="L269" class="LineNr">269 </span> e8/call <a href='067parse-hex.subx.html#L9'>is-hex-int?</a>/disp32
<span id="L269" class="LineNr">269 </span> e8/call <a href='118parse-hex.subx.html#L9'>is-hex-int?</a>/disp32
<span id="L270" class="LineNr">270 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L271" class="LineNr">271 </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="L272" class="LineNr">272 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -335,7 +335,7 @@ if ('onhashchange' in window) {
<span id="L275" class="LineNr">275 </span> 68/push 1/imm32/true
<span id="L276" class="LineNr">276 </span> 50/push-eax
<span id="L277" class="LineNr">277 </span> <span class="subxS2Comment"># . . call</span>
<span id="L278" class="LineNr">278 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L278" class="LineNr">278 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L279" class="LineNr">279 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L280" class="LineNr">280 </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="L281" class="LineNr">281 </span> <span class="subxS1Comment"># . epilogue</span>
@ -360,7 +360,7 @@ if ('onhashchange' in window) {
<span id="L300" class="LineNr">300 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L301" class="LineNr">301 </span> 51/push-ecx
<span id="L302" class="LineNr">302 </span> <span class="subxS2Comment"># . . call</span>
<span id="L303" class="LineNr">303 </span> e8/call <a href='067parse-hex.subx.html#L9'>is-hex-int?</a>/disp32
<span id="L303" class="LineNr">303 </span> e8/call <a href='118parse-hex.subx.html#L9'>is-hex-int?</a>/disp32
<span id="L304" class="LineNr">304 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L305" class="LineNr">305 </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="L306" class="LineNr">306 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -369,7 +369,7 @@ if ('onhashchange' in window) {
<span id="L309" class="LineNr">309 </span> 68/push 1/imm32/true
<span id="L310" class="LineNr">310 </span> 50/push-eax
<span id="L311" class="LineNr">311 </span> <span class="subxS2Comment"># . . call</span>
<span id="L312" class="LineNr">312 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L312" class="LineNr">312 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L313" class="LineNr">313 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L314" class="LineNr">314 </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="L315" class="LineNr">315 </span> <span class="subxS1Comment"># . epilogue</span>
@ -394,7 +394,7 @@ if ('onhashchange' in window) {
<span id="L334" class="LineNr">334 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L335" class="LineNr">335 </span> 51/push-ecx
<span id="L336" class="LineNr">336 </span> <span class="subxS2Comment"># . . call</span>
<span id="L337" class="LineNr">337 </span> e8/call <a href='067parse-hex.subx.html#L9'>is-hex-int?</a>/disp32
<span id="L337" class="LineNr">337 </span> e8/call <a href='118parse-hex.subx.html#L9'>is-hex-int?</a>/disp32
<span id="L338" class="LineNr">338 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L339" class="LineNr">339 </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="L340" class="LineNr">340 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -403,7 +403,7 @@ if ('onhashchange' in window) {
<span id="L343" class="LineNr">343 </span> 68/push 1/imm32/true
<span id="L344" class="LineNr">344 </span> 50/push-eax
<span id="L345" class="LineNr">345 </span> <span class="subxS2Comment"># . . call</span>
<span id="L346" class="LineNr">346 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L346" class="LineNr">346 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L347" class="LineNr">347 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L348" class="LineNr">348 </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="L349" class="LineNr">349 </span> <span class="subxS1Comment"># . epilogue</span>
@ -432,7 +432,7 @@ if ('onhashchange' in window) {
<span id="L372" class="LineNr">372 </span> 52/push-edx
<span id="L373" class="LineNr">373 </span> 51/push-ecx
<span id="L374" class="LineNr">374 </span> <span class="subxS2Comment"># . . call</span>
<span id="L375" class="LineNr">375 </span> e8/call <a href='067parse-hex.subx.html#L417'>parse-hex-int-helper</a>/disp32
<span id="L375" class="LineNr">375 </span> e8/call <a href='118parse-hex.subx.html#L417'>parse-hex-int-helper</a>/disp32
<span id="L376" class="LineNr">376 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L377" class="LineNr">377 </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="L378" class="LineNr">378 </span><span class="Constant">$parse-hex-int:end</span>:
@ -462,7 +462,7 @@ if ('onhashchange' in window) {
<span id="L402" class="LineNr">402 </span> 52/push-edx
<span id="L403" class="LineNr">403 </span> 51/push-ecx
<span id="L404" class="LineNr">404 </span> <span class="subxS2Comment"># . . call</span>
<span id="L405" class="LineNr">405 </span> e8/call <a href='067parse-hex.subx.html#L417'>parse-hex-int-helper</a>/disp32
<span id="L405" class="LineNr">405 </span> e8/call <a href='118parse-hex.subx.html#L417'>parse-hex-int-helper</a>/disp32
<span id="L406" class="LineNr">406 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L407" class="LineNr">407 </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="L408" class="LineNr">408 </span><span class="Constant">$parse-hex-int-from-slice:end</span>:
@ -528,7 +528,7 @@ if ('onhashchange' in window) {
<span id="L468" class="LineNr">468 </span> <span class="subxS2Comment"># . . copy arg to eax</span>
<span id="L469" class="LineNr">469 </span> 8a/copy-byte 0/mod/indirect 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/AL <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy byte at *ecx to AL</span>
<span id="L470" class="LineNr">470 </span> <span class="subxS2Comment"># . . call</span>
<span id="L471" class="LineNr">471 </span> e8/call <a href='067parse-hex.subx.html#L864'>from-hex-char</a>/disp32
<span id="L471" class="LineNr">471 </span> e8/call <a href='118parse-hex.subx.html#L864'>from-hex-char</a>/disp32
<span id="L472" class="LineNr">472 </span> <span class="subxComment"># result = result * 16 + eax</span>
<span id="L473" class="LineNr">473 </span> c1/shift 4/subop/left 3/mod/direct 3/rm32/ebx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 4/imm8 <span class="subxComment"># shift ebx left by 4 bits</span>
<span id="L474" class="LineNr">474 </span> 01/add 3/mod/direct 3/rm32/ebx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># add eax to ebx</span>
@ -571,7 +571,7 @@ if ('onhashchange' in window) {
<span id="L511" class="LineNr">511 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L512" class="LineNr">512 </span> 51/push-ecx
<span id="L513" class="LineNr">513 </span> <span class="subxS2Comment"># . . call</span>
<span id="L514" class="LineNr">514 </span> e8/call <a href='067parse-hex.subx.html#L387'>parse-hex-int-from-slice</a>/disp32
<span id="L514" class="LineNr">514 </span> e8/call <a href='118parse-hex.subx.html#L387'>parse-hex-int-from-slice</a>/disp32
<span id="L515" class="LineNr">515 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L516" class="LineNr">516 </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="L517" class="LineNr">517 </span> <span class="subxComment"># check-ints-equal(eax, 0xa, msg)</span>
@ -580,7 +580,7 @@ if ('onhashchange' in window) {
<span id="L520" class="LineNr">520 </span> 68/push 0xa/imm32
<span id="L521" class="LineNr">521 </span> 50/push-eax
<span id="L522" class="LineNr">522 </span> <span class="subxS2Comment"># . . call</span>
<span id="L523" class="LineNr">523 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L523" class="LineNr">523 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L524" class="LineNr">524 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L525" class="LineNr">525 </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="L526" class="LineNr">526 </span> <span class="subxS1Comment"># . epilogue</span>
@ -605,7 +605,7 @@ if ('onhashchange' in window) {
<span id="L545" class="LineNr">545 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L546" class="LineNr">546 </span> 51/push-ecx
<span id="L547" class="LineNr">547 </span> <span class="subxS2Comment"># . . call</span>
<span id="L548" class="LineNr">548 </span> e8/call <a href='067parse-hex.subx.html#L387'>parse-hex-int-from-slice</a>/disp32
<span id="L548" class="LineNr">548 </span> e8/call <a href='118parse-hex.subx.html#L387'>parse-hex-int-from-slice</a>/disp32
<span id="L549" class="LineNr">549 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L550" class="LineNr">550 </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="L551" class="LineNr">551 </span> <span class="subxComment"># check-ints-equal(eax, 0x34a, msg)</span>
@ -614,7 +614,7 @@ if ('onhashchange' in window) {
<span id="L554" class="LineNr">554 </span> 68/push 0x34a/imm32
<span id="L555" class="LineNr">555 </span> 50/push-eax
<span id="L556" class="LineNr">556 </span> <span class="subxS2Comment"># . . call</span>
<span id="L557" class="LineNr">557 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L557" class="LineNr">557 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L558" class="LineNr">558 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L559" class="LineNr">559 </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="L560" class="LineNr">560 </span> <span class="subxS1Comment"># . epilogue</span>
@ -639,7 +639,7 @@ if ('onhashchange' in window) {
<span id="L579" class="LineNr">579 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L580" class="LineNr">580 </span> 51/push-ecx
<span id="L581" class="LineNr">581 </span> <span class="subxS2Comment"># . . call</span>
<span id="L582" class="LineNr">582 </span> e8/call <a href='067parse-hex.subx.html#L387'>parse-hex-int-from-slice</a>/disp32
<span id="L582" class="LineNr">582 </span> e8/call <a href='118parse-hex.subx.html#L387'>parse-hex-int-from-slice</a>/disp32
<span id="L583" class="LineNr">583 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L584" class="LineNr">584 </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="L585" class="LineNr">585 </span> <span class="subxComment"># check-ints-equal(eax, 0x34a, msg)</span>
@ -648,7 +648,7 @@ if ('onhashchange' in window) {
<span id="L588" class="LineNr">588 </span> 68/push 0x34/imm32
<span id="L589" class="LineNr">589 </span> 50/push-eax
<span id="L590" class="LineNr">590 </span> <span class="subxS2Comment"># . . call</span>
<span id="L591" class="LineNr">591 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L591" class="LineNr">591 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L592" class="LineNr">592 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L593" class="LineNr">593 </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="L594" class="LineNr">594 </span> <span class="subxS1Comment"># . epilogue</span>
@ -673,7 +673,7 @@ if ('onhashchange' in window) {
<span id="L613" class="LineNr">613 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L614" class="LineNr">614 </span> 51/push-ecx
<span id="L615" class="LineNr">615 </span> <span class="subxS2Comment"># . . call</span>
<span id="L616" class="LineNr">616 </span> e8/call <a href='067parse-hex.subx.html#L387'>parse-hex-int-from-slice</a>/disp32
<span id="L616" class="LineNr">616 </span> e8/call <a href='118parse-hex.subx.html#L387'>parse-hex-int-from-slice</a>/disp32
<span id="L617" class="LineNr">617 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L618" class="LineNr">618 </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="L619" class="LineNr">619 </span> <span class="subxComment"># check-ints-equal(eax, 0x34a, msg)</span>
@ -682,7 +682,7 @@ if ('onhashchange' in window) {
<span id="L622" class="LineNr">622 </span> 68/push 0/imm32
<span id="L623" class="LineNr">623 </span> 50/push-eax
<span id="L624" class="LineNr">624 </span> <span class="subxS2Comment"># . . call</span>
<span id="L625" class="LineNr">625 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L625" class="LineNr">625 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L626" class="LineNr">626 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L627" class="LineNr">627 </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="L628" class="LineNr">628 </span> <span class="subxS1Comment"># . epilogue</span>
@ -707,7 +707,7 @@ if ('onhashchange' in window) {
<span id="L647" class="LineNr">647 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L648" class="LineNr">648 </span> 51/push-ecx
<span id="L649" class="LineNr">649 </span> <span class="subxS2Comment"># . . call</span>
<span id="L650" class="LineNr">650 </span> e8/call <a href='067parse-hex.subx.html#L387'>parse-hex-int-from-slice</a>/disp32
<span id="L650" class="LineNr">650 </span> e8/call <a href='118parse-hex.subx.html#L387'>parse-hex-int-from-slice</a>/disp32
<span id="L651" class="LineNr">651 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L652" class="LineNr">652 </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="L653" class="LineNr">653 </span> <span class="subxComment"># check-ints-equal(eax, 0x3, msg)</span>
@ -716,7 +716,7 @@ if ('onhashchange' in window) {
<span id="L656" class="LineNr">656 </span> 68/push 0x3/imm32
<span id="L657" class="LineNr">657 </span> 50/push-eax
<span id="L658" class="LineNr">658 </span> <span class="subxS2Comment"># . . call</span>
<span id="L659" class="LineNr">659 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L659" class="LineNr">659 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<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="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="L662" class="LineNr">662 </span> <span class="subxS1Comment"># . epilogue</span>
@ -741,7 +741,7 @@ if ('onhashchange' in window) {
<span id="L681" class="LineNr">681 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L682" class="LineNr">682 </span> 51/push-ecx
<span id="L683" class="LineNr">683 </span> <span class="subxS2Comment"># . . call</span>
<span id="L684" class="LineNr">684 </span> e8/call <a href='067parse-hex.subx.html#L387'>parse-hex-int-from-slice</a>/disp32
<span id="L684" class="LineNr">684 </span> e8/call <a href='118parse-hex.subx.html#L387'>parse-hex-int-from-slice</a>/disp32
<span id="L685" class="LineNr">685 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L686" class="LineNr">686 </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="L687" class="LineNr">687 </span> <span class="subxComment"># check-ints-equal(eax, -3, msg)</span>
@ -750,7 +750,7 @@ if ('onhashchange' in window) {
<span id="L690" class="LineNr">690 </span> 68/push -3/imm32
<span id="L691" class="LineNr">691 </span> 50/push-eax
<span id="L692" class="LineNr">692 </span> <span class="subxS2Comment"># . . call</span>
<span id="L693" class="LineNr">693 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L693" class="LineNr">693 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L694" class="LineNr">694 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L695" class="LineNr">695 </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="L696" class="LineNr">696 </span> <span class="subxS1Comment"># . epilogue</span>
@ -758,7 +758,7 @@ if ('onhashchange' in window) {
<span id="L698" class="LineNr">698 </span> 5d/pop-to-ebp
<span id="L699" class="LineNr">699 </span> c3/return
<span id="L700" class="LineNr">700 </span>
<span id="L701" class="LineNr">701 </span><span class="subxFunction">is-hex-digit?</span>: <span class="subxComment"># c: byte -&gt; eax: boolean</span>
<span id="L701" class="LineNr">701 </span><span class="subxFunction">is-hex-digit?</span>: <span class="subxComment"># c: byte -&gt; result/eax: boolean</span>
<span id="L702" class="LineNr">702 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L703" class="LineNr">703 </span> 55/push-ebp
<span id="L704" class="LineNr">704 </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>
@ -799,7 +799,7 @@ if ('onhashchange' in window) {
<span id="L739" class="LineNr">739 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L740" class="LineNr">740 </span> 68/push 0x2f/imm32
<span id="L741" class="LineNr">741 </span> <span class="subxS2Comment"># . . call</span>
<span id="L742" class="LineNr">742 </span> e8/call <a href='067parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L742" class="LineNr">742 </span> e8/call <a href='118parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L743" class="LineNr">743 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L744" class="LineNr">744 </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="L745" class="LineNr">745 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -808,7 +808,7 @@ if ('onhashchange' in window) {
<span id="L748" class="LineNr">748 </span> 68/push 0/imm32/false
<span id="L749" class="LineNr">749 </span> 50/push-eax
<span id="L750" class="LineNr">750 </span> <span class="subxS2Comment"># . . call</span>
<span id="L751" class="LineNr">751 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L751" class="LineNr">751 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L752" class="LineNr">752 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L753" class="LineNr">753 </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="L754" class="LineNr">754 </span> c3/return
@ -818,7 +818,7 @@ if ('onhashchange' in window) {
<span id="L758" class="LineNr">758 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L759" class="LineNr">759 </span> 68/push 0x30/imm32
<span id="L760" class="LineNr">760 </span> <span class="subxS2Comment"># . . call</span>
<span id="L761" class="LineNr">761 </span> e8/call <a href='067parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L761" class="LineNr">761 </span> e8/call <a href='118parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L762" class="LineNr">762 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L763" class="LineNr">763 </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="L764" class="LineNr">764 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -827,14 +827,14 @@ if ('onhashchange' in window) {
<span id="L767" class="LineNr">767 </span> 68/push 1/imm32/true
<span id="L768" class="LineNr">768 </span> 50/push-eax
<span id="L769" class="LineNr">769 </span> <span class="subxS2Comment"># . . call</span>
<span id="L770" class="LineNr">770 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L770" class="LineNr">770 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L771" class="LineNr">771 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L772" class="LineNr">772 </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="L773" class="LineNr">773 </span> <span class="subxComment"># eax = is-hex-digit?(0x39)</span>
<span id="L774" class="LineNr">774 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L775" class="LineNr">775 </span> 68/push 0x39/imm32
<span id="L776" class="LineNr">776 </span> <span class="subxS2Comment"># . . call</span>
<span id="L777" class="LineNr">777 </span> e8/call <a href='067parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L777" class="LineNr">777 </span> e8/call <a href='118parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L778" class="LineNr">778 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L779" class="LineNr">779 </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="L780" class="LineNr">780 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -843,7 +843,7 @@ if ('onhashchange' in window) {
<span id="L783" class="LineNr">783 </span> 68/push 1/imm32/true
<span id="L784" class="LineNr">784 </span> 50/push-eax
<span id="L785" class="LineNr">785 </span> <span class="subxS2Comment"># . . call</span>
<span id="L786" class="LineNr">786 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L786" class="LineNr">786 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L787" class="LineNr">787 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L788" class="LineNr">788 </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="L789" class="LineNr">789 </span> c3/return
@ -853,7 +853,7 @@ if ('onhashchange' in window) {
<span id="L793" class="LineNr">793 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L794" class="LineNr">794 </span> 68/push 0x3a/imm32
<span id="L795" class="LineNr">795 </span> <span class="subxS2Comment"># . . call</span>
<span id="L796" class="LineNr">796 </span> e8/call <a href='067parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L796" class="LineNr">796 </span> e8/call <a href='118parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L797" class="LineNr">797 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L798" class="LineNr">798 </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="L799" class="LineNr">799 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -862,7 +862,7 @@ if ('onhashchange' in window) {
<span id="L802" class="LineNr">802 </span> 68/push 0/imm32/false
<span id="L803" class="LineNr">803 </span> 50/push-eax
<span id="L804" class="LineNr">804 </span> <span class="subxS2Comment"># . . call</span>
<span id="L805" class="LineNr">805 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L805" class="LineNr">805 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L806" class="LineNr">806 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L807" class="LineNr">807 </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="L808" class="LineNr">808 </span> c3/return
@ -872,7 +872,7 @@ if ('onhashchange' in window) {
<span id="L812" class="LineNr">812 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L813" class="LineNr">813 </span> 68/push 0x61/imm32
<span id="L814" class="LineNr">814 </span> <span class="subxS2Comment"># . . call</span>
<span id="L815" class="LineNr">815 </span> e8/call <a href='067parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L815" class="LineNr">815 </span> e8/call <a href='118parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L816" class="LineNr">816 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L817" class="LineNr">817 </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="L818" class="LineNr">818 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -881,14 +881,14 @@ if ('onhashchange' in window) {
<span id="L821" class="LineNr">821 </span> 68/push 1/imm32/true
<span id="L822" class="LineNr">822 </span> 50/push-eax
<span id="L823" class="LineNr">823 </span> <span class="subxS2Comment"># . . call</span>
<span id="L824" class="LineNr">824 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L824" class="LineNr">824 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L825" class="LineNr">825 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L826" class="LineNr">826 </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="L827" class="LineNr">827 </span> <span class="subxComment"># eax = is-hex-digit?(0x66)</span>
<span id="L828" class="LineNr">828 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L829" class="LineNr">829 </span> 68/push 0x66/imm32
<span id="L830" class="LineNr">830 </span> <span class="subxS2Comment"># . . call</span>
<span id="L831" class="LineNr">831 </span> e8/call <a href='067parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L831" class="LineNr">831 </span> e8/call <a href='118parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L832" class="LineNr">832 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L833" class="LineNr">833 </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="L834" class="LineNr">834 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -897,7 +897,7 @@ if ('onhashchange' in window) {
<span id="L837" class="LineNr">837 </span> 68/push 1/imm32/true
<span id="L838" class="LineNr">838 </span> 50/push-eax
<span id="L839" class="LineNr">839 </span> <span class="subxS2Comment"># . . call</span>
<span id="L840" class="LineNr">840 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L840" class="LineNr">840 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L841" class="LineNr">841 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L842" class="LineNr">842 </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="L843" class="LineNr">843 </span> c3/return
@ -907,7 +907,7 @@ if ('onhashchange' in window) {
<span id="L847" class="LineNr">847 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L848" class="LineNr">848 </span> 68/push 0x67/imm32
<span id="L849" class="LineNr">849 </span> <span class="subxS2Comment"># . . call</span>
<span id="L850" class="LineNr">850 </span> e8/call <a href='067parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L850" class="LineNr">850 </span> e8/call <a href='118parse-hex.subx.html#L701'>is-hex-digit?</a>/disp32
<span id="L851" class="LineNr">851 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L852" class="LineNr">852 </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="L853" class="LineNr">853 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -916,7 +916,7 @@ if ('onhashchange' in window) {
<span id="L856" class="LineNr">856 </span> 68/push 0/imm32/false
<span id="L857" class="LineNr">857 </span> 50/push-eax
<span id="L858" class="LineNr">858 </span> <span class="subxS2Comment"># . . call</span>
<span id="L859" class="LineNr">859 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L859" class="LineNr">859 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L860" class="LineNr">860 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L861" class="LineNr">861 </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="L862" class="LineNr">862 </span> c3/return
@ -953,7 +953,7 @@ if ('onhashchange' in window) {
<span id="L893" class="LineNr">893 </span> 68/push <span class="Constant">&quot;invalid hex char: &quot;</span>/imm32
<span id="L894" class="LineNr">894 </span> 68/push 2/imm32/stderr
<span id="L895" class="LineNr">895 </span> <span class="subxS2Comment"># . . call</span>
<span id="L896" class="LineNr">896 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L896" class="LineNr">896 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L897" class="LineNr">897 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L898" class="LineNr">898 </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="L899" class="LineNr">899 </span> <span class="subxS1Comment"># . clear-stream($Stderr-&gt;buffer)</span>
@ -962,7 +962,7 @@ if ('onhashchange' in window) {
<span id="L902" class="LineNr">902 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L903" class="LineNr">903 </span> 68/push $Stderr-&gt;buffer/imm32
<span id="L904" class="LineNr">904 </span> <span class="subxS2Comment"># . . call</span>
<span id="L905" class="LineNr">905 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L905" class="LineNr">905 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L906" class="LineNr">906 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L907" class="LineNr">907 </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="L908" class="LineNr">908 </span> <span class="subxS2Comment"># . . restore eax</span>
@ -970,24 +970,24 @@ if ('onhashchange' in window) {
<span id="L910" class="LineNr">910 </span> <span class="subxS1Comment"># . write-int32-hex-buffered(Stderr, eax)</span>
<span id="L911" class="LineNr">911 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L912" class="LineNr">912 </span> 50/push-eax
<span id="L913" class="LineNr">913 </span> 68/push <span class="SpecialChar"><a href='065write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L913" class="LineNr">913 </span> 68/push <span class="SpecialChar"><a href='116write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L914" class="LineNr">914 </span> <span class="subxS2Comment"># . . call</span>
<span id="L915" class="LineNr">915 </span> e8/call <a href='066write-int-hex.subx.html#L266'>write-int32-hex-buffered</a>/disp32
<span id="L915" class="LineNr">915 </span> e8/call <a href='117write-int-hex.subx.html#L266'>write-int32-hex-buffered</a>/disp32
<span id="L916" class="LineNr">916 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L917" class="LineNr">917 </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="L918" class="LineNr">918 </span> <span class="subxS1Comment"># . flush(Stderr)</span>
<span id="L919" class="LineNr">919 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L920" class="LineNr">920 </span> 68/push <span class="SpecialChar"><a href='065write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L920" class="LineNr">920 </span> 68/push <span class="SpecialChar"><a href='116write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L921" class="LineNr">921 </span> <span class="subxS2Comment"># . . call</span>
<span id="L922" class="LineNr">922 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L922" class="LineNr">922 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L923" class="LineNr">923 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L924" class="LineNr">924 </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="L925" class="LineNr">925 </span> <span class="subxS1Comment"># . _write(2/stderr, &quot;\n&quot;)</span>
<span id="L926" class="LineNr">926 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L927" class="LineNr">927 </span> 68/push <span class="SpecialChar"><a href='051test.subx.html#L82'>Newline</a></span>/imm32
<span id="L927" class="LineNr">927 </span> 68/push <span class="SpecialChar"><a href='102test.subx.html#L82'>Newline</a></span>/imm32
<span id="L928" class="LineNr">928 </span> 68/push 2/imm32/stderr
<span id="L929" class="LineNr">929 </span> <span class="subxS2Comment"># . . call</span>
<span id="L930" class="LineNr">930 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L930" class="LineNr">930 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L931" class="LineNr">931 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L932" class="LineNr">932 </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="L933" class="LineNr">933 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 068error-byte.subx</title>
<title>Mu - 119error-byte.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -56,7 +56,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/068error-byte.subx'>https://github.com/akkartik/mu/blob/master/068error-byte.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/119error-byte.subx'>https://github.com/akkartik/mu/blob/master/119error-byte.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Print an error message followed by the text representation of a byte. Then exit.</span>
<span id="L2" class="LineNr"> 2 </span>
@ -92,7 +92,7 @@ if ('onhashchange' in window) {
<span id="L32" class="LineNr">32 </span> 68/push <span class="Constant">&quot;Error: &quot;</span>/imm32
<span id="L33" class="LineNr">33 </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="L34" class="LineNr">34 </span> <span class="subxS2Comment"># . . call</span>
<span id="L35" class="LineNr">35 </span> e8/call <a href='065write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L35" class="LineNr">35 </span> e8/call <a href='116write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L36" class="LineNr">36 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L37" class="LineNr">37 </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="L38" class="LineNr">38 </span> <span class="subxComment"># write-buffered(out, msg)</span>
@ -100,7 +100,7 @@ if ('onhashchange' in window) {
<span id="L40" class="LineNr">40 </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> 0x10/disp8 <span class="Normal"> . </span> <span class="subxComment"># push *(ebp+16)</span>
<span id="L41" class="LineNr">41 </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="L42" class="LineNr">42 </span> <span class="subxS2Comment"># . . call</span>
<span id="L43" class="LineNr">43 </span> e8/call <a href='065write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L43" class="LineNr">43 </span> e8/call <a href='116write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L44" class="LineNr">44 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L45" class="LineNr">45 </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="L46" class="LineNr">46 </span> <span class="subxComment"># write-buffered(out, &quot;: &quot;)</span>
@ -108,7 +108,7 @@ if ('onhashchange' in window) {
<span id="L48" class="LineNr">48 </span> 68/push <span class="Constant">&quot;: &quot;</span>/imm32
<span id="L49" class="LineNr">49 </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="L50" class="LineNr">50 </span> <span class="subxS2Comment"># . . call</span>
<span id="L51" class="LineNr">51 </span> e8/call <a href='065write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L51" class="LineNr">51 </span> e8/call <a href='116write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L52" class="LineNr">52 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L53" class="LineNr">53 </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="L54" class="LineNr">54 </span> <span class="subxComment"># write-byte-hex-buffered(out, byte)</span>
@ -116,22 +116,22 @@ if ('onhashchange' in window) {
<span id="L56" class="LineNr">56 </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> 0x14/disp8 <span class="Normal"> . </span> <span class="subxComment"># push *(ebp+20)</span>
<span id="L57" class="LineNr">57 </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="L58" class="LineNr">58 </span> <span class="subxS2Comment"># . . call</span>
<span id="L59" class="LineNr">59 </span> e8/call <a href='066write-int-hex.subx.html#L93'>write-byte-hex-buffered</a>/disp32
<span id="L59" class="LineNr">59 </span> e8/call <a href='117write-int-hex.subx.html#L93'>write-byte-hex-buffered</a>/disp32
<span id="L60" class="LineNr">60 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L61" class="LineNr">61 </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="L62" class="LineNr">62 </span> <span class="subxComment"># write-buffered(out, Newline)</span>
<span id="L63" class="LineNr">63 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L64" class="LineNr">64 </span> 68/push <span class="SpecialChar"><a href='051test.subx.html#L82'>Newline</a></span>/imm32
<span id="L64" class="LineNr">64 </span> 68/push <span class="SpecialChar"><a href='102test.subx.html#L82'>Newline</a></span>/imm32
<span id="L65" class="LineNr">65 </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="L66" class="LineNr">66 </span> <span class="subxS2Comment"># . . call</span>
<span id="L67" class="LineNr">67 </span> e8/call <a href='065write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L67" class="LineNr">67 </span> e8/call <a href='116write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L68" class="LineNr">68 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L69" class="LineNr">69 </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="L70" class="LineNr">70 </span> <span class="subxComment"># flush(out)</span>
<span id="L71" class="LineNr">71 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L72" class="LineNr">72 </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="L73" class="LineNr">73 </span> <span class="subxS2Comment"># . . call</span>
<span id="L74" class="LineNr">74 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L74" class="LineNr">74 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L75" class="LineNr">75 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L76" class="LineNr">76 </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="L77" class="LineNr">77 </span> <span class="subxComment"># stop(ed, 1)</span>
@ -139,7 +139,7 @@ if ('onhashchange' in window) {
<span id="L79" class="LineNr">79 </span> 68/push 1/imm32
<span id="L80" class="LineNr">80 </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="L81" class="LineNr">81 </span> <span class="subxS2Comment"># . . call</span>
<span id="L82" class="LineNr">82 </span> e8/call <a href='059stop.subx.html#L92'>stop</a>/disp32
<span id="L82" class="LineNr">82 </span> e8/call <a href='110stop.subx.html#L92'>stop</a>/disp32
<span id="L83" class="LineNr">83 </span> <span class="subxComment"># should never get past this point</span>
<span id="L84" class="LineNr">84 </span><span class="Constant">$error-byte:dead-end</span>:
<span id="L85" class="LineNr">85 </span> <span class="subxS1Comment"># . epilogue</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 069allocate.subx</title>
<title>Mu - 120allocate.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -57,7 +57,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/069allocate.subx'>https://github.com/akkartik/mu/blob/master/069allocate.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/120allocate.subx'>https://github.com/akkartik/mu/blob/master/120allocate.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Helper to dynamically allocate memory on the heap.</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment">#</span>
@ -109,17 +109,17 @@ if ('onhashchange' in window) {
<span id="L48" class="LineNr"> 48 </span> <span class="subxComment"># initialize heap</span>
<span id="L49" class="LineNr"> 49 </span> <span class="subxS1Comment"># . Heap = new-segment(Heap-size)</span>
<span id="L50" class="LineNr"> 50 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L51" class="LineNr"> 51 </span> 68/push <span class="SpecialChar"><a href='069allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L52" class="LineNr"> 52 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='069allocate.subx.html#L34'>Heap-size</a></span>/disp32 <span class="subxComment"># push *Heap-size</span>
<span id="L51" class="LineNr"> 51 </span> 68/push <span class="SpecialChar"><a href='120allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L52" class="LineNr"> 52 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='120allocate.subx.html#L34'>Heap-size</a></span>/disp32 <span class="subxComment"># push *Heap-size</span>
<span id="L53" class="LineNr"> 53 </span> <span class="subxS2Comment"># . . call</span>
<span id="L54" class="LineNr"> 54 </span> e8/call <a href='053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L54" class="LineNr"> 54 </span> e8/call <a href='104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L55" class="LineNr"> 55 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L56" class="LineNr"> 56 </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="L57" class="LineNr"> 57 </span>
<span id="L58" class="LineNr"> 58 </span> e8/call run-tests/disp32 <span class="subxComment"># 'run-tests' is a function created automatically by SubX. It calls all functions that start with 'test-'.</span>
<span id="L59" class="LineNr"> 59 </span><span class="Constant">$array-equal-main:end</span>:
<span id="L60" class="LineNr"> 60 </span> <span class="subxComment"># syscall(exit, Num-test-failures)</span>
<span id="L61" class="LineNr"> 61 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='051test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L61" class="LineNr"> 61 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='102test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L62" class="LineNr"> 62 </span> e8/call syscall_exit/disp32
<span id="L63" class="LineNr"> 63 </span>
<span id="L64" class="LineNr"> 64 </span><span class="subxComment"># Allocate and clear 'n' bytes of memory from an allocation-descriptor 'ad'.</span>
@ -136,7 +136,7 @@ if ('onhashchange' in window) {
<span id="L75" class="LineNr"> 75 </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="L76" class="LineNr"> 76 </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="L77" class="LineNr"> 77 </span> <span class="subxS2Comment"># . . call</span>
<span id="L78" class="LineNr"> 78 </span> e8/call <a href='069allocate.subx.html#L103'>allocate-raw</a>/disp32
<span id="L78" class="LineNr"> 78 </span> e8/call <a href='120allocate.subx.html#L103'>allocate-raw</a>/disp32
<span id="L79" class="LineNr"> 79 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L80" class="LineNr"> 80 </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="L81" class="LineNr"> 81 </span> <span class="subxComment"># eax = out-&gt;payload + 4</span>
@ -148,7 +148,7 @@ if ('onhashchange' in window) {
<span id="L87" class="LineNr"> 87 </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="L88" class="LineNr"> 88 </span> 50/push-eax
<span id="L89" class="LineNr"> 89 </span> <span class="subxS2Comment"># . . call</span>
<span id="L90" class="LineNr"> 90 </span> e8/call <a href='069allocate.subx.html#L877'>zero-out</a>/disp32
<span id="L90" class="LineNr"> 90 </span> e8/call <a href='120allocate.subx.html#L877'>zero-out</a>/disp32
<span id="L91" class="LineNr"> 91 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L92" class="LineNr"> 92 </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="L93" class="LineNr"> 93 </span><span class="Constant">$allocate:end</span>:
@ -179,7 +179,7 @@ if ('onhashchange' in window) {
<span id="L118" class="LineNr">118 </span> <span class="subxComment"># ebx = n</span>
<span id="L119" class="LineNr">119 </span> 8b/copy 1/mod/*+disp8 5/rm32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx 0xc/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ebp+12) to ebx</span>
<span id="L120" class="LineNr">120 </span> <span class="subxComment"># out-&gt;alloc-id = Next-alloc-id</span>
<span id="L121" class="LineNr">121 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='069allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 <span class="subxComment"># copy *Next-alloc-id to eax</span>
<span id="L121" class="LineNr">121 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="SpecialChar"><a href='120allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 <span class="subxComment"># copy *Next-alloc-id to eax</span>
<span id="L122" class="LineNr">122 </span> 89/copy 0/mod/indirect 2/rm32/edx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy eax to *edx</span>
<span id="L123" class="LineNr">123 </span> <span class="subxComment"># out-&gt;payload = ad-&gt;curr</span>
<span id="L124" class="LineNr">124 </span> 8b/copy 0/mod/indirect 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy *ecx to eax</span>
@ -187,11 +187,11 @@ if ('onhashchange' in window) {
<span id="L126" class="LineNr">126 </span> 89/copy 1/mod/*+disp8 2/rm32/edx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy eax to *(edx+4)</span>
<span id="L127" class="LineNr">127 </span> <span class="subxComment"># *out-&gt;payload = Next-alloc-id</span>
<span id="L128" class="LineNr">128 </span> 8b/copy 1/mod/*+disp8 2/rm32/edx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 7/r32/edi 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(edx+4) to edi</span>
<span id="L129" class="LineNr">129 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 6/r32/esi <span class="SpecialChar"><a href='069allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 <span class="subxComment"># copy *Next-alloc-id to esi</span>
<span id="L129" class="LineNr">129 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 6/r32/esi <span class="SpecialChar"><a href='120allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 <span class="subxComment"># copy *Next-alloc-id to esi</span>
<span id="L130" class="LineNr">130 </span> 89/copy 0/mod/indirect 7/rm32/edi <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 6/r32/esi <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy esi to *edi</span>
<span id="L131" class="LineNr">131 </span><span class="Constant">$allocate-raw:increment-next-alloc-id</span>:
<span id="L132" class="LineNr">132 </span> <span class="subxComment"># increment *Next-alloc-id</span>
<span id="L133" class="LineNr">133 </span> ff 0/subop/increment 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='069allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 <span class="subxComment"># increment *Next-alloc-id</span>
<span id="L133" class="LineNr">133 </span> ff 0/subop/increment 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='120allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 <span class="subxComment"># increment *Next-alloc-id</span>
<span id="L134" class="LineNr">134 </span> <span class="subxComment"># check if there's enough space</span>
<span id="L135" class="LineNr">135 </span> <span class="subxComment"># TODO: move this check up before any state updates when we support error recovery</span>
<span id="L136" class="LineNr">136 </span> 8d/copy-address 1/mod/*+disp8 4/rm32/sib 0/base/eax 3/index/ebx <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy eax+ebx+4 to eax</span>
@ -219,7 +219,7 @@ if ('onhashchange' in window) {
<span id="L158" class="LineNr">158 </span> 68/push <span class="Constant">&quot;allocate: failed\n&quot;</span>/imm32
<span id="L159" class="LineNr">159 </span> 68/push 2/imm32/stderr
<span id="L160" class="LineNr">160 </span> <span class="subxS2Comment"># . . call</span>
<span id="L161" class="LineNr">161 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L161" class="LineNr">161 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L162" class="LineNr">162 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L163" class="LineNr">163 </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="L164" class="LineNr">164 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -240,7 +240,7 @@ if ('onhashchange' in window) {
<span id="L179" class="LineNr">179 </span> 51/push-ecx
<span id="L180" class="LineNr">180 </span> 68/push 0x200/imm32
<span id="L181" class="LineNr">181 </span> <span class="subxS2Comment"># . . call</span>
<span id="L182" class="LineNr">182 </span> e8/call <a href='053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L182" class="LineNr">182 </span> e8/call <a href='104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L183" class="LineNr">183 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L184" class="LineNr">184 </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="L185" class="LineNr">185 </span> <span class="subxComment"># var expected-payload/ebx = ad-&gt;curr</span>
@ -250,71 +250,71 @@ if ('onhashchange' in window) {
<span id="L189" class="LineNr">189 </span> 68/push 0/imm32
<span id="L190" class="LineNr">190 </span> 89/copy 3/mod/direct 2/rm32/edx <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 edx</span>
<span id="L191" class="LineNr">191 </span> <span class="subxComment"># *Next-alloc-id = 0x34</span>
<span id="L192" class="LineNr">192 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='069allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 0x34/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L192" class="LineNr">192 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='120allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 0x34/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L193" class="LineNr">193 </span> <span class="subxComment"># allocate-raw(ad, 3, h)</span>
<span id="L194" class="LineNr">194 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L195" class="LineNr">195 </span> 52/push-edx
<span id="L196" class="LineNr">196 </span> 68/push 3/imm32
<span id="L197" class="LineNr">197 </span> 51/push-ecx
<span id="L198" class="LineNr">198 </span> <span class="subxS2Comment"># . . call</span>
<span id="L199" class="LineNr">199 </span> e8/call <a href='069allocate.subx.html#L103'>allocate-raw</a>/disp32
<span id="L199" class="LineNr">199 </span> e8/call <a href='120allocate.subx.html#L103'>allocate-raw</a>/disp32
<span id="L200" class="LineNr">200 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L201" class="LineNr">201 </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="L202" class="LineNr">202 </span> <span class="subxComment"># check-ints-equal(h-&gt;alloc-id, 0x34, msg)</span>
<span id="L203" class="LineNr">203 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L204" class="LineNr">204 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L169'>test-allocate-raw-success</a>: sets alloc-id in handle&quot;</span>/imm32
<span id="L204" class="LineNr">204 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L169'>test-allocate-raw-success</a>: sets alloc-id in handle&quot;</span>/imm32
<span id="L205" class="LineNr">205 </span> 68/push 0x34/imm32
<span id="L206" class="LineNr">206 </span> ff 6/subop/push 0/mod/indirect 2/rm32/edx <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 *edx</span>
<span id="L207" class="LineNr">207 </span> <span class="subxS2Comment"># . . call</span>
<span id="L208" class="LineNr">208 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L208" class="LineNr">208 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L209" class="LineNr">209 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L210" class="LineNr">210 </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="L211" class="LineNr">211 </span> <span class="subxComment"># check-ints-equal(h-&gt;payload, expected-payload, msg)</span>
<span id="L212" class="LineNr">212 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L213" class="LineNr">213 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L169'>test-allocate-raw-success</a>: sets payload in handle&quot;</span>/imm32
<span id="L213" class="LineNr">213 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L169'>test-allocate-raw-success</a>: sets payload in handle&quot;</span>/imm32
<span id="L214" class="LineNr">214 </span> 53/push-ebx
<span id="L215" class="LineNr">215 </span> ff 6/subop/push 1/mod/*+disp8 2/rm32/edx <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 *(edx+4)</span>
<span id="L216" class="LineNr">216 </span> <span class="subxS2Comment"># . . call</span>
<span id="L217" class="LineNr">217 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L217" class="LineNr">217 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L218" class="LineNr">218 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L219" class="LineNr">219 </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="L220" class="LineNr">220 </span> <span class="subxComment"># check-ints-equal(h-&gt;payload-&gt;alloc-id, 0x34, msg)</span>
<span id="L221" class="LineNr">221 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L222" class="LineNr">222 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L169'>test-allocate-raw-success</a>: sets alloc-id in payload&quot;</span>/imm32
<span id="L222" class="LineNr">222 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L169'>test-allocate-raw-success</a>: sets alloc-id in payload&quot;</span>/imm32
<span id="L223" class="LineNr">223 </span> 68/push 0x34/imm32
<span id="L224" class="LineNr">224 </span> ff 6/subop/push 0/mod/indirect 3/rm32/ebx <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 *ebx</span>
<span id="L225" class="LineNr">225 </span> <span class="subxS2Comment"># . . call</span>
<span id="L226" class="LineNr">226 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L226" class="LineNr">226 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L227" class="LineNr">227 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L228" class="LineNr">228 </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="L229" class="LineNr">229 </span> <span class="subxComment"># check-ints-equal(*Next-alloc-id, 0x35, msg)</span>
<span id="L230" class="LineNr">230 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L231" class="LineNr">231 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L169'>test-allocate-raw-success</a>: increments Next-alloc-id&quot;</span>/imm32
<span id="L231" class="LineNr">231 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L169'>test-allocate-raw-success</a>: increments Next-alloc-id&quot;</span>/imm32
<span id="L232" class="LineNr">232 </span> 68/push 0x35/imm32
<span id="L233" class="LineNr">233 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='069allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 <span class="subxComment"># push *Next-alloc-id</span>
<span id="L233" class="LineNr">233 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='120allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 <span class="subxComment"># push *Next-alloc-id</span>
<span id="L234" class="LineNr">234 </span> <span class="subxS2Comment"># . . call</span>
<span id="L235" class="LineNr">235 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L235" class="LineNr">235 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L236" class="LineNr">236 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L237" class="LineNr">237 </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="L238" class="LineNr">238 </span> <span class="subxComment"># check-ints-equal(ad-&gt;curr - expected-payload, 3 + 4 for alloc-id, msg)</span>
<span id="L239" class="LineNr">239 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L240" class="LineNr">240 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L169'>test-allocate-raw-success</a>: updates allocation descriptor&quot;</span>/imm32
<span id="L240" class="LineNr">240 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L169'>test-allocate-raw-success</a>: updates allocation descriptor&quot;</span>/imm32
<span id="L241" class="LineNr">241 </span> 68/push 7/imm32
<span id="L242" class="LineNr">242 </span> 8b/copy 0/mod/indirect 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy *ecx to eax</span>
<span id="L243" class="LineNr">243 </span> 29/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># subtract ebx from eax</span>
<span id="L244" class="LineNr">244 </span> 50/push-eax
<span id="L245" class="LineNr">245 </span> <span class="subxS2Comment"># . . call</span>
<span id="L246" class="LineNr">246 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L246" class="LineNr">246 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L247" class="LineNr">247 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L248" class="LineNr">248 </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="L249" class="LineNr">249 </span> <span class="subxComment"># clean up</span>
<span id="L250" class="LineNr">250 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='069allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 0x100/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L250" class="LineNr">250 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='120allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 0x100/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L251" class="LineNr">251 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L252" class="LineNr">252 </span> 89/copy 3/mod/direct 4/rm32/esp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 5/r32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy ebp to esp</span>
<span id="L253" class="LineNr">253 </span> 5d/pop-to-ebp
<span id="L254" class="LineNr">254 </span> c3/return
<span id="L255" class="LineNr">255 </span>
<span id="L256" class="LineNr">256 </span><span class="subxFunction">lookup</span>: <span class="subxComment"># h: (handle T) -&gt; eax: (addr T)</span>
<span id="L256" class="LineNr">256 </span><span class="subxFunction">lookup</span>: <span class="subxComment"># h: (handle T) -&gt; result/eax: (addr T)</span>
<span id="L257" class="LineNr">257 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L258" class="LineNr">258 </span> 55/push-ebp
<span id="L259" class="LineNr">259 </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>
@ -348,7 +348,7 @@ if ('onhashchange' in window) {
<span id="L287" class="LineNr">287 </span> 68/push <span class="Constant">&quot;lookup failed\n&quot;</span>/imm32
<span id="L288" class="LineNr">288 </span> 68/push 2/imm32/stderr
<span id="L289" class="LineNr">289 </span> <span class="subxS2Comment"># . . call</span>
<span id="L290" class="LineNr">290 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L290" class="LineNr">290 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L291" class="LineNr">291 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L292" class="LineNr">292 </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="L293" class="LineNr">293 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -368,7 +368,7 @@ if ('onhashchange' in window) {
<span id="L307" class="LineNr">307 </span> 53/push-ebx
<span id="L308" class="LineNr">308 </span> 68/push 0x200/imm32
<span id="L309" class="LineNr">309 </span> <span class="subxS2Comment"># . . call</span>
<span id="L310" class="LineNr">310 </span> e8/call <a href='053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L310" class="LineNr">310 </span> e8/call <a href='104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L311" class="LineNr">311 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L312" class="LineNr">312 </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="L313" class="LineNr">313 </span> <span class="subxComment"># var handle/ecx: handle</span>
@ -383,7 +383,7 @@ if ('onhashchange' in window) {
<span id="L322" class="LineNr">322 </span> 68/push 2/imm32/size
<span id="L323" class="LineNr">323 </span> 53/push-ebx
<span id="L324" class="LineNr">324 </span> <span class="subxS2Comment"># . . call</span>
<span id="L325" class="LineNr">325 </span> e8/call <a href='069allocate.subx.html#L103'>allocate-raw</a>/disp32
<span id="L325" class="LineNr">325 </span> e8/call <a href='120allocate.subx.html#L103'>allocate-raw</a>/disp32
<span id="L326" class="LineNr">326 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L327" class="LineNr">327 </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="L328" class="LineNr">328 </span> <span class="subxComment"># eax = lookup(handle)</span>
@ -391,7 +391,7 @@ if ('onhashchange' in window) {
<span id="L330" class="LineNr">330 </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="L331" class="LineNr">331 </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="L332" class="LineNr">332 </span> <span class="subxS2Comment"># . . call</span>
<span id="L333" class="LineNr">333 </span> e8/call <a href='069allocate.subx.html#L256'>lookup</a>/disp32
<span id="L333" class="LineNr">333 </span> e8/call <a href='120allocate.subx.html#L256'>lookup</a>/disp32
<span id="L334" class="LineNr">334 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L335" class="LineNr">335 </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="L336" class="LineNr">336 </span> <span class="subxComment"># eax contains old top of heap, except skipping the alloc-id in the payload</span>
@ -402,11 +402,11 @@ if ('onhashchange' in window) {
<span id="L341" class="LineNr">341 </span> 52/push-edx
<span id="L342" class="LineNr">342 </span> 50/push-eax
<span id="L343" class="LineNr">343 </span> <span class="subxS2Comment"># . . call</span>
<span id="L344" class="LineNr">344 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L344" class="LineNr">344 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L345" class="LineNr">345 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L346" class="LineNr">346 </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="L347" class="LineNr">347 </span> <span class="subxComment"># clean up</span>
<span id="L348" class="LineNr">348 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='069allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 0x100/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L348" class="LineNr">348 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='120allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 0x100/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L349" class="LineNr">349 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L350" class="LineNr">350 </span> 89/copy 3/mod/direct 4/rm32/esp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 5/r32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy ebp to esp</span>
<span id="L351" class="LineNr">351 </span> 5d/pop-to-ebp
@ -425,7 +425,7 @@ if ('onhashchange' in window) {
<span id="L364" class="LineNr">364 </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="L365" class="LineNr">365 </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="L366" class="LineNr">366 </span> <span class="subxS2Comment"># . . call</span>
<span id="L367" class="LineNr">367 </span> e8/call <a href='069allocate.subx.html#L256'>lookup</a>/disp32
<span id="L367" class="LineNr">367 </span> e8/call <a href='120allocate.subx.html#L256'>lookup</a>/disp32
<span id="L368" class="LineNr">368 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L369" class="LineNr">369 </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="L370" class="LineNr">370 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -434,7 +434,7 @@ if ('onhashchange' in window) {
<span id="L373" class="LineNr">373 </span> 68/push 0/imm32
<span id="L374" class="LineNr">374 </span> 50/push-eax
<span id="L375" class="LineNr">375 </span> <span class="subxS2Comment"># . . call</span>
<span id="L376" class="LineNr">376 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L376" class="LineNr">376 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L377" class="LineNr">377 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L378" class="LineNr">378 </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="L379" class="LineNr">379 </span> <span class="subxS1Comment"># . epilogue</span>
@ -455,7 +455,7 @@ if ('onhashchange' in window) {
<span id="L394" class="LineNr">394 </span> 56/push-esi
<span id="L395" class="LineNr">395 </span> 68/push 0x200/imm32
<span id="L396" class="LineNr">396 </span> <span class="subxS2Comment"># . . call</span>
<span id="L397" class="LineNr">397 </span> e8/call <a href='053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L397" class="LineNr">397 </span> e8/call <a href='104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L398" class="LineNr">398 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L399" class="LineNr">399 </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="L400" class="LineNr">400 </span> <span class="subxComment"># var h1/ecx: handle</span>
@ -471,7 +471,7 @@ if ('onhashchange' in window) {
<span id="L410" class="LineNr">410 </span> 68/push 2/imm32/size
<span id="L411" class="LineNr">411 </span> 56/push-esi
<span id="L412" class="LineNr">412 </span> <span class="subxS2Comment"># . . call</span>
<span id="L413" class="LineNr">413 </span> e8/call <a href='069allocate.subx.html#L66'>allocate</a>/disp32
<span id="L413" class="LineNr">413 </span> e8/call <a href='120allocate.subx.html#L66'>allocate</a>/disp32
<span id="L414" class="LineNr">414 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L415" class="LineNr">415 </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="L416" class="LineNr">416 </span> <span class="subxComment"># reset heap-&gt;curr to mimic reclamation</span>
@ -487,7 +487,7 @@ if ('onhashchange' in window) {
<span id="L426" class="LineNr">426 </span> 68/push 2/imm32/size
<span id="L427" class="LineNr">427 </span> 56/push-esi
<span id="L428" class="LineNr">428 </span> <span class="subxS2Comment"># . . call</span>
<span id="L429" class="LineNr">429 </span> e8/call <a href='069allocate.subx.html#L66'>allocate</a>/disp32
<span id="L429" class="LineNr">429 </span> e8/call <a href='120allocate.subx.html#L66'>allocate</a>/disp32
<span id="L430" class="LineNr">430 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L431" class="LineNr">431 </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="L432" class="LineNr">432 </span> <span class="subxComment"># check-ints-equal(h1-&gt;address, h2-&gt;address, msg)</span>
@ -496,7 +496,7 @@ if ('onhashchange' in window) {
<span id="L435" class="LineNr">435 </span> ff 6/subop/push 1/mod/*+disp8 2/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 *(edx+4)</span>
<span id="L436" class="LineNr">436 </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="L437" class="LineNr">437 </span> <span class="subxS2Comment"># . . call</span>
<span id="L438" class="LineNr">438 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L438" class="LineNr">438 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L439" class="LineNr">439 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L440" class="LineNr">440 </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="L441" class="LineNr">441 </span> <span class="subxComment"># lookup(h1) should crash</span>
@ -504,19 +504,19 @@ if ('onhashchange' in window) {
<span id="L443" class="LineNr">443 </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="L444" class="LineNr">444 </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="L445" class="LineNr">445 </span> <span class="subxS2Comment"># . . call</span>
<span id="L446" class="LineNr">446 </span> e8/call <a href='069allocate.subx.html#L256'>lookup</a>/disp32
<span id="L446" class="LineNr">446 </span> e8/call <a href='120allocate.subx.html#L256'>lookup</a>/disp32
<span id="L447" class="LineNr">447 </span> <span class="subxComment"># should never get past this point</span>
<span id="L448" class="LineNr">448 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L449" class="LineNr">449 </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="L450" class="LineNr">450 </span> <span class="subxComment"># clean up</span>
<span id="L451" class="LineNr">451 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='069allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 0x100/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L451" class="LineNr">451 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='120allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 0x100/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L452" class="LineNr">452 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L453" class="LineNr">453 </span> 89/copy 3/mod/direct 4/rm32/esp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 5/r32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy ebp to esp</span>
<span id="L454" class="LineNr">454 </span> 5d/pop-to-ebp
<span id="L455" class="LineNr">455 </span> c3/return
<span id="L456" class="LineNr">456 </span>
<span id="L457" class="LineNr">457 </span><span class="subxComment"># when comparing handles, just treat them as pure values</span>
<span id="L458" class="LineNr">458 </span><span class="subxFunction">handle-equal?</span>: <span class="subxComment"># a: handle, b: handle -&gt; eax: boolean</span>
<span id="L458" class="LineNr">458 </span><span class="subxFunction">handle-equal?</span>: <span class="subxComment"># a: handle, b: handle -&gt; result/eax: boolean</span>
<span id="L459" class="LineNr">459 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L460" class="LineNr">460 </span> 55/push-ebp
<span id="L461" class="LineNr">461 </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>
@ -584,7 +584,7 @@ if ('onhashchange' in window) {
<span id="L523" class="LineNr">523 </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="L524" class="LineNr">524 </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="L525" class="LineNr">525 </span> <span class="subxS2Comment"># . . call</span>
<span id="L526" class="LineNr">526 </span> e8/call <a href='069allocate.subx.html#L66'>allocate</a>/disp32
<span id="L526" class="LineNr">526 </span> e8/call <a href='120allocate.subx.html#L66'>allocate</a>/disp32
<span id="L527" class="LineNr">527 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L528" class="LineNr">528 </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="L529" class="LineNr">529 </span> <span class="subxComment"># eax = out-&gt;payload</span>
@ -624,7 +624,7 @@ if ('onhashchange' in window) {
<span id="L563" class="LineNr">563 </span> 68/push <span class="Constant">&quot;allocate-region: failed to allocate\n&quot;</span>/imm32
<span id="L564" class="LineNr">564 </span> 68/push 2/imm32/stderr
<span id="L565" class="LineNr">565 </span> <span class="subxS2Comment"># . . call</span>
<span id="L566" class="LineNr">566 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L566" class="LineNr">566 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L567" class="LineNr">567 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L568" class="LineNr">568 </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="L569" class="LineNr">569 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -652,7 +652,7 @@ if ('onhashchange' in window) {
<span id="L591" class="LineNr">591 </span> 52/push-edx
<span id="L592" class="LineNr">592 </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="L593" class="LineNr">593 </span> <span class="subxS2Comment"># . . call</span>
<span id="L594" class="LineNr">594 </span> e8/call <a href='069allocate.subx.html#L66'>allocate</a>/disp32
<span id="L594" class="LineNr">594 </span> e8/call <a href='120allocate.subx.html#L66'>allocate</a>/disp32
<span id="L595" class="LineNr">595 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L596" class="LineNr">596 </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="L597" class="LineNr">597 </span> <span class="subxComment"># *out-&gt;payload = n</span>
@ -685,7 +685,7 @@ if ('onhashchange' in window) {
<span id="L624" class="LineNr">624 </span> 51/push-ecx
<span id="L625" class="LineNr">625 </span> 68/push 0x200/imm32
<span id="L626" class="LineNr">626 </span> <span class="subxS2Comment"># . . call</span>
<span id="L627" class="LineNr">627 </span> e8/call <a href='053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L627" class="LineNr">627 </span> e8/call <a href='104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L628" class="LineNr">628 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L629" class="LineNr">629 </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="L630" class="LineNr">630 </span> <span class="subxComment"># var expected-payload/ebx = ad-&gt;curr</span>
@ -695,74 +695,74 @@ if ('onhashchange' in window) {
<span id="L634" class="LineNr">634 </span> 68/push 0/imm32
<span id="L635" class="LineNr">635 </span> 89/copy 3/mod/direct 2/rm32/edx <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 edx</span>
<span id="L636" class="LineNr">636 </span> <span class="subxComment"># *Next-alloc-id = 0x34</span>
<span id="L637" class="LineNr">637 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='069allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 0x34/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L637" class="LineNr">637 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='120allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 0x34/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L638" class="LineNr">638 </span> <span class="subxComment"># allocate-array(ad, 3, h)</span>
<span id="L639" class="LineNr">639 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L640" class="LineNr">640 </span> 52/push-edx
<span id="L641" class="LineNr">641 </span> 68/push 3/imm32
<span id="L642" class="LineNr">642 </span> 51/push-ecx
<span id="L643" class="LineNr">643 </span> <span class="subxS2Comment"># . . call</span>
<span id="L644" class="LineNr">644 </span> e8/call <a href='069allocate.subx.html#L576'>allocate-array</a>/disp32
<span id="L644" class="LineNr">644 </span> e8/call <a href='120allocate.subx.html#L576'>allocate-array</a>/disp32
<span id="L645" class="LineNr">645 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L646" class="LineNr">646 </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="L647" class="LineNr">647 </span> <span class="subxComment"># check-ints-equal(h-&gt;alloc-id, 0x34, msg)</span>
<span id="L648" class="LineNr">648 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L649" class="LineNr">649 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L614'>test-allocate-array</a>: sets alloc-id in handle&quot;</span>/imm32
<span id="L649" class="LineNr">649 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L614'>test-allocate-array</a>: sets alloc-id in handle&quot;</span>/imm32
<span id="L650" class="LineNr">650 </span> 68/push 0x34/imm32
<span id="L651" class="LineNr">651 </span> ff 6/subop/push 0/mod/indirect 2/rm32/edx <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 *edx</span>
<span id="L652" class="LineNr">652 </span> <span class="subxS2Comment"># . . call</span>
<span id="L653" class="LineNr">653 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L653" class="LineNr">653 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L654" class="LineNr">654 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L655" class="LineNr">655 </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="L656" class="LineNr">656 </span> <span class="subxComment"># check-ints-equal(h-&gt;payload, expected-payload, msg)</span>
<span id="L657" class="LineNr">657 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L658" class="LineNr">658 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L614'>test-allocate-array</a>: sets payload in handle&quot;</span>/imm32
<span id="L658" class="LineNr">658 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L614'>test-allocate-array</a>: sets payload in handle&quot;</span>/imm32
<span id="L659" class="LineNr">659 </span> 53/push-ebx
<span id="L660" class="LineNr">660 </span> ff 6/subop/push 1/mod/*+disp8 2/rm32/edx <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 *(edx+4)</span>
<span id="L661" class="LineNr">661 </span> <span class="subxS2Comment"># . . call</span>
<span id="L662" class="LineNr">662 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L662" class="LineNr">662 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L663" class="LineNr">663 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L664" class="LineNr">664 </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="L665" class="LineNr">665 </span> <span class="subxComment"># check-ints-equal(h-&gt;payload-&gt;alloc-id, 0x34, msg)</span>
<span id="L666" class="LineNr">666 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L667" class="LineNr">667 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L614'>test-allocate-array</a>: sets alloc-id in payload&quot;</span>/imm32
<span id="L667" class="LineNr">667 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L614'>test-allocate-array</a>: sets alloc-id in payload&quot;</span>/imm32
<span id="L668" class="LineNr">668 </span> 68/push 0x34/imm32
<span id="L669" class="LineNr">669 </span> ff 6/subop/push 0/mod/indirect 3/rm32/ebx <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 *ebx</span>
<span id="L670" class="LineNr">670 </span> <span class="subxS2Comment"># . . call</span>
<span id="L671" class="LineNr">671 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L671" class="LineNr">671 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L672" class="LineNr">672 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L673" class="LineNr">673 </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="L674" class="LineNr">674 </span> <span class="subxComment"># check-ints-equal(h-&gt;payload-&gt;size, 3, msg)</span>
<span id="L675" class="LineNr">675 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L676" class="LineNr">676 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L614'>test-allocate-array</a>: sets array <a href='106size.subx.html#L5'>size</a> in payload&quot;</span>/imm32
<span id="L676" class="LineNr">676 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L614'>test-allocate-array</a>: sets array <a href='307size.subx.html#L5'>size</a> in payload&quot;</span>/imm32
<span id="L677" class="LineNr">677 </span> 68/push 3/imm32
<span id="L678" class="LineNr">678 </span> ff 6/subop/push 1/mod/*+disp8 3/rm32/ebx <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 *(ebx+4)</span>
<span id="L679" class="LineNr">679 </span> <span class="subxS2Comment"># . . call</span>
<span id="L680" class="LineNr">680 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L680" class="LineNr">680 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L681" class="LineNr">681 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L682" class="LineNr">682 </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="L683" class="LineNr">683 </span> <span class="subxComment"># check-ints-equal(*Next-alloc-id, 0x35, msg)</span>
<span id="L684" class="LineNr">684 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L685" class="LineNr">685 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L614'>test-allocate-array</a>: increments Next-alloc-id&quot;</span>/imm32
<span id="L685" class="LineNr">685 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L614'>test-allocate-array</a>: increments Next-alloc-id&quot;</span>/imm32
<span id="L686" class="LineNr">686 </span> 68/push 0x35/imm32
<span id="L687" class="LineNr">687 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='069allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 <span class="subxComment"># push *Next-alloc-id</span>
<span id="L687" class="LineNr">687 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='120allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 <span class="subxComment"># push *Next-alloc-id</span>
<span id="L688" class="LineNr">688 </span> <span class="subxS2Comment"># . . call</span>
<span id="L689" class="LineNr">689 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L689" class="LineNr">689 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L690" class="LineNr">690 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L691" class="LineNr">691 </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="L692" class="LineNr">692 </span> <span class="subxComment"># check-ints-equal(ad-&gt;curr - expected-payload, 3 + 4 for alloc-id + 4 for array size, msg)</span>
<span id="L693" class="LineNr">693 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L694" class="LineNr">694 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L614'>test-allocate-array</a>: updates allocation descriptor&quot;</span>/imm32
<span id="L694" class="LineNr">694 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L614'>test-allocate-array</a>: updates allocation descriptor&quot;</span>/imm32
<span id="L695" class="LineNr">695 </span> 68/push 0xb/imm32
<span id="L696" class="LineNr">696 </span> 8b/copy 0/mod/indirect 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy *ecx to eax</span>
<span id="L697" class="LineNr">697 </span> 29/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># subtract ebx from eax</span>
<span id="L698" class="LineNr">698 </span> 50/push-eax
<span id="L699" class="LineNr">699 </span> <span class="subxS2Comment"># . . call</span>
<span id="L700" class="LineNr">700 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L700" class="LineNr">700 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L701" class="LineNr">701 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L702" class="LineNr">702 </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="L703" class="LineNr">703 </span> <span class="subxComment"># clean up</span>
<span id="L704" class="LineNr">704 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='069allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 1/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L704" class="LineNr">704 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='120allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 1/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L705" class="LineNr">705 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L706" class="LineNr">706 </span> 89/copy 3/mod/direct 4/rm32/esp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 5/r32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy ebp to esp</span>
<span id="L707" class="LineNr">707 </span> 5d/pop-to-ebp
@ -788,7 +788,7 @@ if ('onhashchange' in window) {
<span id="L727" class="LineNr">727 </span> 51/push-ecx
<span id="L728" class="LineNr">728 </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="L729" class="LineNr">729 </span> <span class="subxS2Comment"># . . call</span>
<span id="L730" class="LineNr">730 </span> e8/call <a href='069allocate.subx.html#L66'>allocate</a>/disp32
<span id="L730" class="LineNr">730 </span> e8/call <a href='120allocate.subx.html#L66'>allocate</a>/disp32
<span id="L731" class="LineNr">731 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L732" class="LineNr">732 </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="L733" class="LineNr">733 </span> <span class="subxComment"># var payload/eax: (addr byte) = out-&gt;payload</span>
@ -810,7 +810,7 @@ if ('onhashchange' in window) {
<span id="L749" class="LineNr">749 </span> <span class="subxS2Comment"># . . push payload</span>
<span id="L750" class="LineNr">750 </span> 50/push-eax
<span id="L751" class="LineNr">751 </span> <span class="subxS2Comment"># . . call</span>
<span id="L752" class="LineNr">752 </span> e8/call <a href='056trace.subx.html#L897'>_append-4</a>/disp32
<span id="L752" class="LineNr">752 </span> e8/call <a href='107trace.subx.html#L897'>_append-4</a>/disp32
<span id="L753" class="LineNr">753 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L754" class="LineNr">754 </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> 0x10/imm32 <span class="subxComment"># add to esp</span>
<span id="L755" class="LineNr">755 </span><span class="Constant">$copy-array:end</span>:
@ -843,7 +843,7 @@ if ('onhashchange' in window) {
<span id="L782" class="LineNr">782 </span> 51/push-ecx
<span id="L783" class="LineNr">783 </span> 68/push 0x200/imm32
<span id="L784" class="LineNr">784 </span> <span class="subxS2Comment"># . . call</span>
<span id="L785" class="LineNr">785 </span> e8/call <a href='053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L785" class="LineNr">785 </span> e8/call <a href='104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L786" class="LineNr">786 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L787" class="LineNr">787 </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="L788" class="LineNr">788 </span> <span class="subxComment"># var expected-payload/ebx = ad-&gt;curr</span>
@ -853,41 +853,41 @@ if ('onhashchange' in window) {
<span id="L792" class="LineNr">792 </span> 68/push 0/imm32
<span id="L793" class="LineNr">793 </span> 89/copy 3/mod/direct 2/rm32/edx <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 edx</span>
<span id="L794" class="LineNr">794 </span> <span class="subxComment"># *Next-alloc-id = 0x34</span>
<span id="L795" class="LineNr">795 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='069allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 0x34/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L795" class="LineNr">795 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='120allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 0x34/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L796" class="LineNr">796 </span> <span class="subxComment"># copy-array(ad, src, h)</span>
<span id="L797" class="LineNr">797 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L798" class="LineNr">798 </span> 52/push-edx
<span id="L799" class="LineNr">799 </span> 56/push-esi
<span id="L800" class="LineNr">800 </span> 51/push-ecx
<span id="L801" class="LineNr">801 </span> <span class="subxS2Comment"># . . call</span>
<span id="L802" class="LineNr">802 </span> e8/call <a href='069allocate.subx.html#L710'>copy-array</a>/disp32
<span id="L802" class="LineNr">802 </span> e8/call <a href='120allocate.subx.html#L710'>copy-array</a>/disp32
<span id="L803" class="LineNr">803 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L804" class="LineNr">804 </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="L805" class="LineNr">805 </span> <span class="subxComment"># check-ints-equal(h-&gt;alloc-id, 0x34, msg)</span>
<span id="L806" class="LineNr">806 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L807" class="LineNr">807 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L766'>test-copy-array</a>: sets alloc-id in handle&quot;</span>/imm32
<span id="L807" class="LineNr">807 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L766'>test-copy-array</a>: sets alloc-id in handle&quot;</span>/imm32
<span id="L808" class="LineNr">808 </span> 68/push 0x34/imm32
<span id="L809" class="LineNr">809 </span> ff 6/subop/push 0/mod/indirect 2/rm32/edx <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 *edx</span>
<span id="L810" class="LineNr">810 </span> <span class="subxS2Comment"># . . call</span>
<span id="L811" class="LineNr">811 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L811" class="LineNr">811 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L812" class="LineNr">812 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L813" class="LineNr">813 </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="L814" class="LineNr">814 </span> <span class="subxComment"># check-ints-equal(h-&gt;payload, expected-payload, msg)</span>
<span id="L815" class="LineNr">815 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L816" class="LineNr">816 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L766'>test-copy-array</a>: sets payload in handle&quot;</span>/imm32
<span id="L816" class="LineNr">816 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L766'>test-copy-array</a>: sets payload in handle&quot;</span>/imm32
<span id="L817" class="LineNr">817 </span> 53/push-ebx
<span id="L818" class="LineNr">818 </span> ff 6/subop/push 1/mod/*+disp8 2/rm32/edx <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 *(edx+4)</span>
<span id="L819" class="LineNr">819 </span> <span class="subxS2Comment"># . . call</span>
<span id="L820" class="LineNr">820 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L820" class="LineNr">820 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L821" class="LineNr">821 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L822" class="LineNr">822 </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="L823" class="LineNr">823 </span> <span class="subxComment"># check-ints-equal(h-&gt;payload-&gt;alloc-id, 0x34, msg)</span>
<span id="L824" class="LineNr">824 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L825" class="LineNr">825 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L766'>test-copy-array</a>: sets alloc-id in payload&quot;</span>/imm32
<span id="L825" class="LineNr">825 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L766'>test-copy-array</a>: sets alloc-id in payload&quot;</span>/imm32
<span id="L826" class="LineNr">826 </span> 68/push 0x34/imm32
<span id="L827" class="LineNr">827 </span> ff 6/subop/push 0/mod/indirect 2/rm32/edx <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 *edx</span>
<span id="L828" class="LineNr">828 </span> <span class="subxS2Comment"># . . call</span>
<span id="L829" class="LineNr">829 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L829" class="LineNr">829 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L830" class="LineNr">830 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L831" class="LineNr">831 </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="L832" class="LineNr">832 </span> <span class="subxComment"># var payload/eax: (addr int) = lookup(h)</span>
@ -895,40 +895,40 @@ if ('onhashchange' in window) {
<span id="L834" class="LineNr">834 </span> ff 6/subop/push 1/mod/*+disp8 2/rm32/edx <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 *(edx+4)</span>
<span id="L835" class="LineNr">835 </span> ff 6/subop/push 0/mod/indirect 2/rm32/edx <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 *edx</span>
<span id="L836" class="LineNr">836 </span> <span class="subxS2Comment"># . . call</span>
<span id="L837" class="LineNr">837 </span> e8/call <a href='069allocate.subx.html#L256'>lookup</a>/disp32
<span id="L837" class="LineNr">837 </span> e8/call <a href='120allocate.subx.html#L256'>lookup</a>/disp32
<span id="L838" class="LineNr">838 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L839" class="LineNr">839 </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="L840" class="LineNr">840 </span> <span class="subxComment"># check-ints-equal(payload-&gt;size, 0xc, msg)</span>
<span id="L841" class="LineNr">841 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L842" class="LineNr">842 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L766'>test-copy-array</a>: sets array <a href='106size.subx.html#L5'>size</a> in payload&quot;</span>/imm32
<span id="L842" class="LineNr">842 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L766'>test-copy-array</a>: sets array <a href='307size.subx.html#L5'>size</a> in payload&quot;</span>/imm32
<span id="L843" class="LineNr">843 </span> 68/push 0xc/imm32
<span id="L844" class="LineNr">844 </span> ff 6/subop/push 0/mod/indirect 0/rm32/eax <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 *eax</span>
<span id="L845" class="LineNr">845 </span> <span class="subxS2Comment"># . . call</span>
<span id="L846" class="LineNr">846 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L846" class="LineNr">846 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L847" class="LineNr">847 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L848" class="LineNr">848 </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="L849" class="LineNr">849 </span> <span class="subxComment"># check-ints-equal(*Next-alloc-id, 0x35, msg)</span>
<span id="L850" class="LineNr">850 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L851" class="LineNr">851 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L766'>test-copy-array</a>: increments Next-alloc-id&quot;</span>/imm32
<span id="L851" class="LineNr">851 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L766'>test-copy-array</a>: increments Next-alloc-id&quot;</span>/imm32
<span id="L852" class="LineNr">852 </span> 68/push 0x35/imm32
<span id="L853" class="LineNr">853 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='069allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 <span class="subxComment"># push *Next-alloc-id</span>
<span id="L853" class="LineNr">853 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='120allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 <span class="subxComment"># push *Next-alloc-id</span>
<span id="L854" class="LineNr">854 </span> <span class="subxS2Comment"># . . call</span>
<span id="L855" class="LineNr">855 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L855" class="LineNr">855 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L856" class="LineNr">856 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L857" class="LineNr">857 </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="L858" class="LineNr">858 </span> <span class="subxComment"># check-ints-equal(ad-&gt;curr - expected-payload, 12 + 4 for alloc-id + 4 for length, msg)</span>
<span id="L859" class="LineNr">859 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L860" class="LineNr">860 </span> 68/push <span class="Constant">&quot;F - <a href='069allocate.subx.html#L766'>test-copy-array</a>: updates allocation descriptor&quot;</span>/imm32
<span id="L860" class="LineNr">860 </span> 68/push <span class="Constant">&quot;F - <a href='120allocate.subx.html#L766'>test-copy-array</a>: updates allocation descriptor&quot;</span>/imm32
<span id="L861" class="LineNr">861 </span> 68/push 0x14/imm32
<span id="L862" class="LineNr">862 </span> 8b/copy 0/mod/indirect 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy *ecx to eax</span>
<span id="L863" class="LineNr">863 </span> 29/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># subtract ebx from eax</span>
<span id="L864" class="LineNr">864 </span> 50/push-eax
<span id="L865" class="LineNr">865 </span> <span class="subxS2Comment"># . . call</span>
<span id="L866" class="LineNr">866 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L866" class="LineNr">866 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L867" class="LineNr">867 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L868" class="LineNr">868 </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="L869" class="LineNr">869 </span> <span class="subxComment"># clean up</span>
<span id="L870" class="LineNr">870 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='069allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 1/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L870" class="LineNr">870 </span> c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='120allocate.subx.html#L37'>Next-alloc-id</a></span>/disp32 1/imm32 <span class="subxComment"># copy to *Next-alloc-id</span>
<span id="L871" class="LineNr">871 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L872" class="LineNr">872 </span> 89/copy 3/mod/direct 4/rm32/esp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 5/r32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy ebp to esp</span>
<span id="L873" class="LineNr">873 </span> 5d/pop-to-ebp
@ -993,7 +993,7 @@ if ('onhashchange' in window) {
<span id="L932" class="LineNr">932 </span> 68/push 3/imm32/len
<span id="L933" class="LineNr">933 </span> 51/push-ecx
<span id="L934" class="LineNr">934 </span> <span class="subxS2Comment"># . . call</span>
<span id="L935" class="LineNr">935 </span> e8/call <a href='069allocate.subx.html#L877'>zero-out</a>/disp32
<span id="L935" class="LineNr">935 </span> e8/call <a href='120allocate.subx.html#L877'>zero-out</a>/disp32
<span id="L936" class="LineNr">936 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L937" class="LineNr">937 </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="L938" class="LineNr">938 </span> <span class="subxComment"># first 3 bytes cleared, fourth left alone</span>
@ -1003,7 +1003,7 @@ if ('onhashchange' in window) {
<span id="L942" class="LineNr">942 </span> 68/push 0x37000000/imm32
<span id="L943" class="LineNr">943 </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="L944" class="LineNr">944 </span> <span class="subxS2Comment"># . . call</span>
<span id="L945" class="LineNr">945 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L945" class="LineNr">945 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L946" class="LineNr">946 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L947" class="LineNr">947 </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="L948" class="LineNr">948 </span> <span class="subxS1Comment"># . epilogue</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 070new-stream.subx</title>
<title>Mu - 121new-stream.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -55,7 +55,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/070new-stream.subx'>https://github.com/akkartik/mu/blob/master/070new-stream.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/121new-stream.subx'>https://github.com/akkartik/mu/blob/master/121new-stream.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Helper to allocate a stream on the heap.</span>
<span id="L2" class="LineNr"> 2 </span>
@ -90,7 +90,7 @@ if ('onhashchange' in window) {
<span id="L31" class="LineNr"> 31 </span> 50/push-eax
<span id="L32" class="LineNr"> 32 </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="L33" class="LineNr"> 33 </span> <span class="subxS2Comment"># . . call</span>
<span id="L34" class="LineNr"> 34 </span> e8/call <a href='069allocate.subx.html#L66'>allocate</a>/disp32
<span id="L34" class="LineNr"> 34 </span> e8/call <a href='120allocate.subx.html#L66'>allocate</a>/disp32
<span id="L35" class="LineNr"> 35 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L36" class="LineNr"> 36 </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="L37" class="LineNr"> 37 </span> <span class="subxComment"># eax = out-&gt;payload</span>
@ -104,7 +104,7 @@ if ('onhashchange' in window) {
<span id="L45" class="LineNr"> 45 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L46" class="LineNr"> 46 </span> 50/push-eax
<span id="L47" class="LineNr"> 47 </span> <span class="subxS2Comment"># . . call</span>
<span id="L48" class="LineNr"> 48 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L48" class="LineNr"> 48 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L49" class="LineNr"> 49 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L50" class="LineNr"> 50 </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="L51" class="LineNr"> 51 </span><span class="Constant">$new-stream:end</span>:
@ -119,10 +119,10 @@ if ('onhashchange' in window) {
<span id="L60" class="LineNr"> 60 </span><span class="Constant">$new-stream:abort</span>:
<span id="L61" class="LineNr"> 61 </span> <span class="subxS1Comment"># . _write(2/stderr, error)</span>
<span id="L62" class="LineNr"> 62 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L63" class="LineNr"> 63 </span> 68/push <span class="Constant">&quot;new-stream: <a href='106size.subx.html#L5'>size</a> too large\n&quot;</span>/imm32
<span id="L63" class="LineNr"> 63 </span> 68/push <span class="Constant">&quot;new-stream: <a href='307size.subx.html#L5'>size</a> too large\n&quot;</span>/imm32
<span id="L64" class="LineNr"> 64 </span> 68/push 2/imm32/stderr
<span id="L65" class="LineNr"> 65 </span> <span class="subxS2Comment"># . . call</span>
<span id="L66" class="LineNr"> 66 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L66" class="LineNr"> 66 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L67" class="LineNr"> 67 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L68" class="LineNr"> 68 </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="L69" class="LineNr"> 69 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -143,7 +143,7 @@ if ('onhashchange' in window) {
<span id="L84" class="LineNr"> 84 </span> 51/push-ecx
<span id="L85" class="LineNr"> 85 </span> 68/push 0x200/imm32
<span id="L86" class="LineNr"> 86 </span> <span class="subxS2Comment"># . . call</span>
<span id="L87" class="LineNr"> 87 </span> e8/call <a href='053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L87" class="LineNr"> 87 </span> e8/call <a href='104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L88" class="LineNr"> 88 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L89" class="LineNr"> 89 </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="L90" class="LineNr"> 90 </span> <span class="subxComment"># var start/edx = ad-&gt;curr</span>
@ -159,29 +159,29 @@ if ('onhashchange' in window) {
<span id="L100" class="LineNr">100 </span> 68/push 3/imm32
<span id="L101" class="LineNr">101 </span> 51/push-ecx
<span id="L102" class="LineNr">102 </span> <span class="subxS2Comment"># . . call</span>
<span id="L103" class="LineNr">103 </span> e8/call <a href='070new-stream.subx.html#L8'>new-stream</a>/disp32
<span id="L103" class="LineNr">103 </span> e8/call <a href='121new-stream.subx.html#L8'>new-stream</a>/disp32
<span id="L104" class="LineNr">104 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L105" class="LineNr">105 </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> 0x10/imm32 <span class="subxComment"># add to esp</span>
<span id="L106" class="LineNr">106 </span> <span class="subxComment"># eax = out-&gt;payload</span>
<span id="L107" class="LineNr">107 </span> 8b/copy 1/mod/*+disp8 3/rm32/ebx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ebx+4) to eax</span>
<span id="L108" class="LineNr">108 </span> <span class="subxComment"># check-ints-equal(eax, edx, msg)</span>
<span id="L109" class="LineNr">109 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L110" class="LineNr">110 </span> 68/push <span class="Constant">&quot;F - <a href='070new-stream.subx.html#L74'>test-new-stream</a>: returns current pointer of allocation descriptor&quot;</span>/imm32
<span id="L110" class="LineNr">110 </span> 68/push <span class="Constant">&quot;F - <a href='121new-stream.subx.html#L74'>test-new-stream</a>: returns current pointer of allocation descriptor&quot;</span>/imm32
<span id="L111" class="LineNr">111 </span> 52/push-edx
<span id="L112" class="LineNr">112 </span> 50/push-eax
<span id="L113" class="LineNr">113 </span> <span class="subxS2Comment"># . . call</span>
<span id="L114" class="LineNr">114 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L114" class="LineNr">114 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L115" class="LineNr">115 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L116" class="LineNr">116 </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="L117" class="LineNr">117 </span> <span class="subxComment"># skip payload-&gt;allocid</span>
<span id="L118" class="LineNr">118 </span> 05/add-to-eax 4/imm32
<span id="L119" class="LineNr">119 </span> <span class="subxComment"># check-ints-equal(eax-&gt;size, 6, msg)</span>
<span id="L120" class="LineNr">120 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L121" class="LineNr">121 </span> 68/push <span class="Constant">&quot;F - <a href='070new-stream.subx.html#L74'>test-new-stream</a>: sets <a href='106size.subx.html#L5'>size</a> correctly&quot;</span>/imm32
<span id="L121" class="LineNr">121 </span> 68/push <span class="Constant">&quot;F - <a href='121new-stream.subx.html#L74'>test-new-stream</a>: sets <a href='307size.subx.html#L5'>size</a> correctly&quot;</span>/imm32
<span id="L122" class="LineNr">122 </span> 68/push 6/imm32
<span id="L123" class="LineNr">123 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 8/disp8 <span class="subxComment"># push *(eax+8)</span>
<span id="L124" class="LineNr">124 </span> <span class="subxS2Comment"># . . call</span>
<span id="L125" class="LineNr">125 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L125" class="LineNr">125 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L126" class="LineNr">126 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L127" class="LineNr">127 </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="L128" class="LineNr">128 </span> <span class="subxComment"># the rest is delegated to clear-stream() so we won't bother checking it</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 071read-line.subx</title>
<title>Mu - 122read-line.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -56,7 +56,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/071read-line.subx'>https://github.com/akkartik/mu/blob/master/071read-line.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/122read-line.subx'>https://github.com/akkartik/mu/blob/master/122read-line.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span>== code
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># instruction effective address register displacement immediate</span>
@ -106,7 +106,7 @@ if ('onhashchange' in window) {
<span id="L46" class="LineNr"> 46 </span> 8d/copy-address 1/mod/*+disp8 6/rm32/esi <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy esi+4 to eax</span>
<span id="L47" class="LineNr"> 47 </span> 50/push-eax
<span id="L48" class="LineNr"> 48 </span> <span class="subxS2Comment"># . . call</span>
<span id="L49" class="LineNr"> 49 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L49" class="LineNr"> 49 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L50" class="LineNr"> 50 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L51" class="LineNr"> 51 </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="L52" class="LineNr"> 52 </span> <span class="subxS1Comment"># . f-&gt;read must now be 0; update its cache at ecx</span>
@ -116,7 +116,7 @@ if ('onhashchange' in window) {
<span id="L56" class="LineNr"> 56 </span> 50/push-eax
<span id="L57" class="LineNr"> 57 </span> ff 6/subop/push 0/mod/indirect 6/rm32/esi <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 *esi</span>
<span id="L58" class="LineNr"> 58 </span> <span class="subxS2Comment"># . . call</span>
<span id="L59" class="LineNr"> 59 </span> e8/call <a href='060read.subx.html#L48'>read</a>/disp32
<span id="L59" class="LineNr"> 59 </span> e8/call <a href='111read.subx.html#L48'>read</a>/disp32
<span id="L60" class="LineNr"> 60 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L61" class="LineNr"> 61 </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="L62" class="LineNr"> 62 </span> <span class="subxComment"># if (f-&gt;write == 0) break</span>
@ -159,7 +159,7 @@ if ('onhashchange' in window) {
<span id="L99" class="LineNr"> 99 </span> 68/push <span class="Constant">&quot;read-line-buffered: line too long\n&quot;</span>/imm32
<span id="L100" class="LineNr">100 </span> 68/push 2/imm32/stderr
<span id="L101" class="LineNr">101 </span> <span class="subxS2Comment"># . . call</span>
<span id="L102" class="LineNr">102 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L102" class="LineNr">102 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L103" class="LineNr">103 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L104" class="LineNr">104 </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="L105" class="LineNr">105 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -172,49 +172,49 @@ if ('onhashchange' in window) {
<span id="L112" class="LineNr">112 </span> <span class="subxComment"># setup</span>
<span id="L113" class="LineNr">113 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L114" class="LineNr">114 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L115" class="LineNr">115 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L115" class="LineNr">115 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L116" class="LineNr">116 </span> <span class="subxS2Comment"># . . call</span>
<span id="L117" class="LineNr">117 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L117" class="LineNr">117 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L118" class="LineNr">118 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L119" class="LineNr">119 </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="L120" class="LineNr">120 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L121" class="LineNr">121 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L122" class="LineNr">122 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L123" class="LineNr">123 </span> <span class="subxS2Comment"># . . call</span>
<span id="L124" class="LineNr">124 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L124" class="LineNr">124 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L125" class="LineNr">125 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L126" class="LineNr">126 </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="L127" class="LineNr">127 </span> <span class="subxS1Comment"># . clear-stream(_test-tmp-stream)</span>
<span id="L128" class="LineNr">128 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L129" class="LineNr">129 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L129" class="LineNr">129 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L130" class="LineNr">130 </span> <span class="subxS2Comment"># . . call</span>
<span id="L131" class="LineNr">131 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L131" class="LineNr">131 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L132" class="LineNr">132 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L133" class="LineNr">133 </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="L134" class="LineNr">134 </span> <span class="subxComment"># write(_test-stream, &quot;ab\ncd&quot;)</span>
<span id="L135" class="LineNr">135 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L136" class="LineNr">136 </span> 68/push <span class="Constant">&quot;ab\ncd&quot;</span>/imm32
<span id="L137" class="LineNr">137 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L137" class="LineNr">137 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L138" class="LineNr">138 </span> <span class="subxS2Comment"># . . call</span>
<span id="L139" class="LineNr">139 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L139" class="LineNr">139 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L140" class="LineNr">140 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L141" class="LineNr">141 </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="L142" class="LineNr">142 </span> <span class="subxComment"># read a line from _test-stream (buffered by _test-buffered-file) into _test-tmp-stream</span>
<span id="L143" class="LineNr">143 </span> <span class="subxS1Comment"># . eax = read-line-buffered(_test-buffered-file, _test-tmp-stream)</span>
<span id="L144" class="LineNr">144 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L145" class="LineNr">145 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L146" class="LineNr">146 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L145" class="LineNr">145 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L146" class="LineNr">146 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L147" class="LineNr">147 </span> <span class="subxS2Comment"># . . call</span>
<span id="L148" class="LineNr">148 </span> e8/call <a href='071read-line.subx.html#L9'>read-line-buffered</a>/disp32
<span id="L148" class="LineNr">148 </span> e8/call <a href='122read-line.subx.html#L9'>read-line-buffered</a>/disp32
<span id="L149" class="LineNr">149 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L150" class="LineNr">150 </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="L151" class="LineNr">151 </span> <span class="subxComment"># check-next-stream-line-equal(_test-tmp-stream, &quot;ab&quot;, msg)</span>
<span id="L152" class="LineNr">152 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L153" class="LineNr">153 </span> 68/push <span class="Constant">&quot;F - test-read-line-buffered&quot;</span>/imm32
<span id="L154" class="LineNr">154 </span> 68/push <span class="Constant">&quot;ab&quot;</span>/imm32
<span id="L155" class="LineNr">155 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L155" class="LineNr">155 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L156" class="LineNr">156 </span> <span class="subxS2Comment"># . . call</span>
<span id="L157" class="LineNr">157 </span> e8/call <a href='058stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L157" class="LineNr">157 </span> e8/call <a href='109stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L158" class="LineNr">158 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L159" class="LineNr">159 </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="L160" class="LineNr">160 </span> <span class="subxComment"># end</span>
@ -224,49 +224,49 @@ if ('onhashchange' in window) {
<span id="L164" class="LineNr">164 </span> <span class="subxComment"># setup</span>
<span id="L165" class="LineNr">165 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L166" class="LineNr">166 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L167" class="LineNr">167 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L167" class="LineNr">167 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L168" class="LineNr">168 </span> <span class="subxS2Comment"># . . call</span>
<span id="L169" class="LineNr">169 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L169" class="LineNr">169 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L170" class="LineNr">170 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L171" class="LineNr">171 </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="L172" class="LineNr">172 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L173" class="LineNr">173 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L174" class="LineNr">174 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L175" class="LineNr">175 </span> <span class="subxS2Comment"># . . call</span>
<span id="L176" class="LineNr">176 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L176" class="LineNr">176 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L177" class="LineNr">177 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L178" class="LineNr">178 </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="L179" class="LineNr">179 </span> <span class="subxS1Comment"># . clear-stream(_test-tmp-stream)</span>
<span id="L180" class="LineNr">180 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L181" class="LineNr">181 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L181" class="LineNr">181 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L182" class="LineNr">182 </span> <span class="subxS2Comment"># . . call</span>
<span id="L183" class="LineNr">183 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L183" class="LineNr">183 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L184" class="LineNr">184 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L185" class="LineNr">185 </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="L186" class="LineNr">186 </span> <span class="subxComment"># write(_test-stream, &quot;cd&quot;)</span>
<span id="L187" class="LineNr">187 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L188" class="LineNr">188 </span> 68/push <span class="Constant">&quot;cd&quot;</span>/imm32
<span id="L189" class="LineNr">189 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L189" class="LineNr">189 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L190" class="LineNr">190 </span> <span class="subxS2Comment"># . . call</span>
<span id="L191" class="LineNr">191 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L191" class="LineNr">191 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L192" class="LineNr">192 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L193" class="LineNr">193 </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="L194" class="LineNr">194 </span> <span class="subxComment"># read a line from _test-stream (buffered by _test-buffered-file) into _test-tmp-stream</span>
<span id="L195" class="LineNr">195 </span> <span class="subxS1Comment"># . eax = read-line-buffered(_test-buffered-file, _test-tmp-stream)</span>
<span id="L196" class="LineNr">196 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L197" class="LineNr">197 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L198" class="LineNr">198 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L197" class="LineNr">197 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L198" class="LineNr">198 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L199" class="LineNr">199 </span> <span class="subxS2Comment"># . . call</span>
<span id="L200" class="LineNr">200 </span> e8/call <a href='071read-line.subx.html#L9'>read-line-buffered</a>/disp32
<span id="L200" class="LineNr">200 </span> e8/call <a href='122read-line.subx.html#L9'>read-line-buffered</a>/disp32
<span id="L201" class="LineNr">201 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L202" class="LineNr">202 </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="L203" class="LineNr">203 </span> <span class="subxComment"># check-stream-equal(_test-tmp-stream, &quot;cd&quot;, msg)</span>
<span id="L204" class="LineNr">204 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L205" class="LineNr">205 </span> 68/push <span class="Constant">&quot;F - test-read-line-buffered-reads-final-line-until-Eof&quot;</span>/imm32
<span id="L206" class="LineNr">206 </span> 68/push <span class="Constant">&quot;cd&quot;</span>/imm32
<span id="L207" class="LineNr">207 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L207" class="LineNr">207 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L208" class="LineNr">208 </span> <span class="subxS2Comment"># . . call</span>
<span id="L209" class="LineNr">209 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L209" class="LineNr">209 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L210" class="LineNr">210 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L211" class="LineNr">211 </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="L212" class="LineNr">212 </span> <span class="subxComment"># end</span>
@ -343,7 +343,7 @@ if ('onhashchange' in window) {
<span id="L283" class="LineNr">283 </span> 68/push <span class="Constant">&quot;read-line: line too long\n&quot;</span>/imm32
<span id="L284" class="LineNr">284 </span> 68/push 2/imm32/stderr
<span id="L285" class="LineNr">285 </span> <span class="subxS2Comment"># . . call</span>
<span id="L286" class="LineNr">286 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L286" class="LineNr">286 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L287" class="LineNr">287 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L288" class="LineNr">288 </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="L289" class="LineNr">289 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -356,42 +356,42 @@ if ('onhashchange' in window) {
<span id="L296" class="LineNr">296 </span> <span class="subxComment"># setup</span>
<span id="L297" class="LineNr">297 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L298" class="LineNr">298 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L299" class="LineNr">299 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L299" class="LineNr">299 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L300" class="LineNr">300 </span> <span class="subxS2Comment"># . . call</span>
<span id="L301" class="LineNr">301 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L301" class="LineNr">301 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L302" class="LineNr">302 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L303" class="LineNr">303 </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="L304" class="LineNr">304 </span> <span class="subxS1Comment"># . clear-stream(_test-tmp-stream)</span>
<span id="L305" class="LineNr">305 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L306" class="LineNr">306 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L306" class="LineNr">306 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L307" class="LineNr">307 </span> <span class="subxS2Comment"># . . call</span>
<span id="L308" class="LineNr">308 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L308" class="LineNr">308 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L309" class="LineNr">309 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L310" class="LineNr">310 </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="L311" class="LineNr">311 </span> <span class="subxComment"># write(_test-stream, &quot;ab\ncd&quot;)</span>
<span id="L312" class="LineNr">312 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L313" class="LineNr">313 </span> 68/push <span class="Constant">&quot;ab\ncd&quot;</span>/imm32
<span id="L314" class="LineNr">314 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L314" class="LineNr">314 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L315" class="LineNr">315 </span> <span class="subxS2Comment"># . . call</span>
<span id="L316" class="LineNr">316 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L316" class="LineNr">316 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L317" class="LineNr">317 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L318" class="LineNr">318 </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="L319" class="LineNr">319 </span> <span class="subxComment"># read a line from _test-stream into _test-tmp-stream</span>
<span id="L320" class="LineNr">320 </span> <span class="subxS1Comment"># . eax = read-line(_test-stream, _test-tmp-stream)</span>
<span id="L321" class="LineNr">321 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L322" class="LineNr">322 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L323" class="LineNr">323 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L322" class="LineNr">322 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L323" class="LineNr">323 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L324" class="LineNr">324 </span> <span class="subxS2Comment"># . . call</span>
<span id="L325" class="LineNr">325 </span> e8/call <a href='071read-line.subx.html#L218'>read-line</a>/disp32
<span id="L325" class="LineNr">325 </span> e8/call <a href='122read-line.subx.html#L218'>read-line</a>/disp32
<span id="L326" class="LineNr">326 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L327" class="LineNr">327 </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="L328" class="LineNr">328 </span> <span class="subxComment"># check-next-stream-line-equal(_test-tmp-stream, &quot;ab&quot;, msg)</span>
<span id="L329" class="LineNr">329 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L330" class="LineNr">330 </span> 68/push <span class="Constant">&quot;F - test-read-line&quot;</span>/imm32
<span id="L331" class="LineNr">331 </span> 68/push <span class="Constant">&quot;ab&quot;</span>/imm32
<span id="L332" class="LineNr">332 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L332" class="LineNr">332 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L333" class="LineNr">333 </span> <span class="subxS2Comment"># . . call</span>
<span id="L334" class="LineNr">334 </span> e8/call <a href='058stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L334" class="LineNr">334 </span> e8/call <a href='109stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L335" class="LineNr">335 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L336" class="LineNr">336 </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="L337" class="LineNr">337 </span> <span class="subxComment"># end</span>
@ -401,42 +401,42 @@ if ('onhashchange' in window) {
<span id="L341" class="LineNr">341 </span> <span class="subxComment"># setup</span>
<span id="L342" class="LineNr">342 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L343" class="LineNr">343 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L344" class="LineNr">344 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L344" class="LineNr">344 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L345" class="LineNr">345 </span> <span class="subxS2Comment"># . . call</span>
<span id="L346" class="LineNr">346 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L346" class="LineNr">346 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L347" class="LineNr">347 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L348" class="LineNr">348 </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="L349" class="LineNr">349 </span> <span class="subxS1Comment"># . clear-stream(_test-tmp-stream)</span>
<span id="L350" class="LineNr">350 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L351" class="LineNr">351 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L351" class="LineNr">351 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L352" class="LineNr">352 </span> <span class="subxS2Comment"># . . call</span>
<span id="L353" class="LineNr">353 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L353" class="LineNr">353 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L354" class="LineNr">354 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L355" class="LineNr">355 </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="L356" class="LineNr">356 </span> <span class="subxComment"># write(_test-stream, &quot;cd&quot;)</span>
<span id="L357" class="LineNr">357 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L358" class="LineNr">358 </span> 68/push <span class="Constant">&quot;cd&quot;</span>/imm32
<span id="L359" class="LineNr">359 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L359" class="LineNr">359 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L360" class="LineNr">360 </span> <span class="subxS2Comment"># . . call</span>
<span id="L361" class="LineNr">361 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L361" class="LineNr">361 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L362" class="LineNr">362 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L363" class="LineNr">363 </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="L364" class="LineNr">364 </span> <span class="subxComment"># read a line from _test-stream into _test-tmp-stream</span>
<span id="L365" class="LineNr">365 </span> <span class="subxS1Comment"># . eax = read-line(_test-stream, _test-tmp-stream)</span>
<span id="L366" class="LineNr">366 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L367" class="LineNr">367 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L368" class="LineNr">368 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L367" class="LineNr">367 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L368" class="LineNr">368 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L369" class="LineNr">369 </span> <span class="subxS2Comment"># . . call</span>
<span id="L370" class="LineNr">370 </span> e8/call <a href='071read-line.subx.html#L218'>read-line</a>/disp32
<span id="L370" class="LineNr">370 </span> e8/call <a href='122read-line.subx.html#L218'>read-line</a>/disp32
<span id="L371" class="LineNr">371 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L372" class="LineNr">372 </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="L373" class="LineNr">373 </span> <span class="subxComment"># check-stream-equal(_test-tmp-stream, &quot;cd&quot;, msg)</span>
<span id="L374" class="LineNr">374 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L375" class="LineNr">375 </span> 68/push <span class="Constant">&quot;F - test-read-line-reads-final-line-until-Eof&quot;</span>/imm32
<span id="L376" class="LineNr">376 </span> 68/push <span class="Constant">&quot;cd&quot;</span>/imm32
<span id="L377" class="LineNr">377 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L377" class="LineNr">377 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L378" class="LineNr">378 </span> <span class="subxS2Comment"># . . call</span>
<span id="L379" class="LineNr">379 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L379" class="LineNr">379 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L380" class="LineNr">380 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L381" class="LineNr">381 </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="L382" class="LineNr">382 </span> <span class="subxComment"># end</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 072slice.subx</title>
<title>Mu - 123slice.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -57,7 +57,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/072slice.subx'>https://github.com/akkartik/mu/blob/master/072slice.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/123slice.subx'>https://github.com/akkartik/mu/blob/master/123slice.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># new data structure: a slice is an open interval of addresses [start, end)</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># that includes 'start' but not 'end'</span>
@ -67,7 +67,7 @@ if ('onhashchange' in window) {
<span id="L6" class="LineNr"> 6 </span><span class="subxS1Comment"># . op subop mod rm32 base index scale r32</span>
<span id="L7" class="LineNr"> 7 </span><span class="subxS1Comment"># . 1-3 bytes 3 bits 2 bits 3 bits 3 bits 3 bits 2 bits 2 bits 0/1/2/4 bytes 0/1/2/4 bytes</span>
<span id="L8" class="LineNr"> 8 </span>
<span id="L9" class="LineNr"> 9 </span><span class="subxFunction">slice-empty?</span>: <span class="subxComment"># s: (addr slice) -&gt; eax: boolean</span>
<span id="L9" class="LineNr"> 9 </span><span class="subxFunction">slice-empty?</span>: <span class="subxComment"># s: (addr slice) -&gt; result/eax: boolean</span>
<span id="L10" class="LineNr"> 10 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L11" class="LineNr"> 11 </span> 55/push-ebp
<span id="L12" class="LineNr"> 12 </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>
@ -103,7 +103,7 @@ if ('onhashchange' in window) {
<span id="L42" class="LineNr"> 42 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L43" class="LineNr"> 43 </span> 51/push-ecx
<span id="L44" class="LineNr"> 44 </span> <span class="subxS2Comment"># . . call</span>
<span id="L45" class="LineNr"> 45 </span> e8/call <a href='072slice.subx.html#L9'>slice-empty?</a>/disp32
<span id="L45" class="LineNr"> 45 </span> e8/call <a href='123slice.subx.html#L9'>slice-empty?</a>/disp32
<span id="L46" class="LineNr"> 46 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L47" class="LineNr"> 47 </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="L48" class="LineNr"> 48 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -112,7 +112,7 @@ if ('onhashchange' in window) {
<span id="L51" class="LineNr"> 51 </span> 68/push 1/imm32
<span id="L52" class="LineNr"> 52 </span> 50/push-eax
<span id="L53" class="LineNr"> 53 </span> <span class="subxS2Comment"># . . call</span>
<span id="L54" class="LineNr"> 54 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L54" class="LineNr"> 54 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L55" class="LineNr"> 55 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L56" class="LineNr"> 56 </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="L57" class="LineNr"> 57 </span> <span class="subxS1Comment"># . epilogue</span>
@ -132,7 +132,7 @@ if ('onhashchange' in window) {
<span id="L71" class="LineNr"> 71 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L72" class="LineNr"> 72 </span> 51/push-ecx
<span id="L73" class="LineNr"> 73 </span> <span class="subxS2Comment"># . . call</span>
<span id="L74" class="LineNr"> 74 </span> e8/call <a href='072slice.subx.html#L9'>slice-empty?</a>/disp32
<span id="L74" class="LineNr"> 74 </span> e8/call <a href='123slice.subx.html#L9'>slice-empty?</a>/disp32
<span id="L75" class="LineNr"> 75 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L76" class="LineNr"> 76 </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="L77" class="LineNr"> 77 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -141,7 +141,7 @@ if ('onhashchange' in window) {
<span id="L80" class="LineNr"> 80 </span> 68/push 0/imm32
<span id="L81" class="LineNr"> 81 </span> 50/push-eax
<span id="L82" class="LineNr"> 82 </span> <span class="subxS2Comment"># . . call</span>
<span id="L83" class="LineNr"> 83 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L83" class="LineNr"> 83 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L84" class="LineNr"> 84 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L85" class="LineNr"> 85 </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="L86" class="LineNr"> 86 </span> <span class="subxS1Comment"># . epilogue</span>
@ -161,7 +161,7 @@ if ('onhashchange' in window) {
<span id="L100" class="LineNr"> 100 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L101" class="LineNr"> 101 </span> 51/push-ecx
<span id="L102" class="LineNr"> 102 </span> <span class="subxS2Comment"># . . call</span>
<span id="L103" class="LineNr"> 103 </span> e8/call <a href='072slice.subx.html#L9'>slice-empty?</a>/disp32
<span id="L103" class="LineNr"> 103 </span> e8/call <a href='123slice.subx.html#L9'>slice-empty?</a>/disp32
<span id="L104" class="LineNr"> 104 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L105" class="LineNr"> 105 </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="L106" class="LineNr"> 106 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -170,7 +170,7 @@ if ('onhashchange' in window) {
<span id="L109" class="LineNr"> 109 </span> 68/push 1/imm32
<span id="L110" class="LineNr"> 110 </span> 50/push-eax
<span id="L111" class="LineNr"> 111 </span> <span class="subxS2Comment"># . . call</span>
<span id="L112" class="LineNr"> 112 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L112" class="LineNr"> 112 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L113" class="LineNr"> 113 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L114" class="LineNr"> 114 </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="L115" class="LineNr"> 115 </span> <span class="subxS1Comment"># . epilogue</span>
@ -178,7 +178,7 @@ if ('onhashchange' in window) {
<span id="L117" class="LineNr"> 117 </span> 5d/pop-to-ebp
<span id="L118" class="LineNr"> 118 </span> c3/return
<span id="L119" class="LineNr"> 119 </span>
<span id="L120" class="LineNr"> 120 </span><span class="subxFunction">slice-equal?</span>: <span class="subxComment"># s: (addr slice), p: (addr array byte) -&gt; eax: boolean</span>
<span id="L120" class="LineNr"> 120 </span><span class="subxFunction">slice-equal?</span>: <span class="subxComment"># s: (addr slice), p: (addr array byte) -&gt; result/eax: boolean</span>
<span id="L121" class="LineNr"> 121 </span> <span class="subxComment"># pseudocode:</span>
<span id="L122" class="LineNr"> 122 </span> <span class="subxComment"># if (p == 0) return (s == 0)</span>
<span id="L123" class="LineNr"> 123 </span> <span class="subxComment"># currs = s-&gt;start</span>
@ -286,7 +286,7 @@ if ('onhashchange' in window) {
<span id="L225" class="LineNr"> 225 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L226" class="LineNr"> 226 </span> 51/push-ecx
<span id="L227" class="LineNr"> 227 </span> <span class="subxS2Comment"># . . call</span>
<span id="L228" class="LineNr"> 228 </span> e8/call <a href='072slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L228" class="LineNr"> 228 </span> e8/call <a href='123slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L229" class="LineNr"> 229 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L230" class="LineNr"> 230 </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="L231" class="LineNr"> 231 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -295,7 +295,7 @@ if ('onhashchange' in window) {
<span id="L234" class="LineNr"> 234 </span> 68/push 1/imm32
<span id="L235" class="LineNr"> 235 </span> 50/push-eax
<span id="L236" class="LineNr"> 236 </span> <span class="subxS2Comment"># . . call</span>
<span id="L237" class="LineNr"> 237 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L237" class="LineNr"> 237 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L238" class="LineNr"> 238 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L239" class="LineNr"> 239 </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="L240" class="LineNr"> 240 </span> <span class="subxS1Comment"># . epilogue</span>
@ -322,7 +322,7 @@ if ('onhashchange' in window) {
<span id="L261" class="LineNr"> 261 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L262" class="LineNr"> 262 </span> 51/push-ecx
<span id="L263" class="LineNr"> 263 </span> <span class="subxS2Comment"># . . call</span>
<span id="L264" class="LineNr"> 264 </span> e8/call <a href='072slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L264" class="LineNr"> 264 </span> e8/call <a href='123slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L265" class="LineNr"> 265 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L266" class="LineNr"> 266 </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="L267" class="LineNr"> 267 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -331,7 +331,7 @@ if ('onhashchange' in window) {
<span id="L270" class="LineNr"> 270 </span> 68/push 0/imm32
<span id="L271" class="LineNr"> 271 </span> 50/push-eax
<span id="L272" class="LineNr"> 272 </span> <span class="subxS2Comment"># . . call</span>
<span id="L273" class="LineNr"> 273 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L273" class="LineNr"> 273 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L274" class="LineNr"> 274 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L275" class="LineNr"> 275 </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="L276" class="LineNr"> 276 </span> <span class="subxS1Comment"># . epilogue</span>
@ -358,7 +358,7 @@ if ('onhashchange' in window) {
<span id="L297" class="LineNr"> 297 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L298" class="LineNr"> 298 </span> 51/push-ecx
<span id="L299" class="LineNr"> 299 </span> <span class="subxS2Comment"># . . call</span>
<span id="L300" class="LineNr"> 300 </span> e8/call <a href='072slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L300" class="LineNr"> 300 </span> e8/call <a href='123slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L301" class="LineNr"> 301 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L302" class="LineNr"> 302 </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="L303" class="LineNr"> 303 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -367,7 +367,7 @@ if ('onhashchange' in window) {
<span id="L306" class="LineNr"> 306 </span> 68/push 0/imm32
<span id="L307" class="LineNr"> 307 </span> 50/push-eax
<span id="L308" class="LineNr"> 308 </span> <span class="subxS2Comment"># . . call</span>
<span id="L309" class="LineNr"> 309 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L309" class="LineNr"> 309 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L310" class="LineNr"> 310 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L311" class="LineNr"> 311 </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="L312" class="LineNr"> 312 </span> <span class="subxS1Comment"># . epilogue</span>
@ -394,7 +394,7 @@ if ('onhashchange' in window) {
<span id="L333" class="LineNr"> 333 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L334" class="LineNr"> 334 </span> 51/push-ecx
<span id="L335" class="LineNr"> 335 </span> <span class="subxS2Comment"># . . call</span>
<span id="L336" class="LineNr"> 336 </span> e8/call <a href='072slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L336" class="LineNr"> 336 </span> e8/call <a href='123slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L337" class="LineNr"> 337 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L338" class="LineNr"> 338 </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="L339" class="LineNr"> 339 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -403,7 +403,7 @@ if ('onhashchange' in window) {
<span id="L342" class="LineNr"> 342 </span> 68/push 0/imm32
<span id="L343" class="LineNr"> 343 </span> 50/push-eax
<span id="L344" class="LineNr"> 344 </span> <span class="subxS2Comment"># . . call</span>
<span id="L345" class="LineNr"> 345 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L345" class="LineNr"> 345 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L346" class="LineNr"> 346 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L347" class="LineNr"> 347 </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="L348" class="LineNr"> 348 </span> <span class="subxS1Comment"># . epilogue</span>
@ -425,7 +425,7 @@ if ('onhashchange' in window) {
<span id="L364" class="LineNr"> 364 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L365" class="LineNr"> 365 </span> 51/push-ecx
<span id="L366" class="LineNr"> 366 </span> <span class="subxS2Comment"># . . call</span>
<span id="L367" class="LineNr"> 367 </span> e8/call <a href='072slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L367" class="LineNr"> 367 </span> e8/call <a href='123slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L368" class="LineNr"> 368 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L369" class="LineNr"> 369 </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="L370" class="LineNr"> 370 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -434,7 +434,7 @@ if ('onhashchange' in window) {
<span id="L373" class="LineNr"> 373 </span> 68/push 0/imm32
<span id="L374" class="LineNr"> 374 </span> 50/push-eax
<span id="L375" class="LineNr"> 375 </span> <span class="subxS2Comment"># . . call</span>
<span id="L376" class="LineNr"> 376 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L376" class="LineNr"> 376 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L377" class="LineNr"> 377 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L378" class="LineNr"> 378 </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="L379" class="LineNr"> 379 </span> <span class="subxS1Comment"># . epilogue</span>
@ -461,7 +461,7 @@ if ('onhashchange' in window) {
<span id="L400" class="LineNr"> 400 </span> 68/push <span class="Constant">&quot;&quot;</span>/imm32
<span id="L401" class="LineNr"> 401 </span> 51/push-ecx
<span id="L402" class="LineNr"> 402 </span> <span class="subxS2Comment"># . . call</span>
<span id="L403" class="LineNr"> 403 </span> e8/call <a href='072slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L403" class="LineNr"> 403 </span> e8/call <a href='123slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L404" class="LineNr"> 404 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L405" class="LineNr"> 405 </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="L406" class="LineNr"> 406 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -470,7 +470,7 @@ if ('onhashchange' in window) {
<span id="L409" class="LineNr"> 409 </span> 68/push 0/imm32
<span id="L410" class="LineNr"> 410 </span> 50/push-eax
<span id="L411" class="LineNr"> 411 </span> <span class="subxS2Comment"># . . call</span>
<span id="L412" class="LineNr"> 412 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L412" class="LineNr"> 412 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L413" class="LineNr"> 413 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L414" class="LineNr"> 414 </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="L415" class="LineNr"> 415 </span> <span class="subxS1Comment"># . epilogue</span>
@ -492,7 +492,7 @@ if ('onhashchange' in window) {
<span id="L431" class="LineNr"> 431 </span> 68/push <span class="Constant">&quot;&quot;</span>/imm32
<span id="L432" class="LineNr"> 432 </span> 51/push-ecx
<span id="L433" class="LineNr"> 433 </span> <span class="subxS2Comment"># . . call</span>
<span id="L434" class="LineNr"> 434 </span> e8/call <a href='072slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L434" class="LineNr"> 434 </span> e8/call <a href='123slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L435" class="LineNr"> 435 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L436" class="LineNr"> 436 </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="L437" class="LineNr"> 437 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -501,7 +501,7 @@ if ('onhashchange' in window) {
<span id="L440" class="LineNr"> 440 </span> 68/push 1/imm32
<span id="L441" class="LineNr"> 441 </span> 50/push-eax
<span id="L442" class="LineNr"> 442 </span> <span class="subxS2Comment"># . . call</span>
<span id="L443" class="LineNr"> 443 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L443" class="LineNr"> 443 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L444" class="LineNr"> 444 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L445" class="LineNr"> 445 </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="L446" class="LineNr"> 446 </span> <span class="subxS1Comment"># . epilogue</span>
@ -528,7 +528,7 @@ if ('onhashchange' in window) {
<span id="L467" class="LineNr"> 467 </span> 68/push 0/imm32
<span id="L468" class="LineNr"> 468 </span> 51/push-ecx
<span id="L469" class="LineNr"> 469 </span> <span class="subxS2Comment"># . . call</span>
<span id="L470" class="LineNr"> 470 </span> e8/call <a href='072slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L470" class="LineNr"> 470 </span> e8/call <a href='123slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L471" class="LineNr"> 471 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L472" class="LineNr"> 472 </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="L473" class="LineNr"> 473 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -537,7 +537,7 @@ if ('onhashchange' in window) {
<span id="L476" class="LineNr"> 476 </span> 68/push 0/imm32
<span id="L477" class="LineNr"> 477 </span> 50/push-eax
<span id="L478" class="LineNr"> 478 </span> <span class="subxS2Comment"># . . call</span>
<span id="L479" class="LineNr"> 479 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L479" class="LineNr"> 479 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L480" class="LineNr"> 480 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L481" class="LineNr"> 481 </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="L482" class="LineNr"> 482 </span> <span class="subxS1Comment"># . epilogue</span>
@ -545,7 +545,7 @@ if ('onhashchange' in window) {
<span id="L484" class="LineNr"> 484 </span> 5d/pop-to-ebp
<span id="L485" class="LineNr"> 485 </span> c3/return
<span id="L486" class="LineNr"> 486 </span>
<span id="L487" class="LineNr"> 487 </span><span class="subxFunction">slice-starts-with?</span>: <span class="subxComment"># s: (addr slice), head: (addr array byte) -&gt; eax: boolean</span>
<span id="L487" class="LineNr"> 487 </span><span class="subxFunction">slice-starts-with?</span>: <span class="subxComment"># s: (addr slice), head: (addr array byte) -&gt; result/eax: boolean</span>
<span id="L488" class="LineNr"> 488 </span> <span class="subxComment"># pseudocode</span>
<span id="L489" class="LineNr"> 489 </span> <span class="subxComment"># hsize = head-&gt;size</span>
<span id="L490" class="LineNr"> 490 </span> <span class="subxComment"># if (hsize &gt; s-&gt;end - s-&gt;start) return false</span>
@ -652,7 +652,7 @@ if ('onhashchange' in window) {
<span id="L591" class="LineNr"> 591 </span> 68/push <span class="Constant">&quot;A&quot;</span>/imm32
<span id="L592" class="LineNr"> 592 </span> 51/push-ecx
<span id="L593" class="LineNr"> 593 </span> <span class="subxS2Comment"># . . call</span>
<span id="L594" class="LineNr"> 594 </span> e8/call <a href='072slice.subx.html#L487'>slice-starts-with?</a>/disp32
<span id="L594" class="LineNr"> 594 </span> e8/call <a href='123slice.subx.html#L487'>slice-starts-with?</a>/disp32
<span id="L595" class="LineNr"> 595 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L596" class="LineNr"> 596 </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="L597" class="LineNr"> 597 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -661,7 +661,7 @@ if ('onhashchange' in window) {
<span id="L600" class="LineNr"> 600 </span> 68/push 1/imm32
<span id="L601" class="LineNr"> 601 </span> 50/push-eax
<span id="L602" class="LineNr"> 602 </span> <span class="subxS2Comment"># . . call</span>
<span id="L603" class="LineNr"> 603 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L603" class="LineNr"> 603 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L604" class="LineNr"> 604 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L605" class="LineNr"> 605 </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="L606" class="LineNr"> 606 </span> <span class="subxS1Comment"># . epilogue</span>
@ -688,7 +688,7 @@ if ('onhashchange' in window) {
<span id="L627" class="LineNr"> 627 </span> 68/push <span class="Constant">&quot;&quot;</span>/imm32
<span id="L628" class="LineNr"> 628 </span> 51/push-ecx
<span id="L629" class="LineNr"> 629 </span> <span class="subxS2Comment"># . . call</span>
<span id="L630" class="LineNr"> 630 </span> e8/call <a href='072slice.subx.html#L487'>slice-starts-with?</a>/disp32
<span id="L630" class="LineNr"> 630 </span> e8/call <a href='123slice.subx.html#L487'>slice-starts-with?</a>/disp32
<span id="L631" class="LineNr"> 631 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L632" class="LineNr"> 632 </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="L633" class="LineNr"> 633 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -697,7 +697,7 @@ if ('onhashchange' in window) {
<span id="L636" class="LineNr"> 636 </span> 68/push 1/imm32
<span id="L637" class="LineNr"> 637 </span> 50/push-eax
<span id="L638" class="LineNr"> 638 </span> <span class="subxS2Comment"># . . call</span>
<span id="L639" class="LineNr"> 639 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L639" class="LineNr"> 639 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L640" class="LineNr"> 640 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L641" class="LineNr"> 641 </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="L642" class="LineNr"> 642 </span> <span class="subxS1Comment"># . epilogue</span>
@ -724,7 +724,7 @@ if ('onhashchange' in window) {
<span id="L663" class="LineNr"> 663 </span> 68/push <span class="Constant">&quot;Ab&quot;</span>/imm32
<span id="L664" class="LineNr"> 664 </span> 51/push-ecx
<span id="L665" class="LineNr"> 665 </span> <span class="subxS2Comment"># . . call</span>
<span id="L666" class="LineNr"> 666 </span> e8/call <a href='072slice.subx.html#L487'>slice-starts-with?</a>/disp32
<span id="L666" class="LineNr"> 666 </span> e8/call <a href='123slice.subx.html#L487'>slice-starts-with?</a>/disp32
<span id="L667" class="LineNr"> 667 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L668" class="LineNr"> 668 </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="L669" class="LineNr"> 669 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -733,7 +733,7 @@ if ('onhashchange' in window) {
<span id="L672" class="LineNr"> 672 </span> 68/push 1/imm32
<span id="L673" class="LineNr"> 673 </span> 50/push-eax
<span id="L674" class="LineNr"> 674 </span> <span class="subxS2Comment"># . . call</span>
<span id="L675" class="LineNr"> 675 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L675" class="LineNr"> 675 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L676" class="LineNr"> 676 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L677" class="LineNr"> 677 </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="L678" class="LineNr"> 678 </span> <span class="subxS1Comment"># . epilogue</span>
@ -760,7 +760,7 @@ if ('onhashchange' in window) {
<span id="L699" class="LineNr"> 699 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L700" class="LineNr"> 700 </span> 51/push-ecx
<span id="L701" class="LineNr"> 701 </span> <span class="subxS2Comment"># . . call</span>
<span id="L702" class="LineNr"> 702 </span> e8/call <a href='072slice.subx.html#L487'>slice-starts-with?</a>/disp32
<span id="L702" class="LineNr"> 702 </span> e8/call <a href='123slice.subx.html#L487'>slice-starts-with?</a>/disp32
<span id="L703" class="LineNr"> 703 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L704" class="LineNr"> 704 </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="L705" class="LineNr"> 705 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -769,7 +769,7 @@ if ('onhashchange' in window) {
<span id="L708" class="LineNr"> 708 </span> 68/push 1/imm32
<span id="L709" class="LineNr"> 709 </span> 50/push-eax
<span id="L710" class="LineNr"> 710 </span> <span class="subxS2Comment"># . . call</span>
<span id="L711" class="LineNr"> 711 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L711" class="LineNr"> 711 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L712" class="LineNr"> 712 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L713" class="LineNr"> 713 </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="L714" class="LineNr"> 714 </span> <span class="subxS1Comment"># . epilogue</span>
@ -796,7 +796,7 @@ if ('onhashchange' in window) {
<span id="L735" class="LineNr"> 735 </span> 68/push <span class="Constant">&quot;Abd&quot;</span>/imm32
<span id="L736" class="LineNr"> 736 </span> 51/push-ecx
<span id="L737" class="LineNr"> 737 </span> <span class="subxS2Comment"># . . call</span>
<span id="L738" class="LineNr"> 738 </span> e8/call <a href='072slice.subx.html#L487'>slice-starts-with?</a>/disp32
<span id="L738" class="LineNr"> 738 </span> e8/call <a href='123slice.subx.html#L487'>slice-starts-with?</a>/disp32
<span id="L739" class="LineNr"> 739 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L740" class="LineNr"> 740 </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="L741" class="LineNr"> 741 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -805,7 +805,7 @@ if ('onhashchange' in window) {
<span id="L744" class="LineNr"> 744 </span> 68/push 0/imm32
<span id="L745" class="LineNr"> 745 </span> 50/push-eax
<span id="L746" class="LineNr"> 746 </span> <span class="subxS2Comment"># . . call</span>
<span id="L747" class="LineNr"> 747 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L747" class="LineNr"> 747 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L748" class="LineNr"> 748 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L749" class="LineNr"> 749 </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="L750" class="LineNr"> 750 </span> <span class="subxS1Comment"># . epilogue</span>
@ -832,7 +832,7 @@ if ('onhashchange' in window) {
<span id="L771" class="LineNr"> 771 </span> 68/push <span class="Constant">&quot;Ac&quot;</span>/imm32
<span id="L772" class="LineNr"> 772 </span> 51/push-ecx
<span id="L773" class="LineNr"> 773 </span> <span class="subxS2Comment"># . . call</span>
<span id="L774" class="LineNr"> 774 </span> e8/call <a href='072slice.subx.html#L487'>slice-starts-with?</a>/disp32
<span id="L774" class="LineNr"> 774 </span> e8/call <a href='123slice.subx.html#L487'>slice-starts-with?</a>/disp32
<span id="L775" class="LineNr"> 775 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L776" class="LineNr"> 776 </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="L777" class="LineNr"> 777 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -841,7 +841,7 @@ if ('onhashchange' in window) {
<span id="L780" class="LineNr"> 780 </span> 68/push 0/imm32
<span id="L781" class="LineNr"> 781 </span> 50/push-eax
<span id="L782" class="LineNr"> 782 </span> <span class="subxS2Comment"># . . call</span>
<span id="L783" class="LineNr"> 783 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L783" class="LineNr"> 783 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L784" class="LineNr"> 784 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L785" class="LineNr"> 785 </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="L786" class="LineNr"> 786 </span> <span class="subxS1Comment"># . epilogue</span>
@ -914,7 +914,7 @@ if ('onhashchange' in window) {
<span id="L853" class="LineNr"> 853 </span> 68/push <span class="Constant">&quot;write-slice: out of space&quot;</span>/imm32
<span id="L854" class="LineNr"> 854 </span> 68/push 2/imm32/stderr
<span id="L855" class="LineNr"> 855 </span> <span class="subxS2Comment"># . . call</span>
<span id="L856" class="LineNr"> 856 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L856" class="LineNr"> 856 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L857" class="LineNr"> 857 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L858" class="LineNr"> 858 </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="L859" class="LineNr"> 859 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -929,9 +929,9 @@ if ('onhashchange' in window) {
<span id="L868" class="LineNr"> 868 </span> <span class="subxComment"># setup</span>
<span id="L869" class="LineNr"> 869 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L870" class="LineNr"> 870 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L871" class="LineNr"> 871 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L871" class="LineNr"> 871 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L872" class="LineNr"> 872 </span> <span class="subxS2Comment"># . . call</span>
<span id="L873" class="LineNr"> 873 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L873" class="LineNr"> 873 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L874" class="LineNr"> 874 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L875" class="LineNr"> 875 </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="L876" class="LineNr"> 876 </span> <span class="subxComment"># (eax..ecx) = &quot;Abc&quot;</span>
@ -946,18 +946,18 @@ if ('onhashchange' in window) {
<span id="L885" class="LineNr"> 885 </span> <span class="subxComment"># write-slice(_test-stream, slice)</span>
<span id="L886" class="LineNr"> 886 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L887" class="LineNr"> 887 </span> 51/push-ecx
<span id="L888" class="LineNr"> 888 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L888" class="LineNr"> 888 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L889" class="LineNr"> 889 </span> <span class="subxS2Comment"># . . call</span>
<span id="L890" class="LineNr"> 890 </span> e8/call <a href='072slice.subx.html#L793'>write-slice</a>/disp32
<span id="L890" class="LineNr"> 890 </span> e8/call <a href='123slice.subx.html#L793'>write-slice</a>/disp32
<span id="L891" class="LineNr"> 891 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L892" class="LineNr"> 892 </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="L893" class="LineNr"> 893 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;Abc&quot;, msg)</span>
<span id="L894" class="LineNr"> 894 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L895" class="LineNr"> 895 </span> 68/push <span class="Constant">&quot;F - test-write-slice&quot;</span>/imm32
<span id="L896" class="LineNr"> 896 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L897" class="LineNr"> 897 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L897" class="LineNr"> 897 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L898" class="LineNr"> 898 </span> <span class="subxS2Comment"># . . call</span>
<span id="L899" class="LineNr"> 899 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L899" class="LineNr"> 899 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L900" class="LineNr"> 900 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L901" class="LineNr"> 901 </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="L902" class="LineNr"> 902 </span> <span class="subxS1Comment"># . epilogue</span>
@ -1002,7 +1002,7 @@ if ('onhashchange' in window) {
<span id="L941" class="LineNr"> 941 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L942" class="LineNr"> 942 </span> 57/push-edi
<span id="L943" class="LineNr"> 943 </span> <span class="subxS2Comment"># . . call</span>
<span id="L944" class="LineNr"> 944 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L944" class="LineNr"> 944 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L945" class="LineNr"> 945 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L946" class="LineNr"> 946 </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="L947" class="LineNr"> 947 </span> <span class="subxS1Comment"># . clear-stream(stream = out+4)</span>
@ -1010,7 +1010,7 @@ if ('onhashchange' in window) {
<span id="L949" class="LineNr"> 949 </span> 8d/copy-address 1/mod/*+disp8 7/rm32/edi <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy edi+4 to eax</span>
<span id="L950" class="LineNr"> 950 </span> 50/push-eax
<span id="L951" class="LineNr"> 951 </span> <span class="subxS2Comment"># . . call</span>
<span id="L952" class="LineNr"> 952 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L952" class="LineNr"> 952 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L953" class="LineNr"> 953 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L954" class="LineNr"> 954 </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="L955" class="LineNr"> 955 </span> <span class="subxS1Comment"># . out-&gt;write must now be 0; update its cache at ebx</span>
@ -1050,16 +1050,16 @@ if ('onhashchange' in window) {
<span id="L989" class="LineNr"> 989 </span> <span class="subxComment"># setup</span>
<span id="L990" class="LineNr"> 990 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L991" class="LineNr"> 991 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L992" class="LineNr"> 992 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L992" class="LineNr"> 992 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L993" class="LineNr"> 993 </span> <span class="subxS2Comment"># . . call</span>
<span id="L994" class="LineNr"> 994 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L994" class="LineNr"> 994 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L995" class="LineNr"> 995 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L996" class="LineNr"> 996 </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="L997" class="LineNr"> 997 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L998" class="LineNr"> 998 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L999" class="LineNr"> 999 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L1000" class="LineNr">1000 </span> <span class="subxS2Comment"># . . call</span>
<span id="L1001" class="LineNr">1001 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L1001" class="LineNr">1001 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L1002" class="LineNr">1002 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L1003" class="LineNr">1003 </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="L1004" class="LineNr">1004 </span> <span class="subxComment"># (eax..ecx) = &quot;Abc&quot;</span>
@ -1074,25 +1074,25 @@ if ('onhashchange' in window) {
<span id="L1013" class="LineNr">1013 </span> <span class="subxComment"># write-slice-buffered(_test-buffered-file, slice)</span>
<span id="L1014" class="LineNr">1014 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L1015" class="LineNr">1015 </span> 51/push-ecx
<span id="L1016" class="LineNr">1016 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L1016" class="LineNr">1016 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L1017" class="LineNr">1017 </span> <span class="subxS2Comment"># . . call</span>
<span id="L1018" class="LineNr">1018 </span> e8/call <a href='072slice.subx.html#L908'>write-slice-buffered</a>/disp32
<span id="L1018" class="LineNr">1018 </span> e8/call <a href='123slice.subx.html#L908'>write-slice-buffered</a>/disp32
<span id="L1019" class="LineNr">1019 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L1020" class="LineNr">1020 </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="L1021" class="LineNr">1021 </span> <span class="subxComment"># flush(_test-buffered-file)</span>
<span id="L1022" class="LineNr">1022 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L1023" class="LineNr">1023 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L1023" class="LineNr">1023 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L1024" class="LineNr">1024 </span> <span class="subxS2Comment"># . . call</span>
<span id="L1025" class="LineNr">1025 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L1025" class="LineNr">1025 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L1026" class="LineNr">1026 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L1027" class="LineNr">1027 </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="L1028" class="LineNr">1028 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;Abc&quot;, msg)</span>
<span id="L1029" class="LineNr">1029 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L1030" class="LineNr">1030 </span> 68/push <span class="Constant">&quot;F - test-write-slice-buffered&quot;</span>/imm32
<span id="L1031" class="LineNr">1031 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L1032" class="LineNr">1032 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L1032" class="LineNr">1032 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L1033" class="LineNr">1033 </span> <span class="subxS2Comment"># . . call</span>
<span id="L1034" class="LineNr">1034 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L1034" class="LineNr">1034 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L1035" class="LineNr">1035 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L1036" class="LineNr">1036 </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="L1037" class="LineNr">1037 </span> <span class="subxS1Comment"># . epilogue</span>
@ -1127,7 +1127,7 @@ if ('onhashchange' in window) {
<span id="L1066" class="LineNr">1066 </span> 51/push-ecx
<span id="L1067" class="LineNr">1067 </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="L1068" class="LineNr">1068 </span> <span class="subxS2Comment"># . . call</span>
<span id="L1069" class="LineNr">1069 </span> e8/call <a href='069allocate.subx.html#L66'>allocate</a>/disp32
<span id="L1069" class="LineNr">1069 </span> e8/call <a href='120allocate.subx.html#L66'>allocate</a>/disp32
<span id="L1070" class="LineNr">1070 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L1071" class="LineNr">1071 </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="L1072" class="LineNr">1072 </span> <span class="subxComment"># eax = out-&gt;payload</span>
@ -1155,7 +1155,7 @@ if ('onhashchange' in window) {
<span id="L1094" class="LineNr">1094 </span> 81 0/subop/add 3/mod/direct 0/rm32/eax <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 eax</span>
<span id="L1095" class="LineNr">1095 </span> 50/push-eax
<span id="L1096" class="LineNr">1096 </span> <span class="subxS2Comment"># . . call</span>
<span id="L1097" class="LineNr">1097 </span> e8/call <a href='056trace.subx.html#L897'>_append-4</a>/disp32
<span id="L1097" class="LineNr">1097 </span> e8/call <a href='107trace.subx.html#L897'>_append-4</a>/disp32
<span id="L1098" class="LineNr">1098 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L1099" class="LineNr">1099 </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> 0x10/imm32 <span class="subxComment"># add to esp</span>
<span id="L1100" class="LineNr">1100 </span> <span class="subxComment"># restore out (assumes _append-4 can't error)</span>
@ -1178,7 +1178,7 @@ if ('onhashchange' in window) {
<span id="L1117" class="LineNr">1117 </span> 68/push <span class="Constant">&quot;slice-to-string: out of space\n&quot;</span>/imm32
<span id="L1118" class="LineNr">1118 </span> 68/push 2/imm32/stderr
<span id="L1119" class="LineNr">1119 </span> <span class="subxS2Comment"># . . call</span>
<span id="L1120" class="LineNr">1120 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L1120" class="LineNr">1120 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L1121" class="LineNr">1121 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L1122" class="LineNr">1122 </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="L1123" class="LineNr">1123 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -1199,7 +1199,7 @@ if ('onhashchange' in window) {
<span id="L1138" class="LineNr">1138 </span> 52/push-edx
<span id="L1139" class="LineNr">1139 </span> 68/push 0x200/imm32
<span id="L1140" class="LineNr">1140 </span> <span class="subxS2Comment"># . . call</span>
<span id="L1141" class="LineNr">1141 </span> e8/call <a href='053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L1141" class="LineNr">1141 </span> e8/call <a href='104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L1142" class="LineNr">1142 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L1143" class="LineNr">1143 </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="L1144" class="LineNr">1144 </span> <span class="subxComment"># (eax..ecx) = &quot;Abc&quot;</span>
@ -1221,7 +1221,7 @@ if ('onhashchange' in window) {
<span id="L1160" class="LineNr">1160 </span> 51/push-ecx
<span id="L1161" class="LineNr">1161 </span> 52/push-edx
<span id="L1162" class="LineNr">1162 </span> <span class="subxS2Comment"># . . call</span>
<span id="L1163" class="LineNr">1163 </span> e8/call <a href='072slice.subx.html#L1043'>slice-to-string</a>/disp32
<span id="L1163" class="LineNr">1163 </span> e8/call <a href='123slice.subx.html#L1043'>slice-to-string</a>/disp32
<span id="L1164" class="LineNr">1164 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L1165" class="LineNr">1165 </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="L1166" class="LineNr">1166 </span> <span class="subxComment"># eax = h-&gt;payload</span>
@ -1234,7 +1234,7 @@ if ('onhashchange' in window) {
<span id="L1198" class="LineNr">1198 </span> 68/push <span class="Constant">&quot;Abc&quot;</span>/imm32
<span id="L1199" class="LineNr">1199 </span> 50/push-eax
<span id="L1200" class="LineNr">1200 </span> <span class="subxS2Comment"># . . call</span>
<span id="L1201" class="LineNr">1201 </span> e8/call <a href='054string-equal.subx.html#L15'>string-equal?</a>/disp32
<span id="L1201" class="LineNr">1201 </span> e8/call <a href='105string-equal.subx.html#L15'>string-equal?</a>/disp32
<span id="L1202" class="LineNr">1202 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L1203" class="LineNr">1203 </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="L1204" class="LineNr">1204 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -1243,7 +1243,7 @@ if ('onhashchange' in window) {
<span id="L1207" class="LineNr">1207 </span> 68/push 1/imm32/true
<span id="L1208" class="LineNr">1208 </span> 50/push-eax
<span id="L1209" class="LineNr">1209 </span> <span class="subxS2Comment"># . . call</span>
<span id="L1210" class="LineNr">1210 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L1210" class="LineNr">1210 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L1211" class="LineNr">1211 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L1212" class="LineNr">1212 </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="L1213" class="LineNr">1213 </span> <span class="subxS1Comment"># . reclaim locals</span>

File diff suppressed because it is too large Load Diff

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 074write-stream-data.subx</title>
<title>Mu - 125write-stream-data.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -55,7 +55,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/074write-stream-data.subx'>https://github.com/akkartik/mu/blob/master/074write-stream-data.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/125write-stream-data.subx'>https://github.com/akkartik/mu/blob/master/125write-stream-data.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span>== code
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># instruction effective address register displacement immediate</span>
@ -92,7 +92,7 @@ if ('onhashchange' in window) {
<span id="L33" class="LineNr"> 33 </span> 51/push-ecx
<span id="L34" class="LineNr"> 34 </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="L35" class="LineNr"> 35 </span> <span class="subxS2Comment"># . . call</span>
<span id="L36" class="LineNr"> 36 </span> e8/call <a href='072slice.subx.html#L908'>write-slice-buffered</a>/disp32
<span id="L36" class="LineNr"> 36 </span> e8/call <a href='123slice.subx.html#L908'>write-slice-buffered</a>/disp32
<span id="L37" class="LineNr"> 37 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L38" class="LineNr"> 38 </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="L39" class="LineNr"> 39 </span><span class="Constant">$write-stream-data:end</span>:
@ -114,57 +114,57 @@ if ('onhashchange' in window) {
<span id="L55" class="LineNr"> 55 </span> <span class="subxComment"># setup</span>
<span id="L56" class="LineNr"> 56 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L57" class="LineNr"> 57 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L58" class="LineNr"> 58 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L58" class="LineNr"> 58 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L59" class="LineNr"> 59 </span> <span class="subxS2Comment"># . . call</span>
<span id="L60" class="LineNr"> 60 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L60" class="LineNr"> 60 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L61" class="LineNr"> 61 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L62" class="LineNr"> 62 </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="L63" class="LineNr"> 63 </span> <span class="subxS1Comment"># . clear-stream($_test-output-buffered-file-&gt;buffer)</span>
<span id="L64" class="LineNr"> 64 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L65" class="LineNr"> 65 </span> 68/push $_test-output-buffered-file-&gt;buffer/imm32
<span id="L66" class="LineNr"> 66 </span> <span class="subxS2Comment"># . . call</span>
<span id="L67" class="LineNr"> 67 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L67" class="LineNr"> 67 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L68" class="LineNr"> 68 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L69" class="LineNr"> 69 </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="L70" class="LineNr"> 70 </span> <span class="subxS1Comment"># . clear-stream(_test-input-stream)</span>
<span id="L71" class="LineNr"> 71 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L72" class="LineNr"> 72 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L72" class="LineNr"> 72 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L73" class="LineNr"> 73 </span> <span class="subxS2Comment"># . . call</span>
<span id="L74" class="LineNr"> 74 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L74" class="LineNr"> 74 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L75" class="LineNr"> 75 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L76" class="LineNr"> 76 </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="L77" class="LineNr"> 77 </span> <span class="subxComment"># initialize input</span>
<span id="L78" class="LineNr"> 78 </span> <span class="subxS1Comment"># . write(_test-input-stream, &quot;abcd&quot;)</span>
<span id="L79" class="LineNr"> 79 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L80" class="LineNr"> 80 </span> 68/push <span class="Constant">&quot;abcd&quot;</span>/imm32
<span id="L81" class="LineNr"> 81 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L81" class="LineNr"> 81 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L82" class="LineNr"> 82 </span> <span class="subxS2Comment"># . . call</span>
<span id="L83" class="LineNr"> 83 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L83" class="LineNr"> 83 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L84" class="LineNr"> 84 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L85" class="LineNr"> 85 </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="L86" class="LineNr"> 86 </span> <span class="subxComment"># write-stream-data(_test-output-buffered-file, _test-input-stream)</span>
<span id="L87" class="LineNr"> 87 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L88" class="LineNr"> 88 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L89" class="LineNr"> 89 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L88" class="LineNr"> 88 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L89" class="LineNr"> 89 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L90" class="LineNr"> 90 </span> <span class="subxS2Comment"># . . call</span>
<span id="L91" class="LineNr"> 91 </span> e8/call <a href='074write-stream-data.subx.html#L11'>write-stream-data</a>/disp32
<span id="L91" class="LineNr"> 91 </span> e8/call <a href='125write-stream-data.subx.html#L11'>write-stream-data</a>/disp32
<span id="L92" class="LineNr"> 92 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L93" class="LineNr"> 93 </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="L94" class="LineNr"> 94 </span> <span class="subxComment"># check that the write happened as expected</span>
<span id="L95" class="LineNr"> 95 </span> <span class="subxS1Comment"># . flush(_test-output-buffered-file)</span>
<span id="L96" class="LineNr"> 96 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L97" class="LineNr"> 97 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L97" class="LineNr"> 97 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L98" class="LineNr"> 98 </span> <span class="subxS2Comment"># . . call</span>
<span id="L99" class="LineNr"> 99 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L99" class="LineNr"> 99 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L100" class="LineNr">100 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L101" class="LineNr">101 </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="L102" class="LineNr">102 </span> <span class="subxS1Comment"># . check-stream-equal(_test-output-stream, &quot;abcd&quot;, msg)</span>
<span id="L103" class="LineNr">103 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L104" class="LineNr">104 </span> 68/push <span class="Constant">&quot;F - test-write-stream-data&quot;</span>/imm32
<span id="L105" class="LineNr">105 </span> 68/push <span class="Constant">&quot;abcd&quot;</span>/imm32
<span id="L106" class="LineNr">106 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L106" class="LineNr">106 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L107" class="LineNr">107 </span> <span class="subxS2Comment"># . . call</span>
<span id="L108" class="LineNr">108 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L108" class="LineNr">108 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L109" class="LineNr">109 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L110" class="LineNr">110 </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="L111" class="LineNr">111 </span> <span class="subxS1Comment"># . epilogue</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 075write-int-decimal.subx</title>
<title>Mu - 126write-int-decimal.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -59,7 +59,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/075write-int-decimal.subx'>https://github.com/akkartik/mu/blob/master/075write-int-decimal.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/126write-int-decimal.subx'>https://github.com/akkartik/mu/blob/master/126write-int-decimal.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Helper to print an int32 in decimal.</span>
<span id="L2" class="LineNr"> 2 </span>
@ -131,10 +131,10 @@ if ('onhashchange' in window) {
<span id="L68" class="LineNr"> 68 </span><span class="Constant">$write-int32-decimal:read-break</span>:
<span id="L69" class="LineNr"> 69 </span> <span class="subxComment"># if (n &lt; 0) push('-')</span>
<span id="L70" class="LineNr"> 70 </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> 0xc/disp8 0/imm32 <span class="subxComment"># compare *(ebp+12)</span>
<span id="L71" class="LineNr"> 71 </span> 7d/jump-if-&gt;= $write-int32-decimal:<a href='057write.subx.html#L24'>write</a>/disp8
<span id="L71" class="LineNr"> 71 </span> 7d/jump-if-&gt;= $write-int32-decimal:<a href='108write.subx.html#L24'>write</a>/disp8
<span id="L72" class="LineNr"> 72 </span><span class="Constant">$write-int32-decimal:push-negative</span>:
<span id="L73" class="LineNr"> 73 </span> 68/push 0x2d/imm32/-
<span id="L74" class="LineNr"> 74 </span><span class="Constant">$write-int32-decimal:<a href='057write.subx.html#L24'>write</a></span>:
<span id="L74" class="LineNr"> 74 </span><span class="Constant">$write-int32-decimal:<a href='108write.subx.html#L24'>write</a></span>:
<span id="L75" class="LineNr"> 75 </span> <span class="subxComment"># edi = out</span>
<span id="L76" class="LineNr"> 76 </span> 8b/copy 1/mod/*+disp8 5/rm32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 7/r32/edi 8/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ebp+8) to edi</span>
<span id="L77" class="LineNr"> 77 </span> <span class="subxComment"># var w/edx: int = out-&gt;write</span>
@ -182,7 +182,7 @@ if ('onhashchange' in window) {
<span id="L119" class="LineNr">119 </span> 68/push <span class="Constant">&quot;write-int32-decimal: out of space\n&quot;</span>/imm32
<span id="L120" class="LineNr">120 </span> 68/push 2/imm32/stderr
<span id="L121" class="LineNr">121 </span> <span class="subxS2Comment"># . . call</span>
<span id="L122" class="LineNr">122 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L122" class="LineNr">122 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L123" class="LineNr">123 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L124" class="LineNr">124 </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="L125" class="LineNr">125 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -195,26 +195,26 @@ if ('onhashchange' in window) {
<span id="L132" class="LineNr">132 </span> <span class="subxComment"># setup</span>
<span id="L133" class="LineNr">133 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L134" class="LineNr">134 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L135" class="LineNr">135 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L135" class="LineNr">135 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L136" class="LineNr">136 </span> <span class="subxS2Comment"># . . call</span>
<span id="L137" class="LineNr">137 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L137" class="LineNr">137 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L138" class="LineNr">138 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L139" class="LineNr">139 </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="L140" class="LineNr">140 </span> <span class="subxComment"># write-int32-decimal(_test-stream, 9)</span>
<span id="L141" class="LineNr">141 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L142" class="LineNr">142 </span> 68/push 9/imm32
<span id="L143" class="LineNr">143 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L143" class="LineNr">143 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L144" class="LineNr">144 </span> <span class="subxS2Comment"># . . call</span>
<span id="L145" class="LineNr">145 </span> e8/call <a href='075write-int-decimal.subx.html#L8'>write-int32-decimal</a>/disp32
<span id="L145" class="LineNr">145 </span> e8/call <a href='126write-int-decimal.subx.html#L8'>write-int32-decimal</a>/disp32
<span id="L146" class="LineNr">146 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L147" class="LineNr">147 </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="L148" class="LineNr">148 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;9&quot;, msg)</span>
<span id="L149" class="LineNr">149 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L150" class="LineNr">150 </span> 68/push <span class="Constant">&quot;F - test-write-int32-decimal&quot;</span>/imm32
<span id="L151" class="LineNr">151 </span> 68/push <span class="Constant">&quot;9&quot;</span>/imm32
<span id="L152" class="LineNr">152 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L152" class="LineNr">152 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L153" class="LineNr">153 </span> <span class="subxS2Comment"># . . call</span>
<span id="L154" class="LineNr">154 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L154" class="LineNr">154 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L155" class="LineNr">155 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L156" class="LineNr">156 </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="L157" class="LineNr">157 </span> <span class="subxS1Comment"># . end</span>
@ -225,26 +225,26 @@ if ('onhashchange' in window) {
<span id="L162" class="LineNr">162 </span> <span class="subxComment"># setup</span>
<span id="L163" class="LineNr">163 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L164" class="LineNr">164 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L165" class="LineNr">165 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L165" class="LineNr">165 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L166" class="LineNr">166 </span> <span class="subxS2Comment"># . . call</span>
<span id="L167" class="LineNr">167 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L167" class="LineNr">167 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L168" class="LineNr">168 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L169" class="LineNr">169 </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="L170" class="LineNr">170 </span> <span class="subxComment"># write-int32-decimal(_test-stream, 0)</span>
<span id="L171" class="LineNr">171 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L172" class="LineNr">172 </span> 68/push 0/imm32
<span id="L173" class="LineNr">173 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L173" class="LineNr">173 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L174" class="LineNr">174 </span> <span class="subxS2Comment"># . . call</span>
<span id="L175" class="LineNr">175 </span> e8/call <a href='075write-int-decimal.subx.html#L8'>write-int32-decimal</a>/disp32
<span id="L175" class="LineNr">175 </span> e8/call <a href='126write-int-decimal.subx.html#L8'>write-int32-decimal</a>/disp32
<span id="L176" class="LineNr">176 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L177" class="LineNr">177 </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="L178" class="LineNr">178 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;0&quot;, msg)</span>
<span id="L179" class="LineNr">179 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L180" class="LineNr">180 </span> 68/push <span class="Constant">&quot;F - test-write-int32-decimal-zero&quot;</span>/imm32
<span id="L181" class="LineNr">181 </span> 68/push <span class="Constant">&quot;0&quot;</span>/imm32
<span id="L182" class="LineNr">182 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L182" class="LineNr">182 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L183" class="LineNr">183 </span> <span class="subxS2Comment"># . . call</span>
<span id="L184" class="LineNr">184 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L184" class="LineNr">184 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L185" class="LineNr">185 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L186" class="LineNr">186 </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="L187" class="LineNr">187 </span> <span class="subxS1Comment"># . end</span>
@ -255,26 +255,26 @@ if ('onhashchange' in window) {
<span id="L192" class="LineNr">192 </span> <span class="subxComment"># setup</span>
<span id="L193" class="LineNr">193 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L194" class="LineNr">194 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L195" class="LineNr">195 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L195" class="LineNr">195 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L196" class="LineNr">196 </span> <span class="subxS2Comment"># . . call</span>
<span id="L197" class="LineNr">197 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L197" class="LineNr">197 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L198" class="LineNr">198 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L199" class="LineNr">199 </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="L200" class="LineNr">200 </span> <span class="subxComment"># write-int32-decimal(_test-stream, 10)</span>
<span id="L201" class="LineNr">201 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L202" class="LineNr">202 </span> 68/push 0xa/imm32
<span id="L203" class="LineNr">203 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L203" class="LineNr">203 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L204" class="LineNr">204 </span> <span class="subxS2Comment"># . . call</span>
<span id="L205" class="LineNr">205 </span> e8/call <a href='075write-int-decimal.subx.html#L8'>write-int32-decimal</a>/disp32
<span id="L205" class="LineNr">205 </span> e8/call <a href='126write-int-decimal.subx.html#L8'>write-int32-decimal</a>/disp32
<span id="L206" class="LineNr">206 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L207" class="LineNr">207 </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="L208" class="LineNr">208 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;10&quot;, msg)</span>
<span id="L209" class="LineNr">209 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L210" class="LineNr">210 </span> 68/push <span class="Constant">&quot;F - test-write-int32-decimal-multiple-digits&quot;</span>/imm32
<span id="L211" class="LineNr">211 </span> 68/push <span class="Constant">&quot;10&quot;</span>/imm32
<span id="L212" class="LineNr">212 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L212" class="LineNr">212 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L213" class="LineNr">213 </span> <span class="subxS2Comment"># . . call</span>
<span id="L214" class="LineNr">214 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L214" class="LineNr">214 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L215" class="LineNr">215 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L216" class="LineNr">216 </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="L217" class="LineNr">217 </span> <span class="subxS1Comment"># . end</span>
@ -285,17 +285,17 @@ if ('onhashchange' in window) {
<span id="L222" class="LineNr">222 </span> <span class="subxComment"># setup</span>
<span id="L223" class="LineNr">223 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L224" class="LineNr">224 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L225" class="LineNr">225 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L225" class="LineNr">225 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L226" class="LineNr">226 </span> <span class="subxS2Comment"># . . call</span>
<span id="L227" class="LineNr">227 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L227" class="LineNr">227 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L228" class="LineNr">228 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L229" class="LineNr">229 </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="L230" class="LineNr">230 </span> <span class="subxComment"># write-int32-decimal(_test-stream, -9)</span>
<span id="L231" class="LineNr">231 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L232" class="LineNr">232 </span> 68/push -9/imm32
<span id="L233" class="LineNr">233 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L233" class="LineNr">233 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L234" class="LineNr">234 </span> <span class="subxS2Comment"># . . call</span>
<span id="L235" class="LineNr">235 </span> e8/call <a href='075write-int-decimal.subx.html#L8'>write-int32-decimal</a>/disp32
<span id="L235" class="LineNr">235 </span> e8/call <a href='126write-int-decimal.subx.html#L8'>write-int32-decimal</a>/disp32
<span id="L236" class="LineNr">236 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L237" class="LineNr">237 </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="L238" class="Folded">238 </span><span class="Folded">+-- 26 lines: #? # dump _test-stream ------------------------------------------------------------------------------------------------------------------------------------------------</span>
@ -303,9 +303,9 @@ if ('onhashchange' in window) {
<span id="L265" class="LineNr">265 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L266" class="LineNr">266 </span> 68/push <span class="Constant">&quot;F - test-write-int32-decimal-negative&quot;</span>/imm32
<span id="L267" class="LineNr">267 </span> 68/push <span class="Constant">&quot;-9&quot;</span>/imm32
<span id="L268" class="LineNr">268 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L268" class="LineNr">268 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L269" class="LineNr">269 </span> <span class="subxS2Comment"># . . call</span>
<span id="L270" class="LineNr">270 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L270" class="LineNr">270 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L271" class="LineNr">271 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L272" class="LineNr">272 </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="L273" class="LineNr">273 </span> <span class="subxS1Comment"># . end</span>
@ -316,32 +316,32 @@ if ('onhashchange' in window) {
<span id="L278" class="LineNr">278 </span> <span class="subxComment"># setup</span>
<span id="L279" class="LineNr">279 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L280" class="LineNr">280 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L281" class="LineNr">281 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L281" class="LineNr">281 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L282" class="LineNr">282 </span> <span class="subxS2Comment"># . . call</span>
<span id="L283" class="LineNr">283 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L283" class="LineNr">283 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L284" class="LineNr">284 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L285" class="LineNr">285 </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="L286" class="LineNr">286 </span> <span class="subxComment"># write-int32-decimal(_test-stream, -10)</span>
<span id="L287" class="LineNr">287 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L288" class="LineNr">288 </span> 68/push -0xa/imm32
<span id="L289" class="LineNr">289 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L289" class="LineNr">289 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L290" class="LineNr">290 </span> <span class="subxS2Comment"># . . call</span>
<span id="L291" class="LineNr">291 </span> e8/call <a href='075write-int-decimal.subx.html#L8'>write-int32-decimal</a>/disp32
<span id="L291" class="LineNr">291 </span> e8/call <a href='126write-int-decimal.subx.html#L8'>write-int32-decimal</a>/disp32
<span id="L292" class="LineNr">292 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L293" class="LineNr">293 </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="L294" class="LineNr">294 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;-10&quot;, msg)</span>
<span id="L295" class="LineNr">295 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L296" class="LineNr">296 </span> 68/push <span class="Constant">&quot;F - test-write-int32-decimal-negative-multiple-digits&quot;</span>/imm32
<span id="L297" class="LineNr">297 </span> 68/push <span class="Constant">&quot;-10&quot;</span>/imm32
<span id="L298" class="LineNr">298 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L298" class="LineNr">298 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L299" class="LineNr">299 </span> <span class="subxS2Comment"># . . call</span>
<span id="L300" class="LineNr">300 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L300" class="LineNr">300 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L301" class="LineNr">301 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L302" class="LineNr">302 </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="L303" class="LineNr">303 </span> <span class="subxS1Comment"># . end</span>
<span id="L304" class="LineNr">304 </span> c3/return
<span id="L305" class="LineNr">305 </span>
<span id="L306" class="LineNr">306 </span><span class="subxFunction">is-decimal-digit?</span>: <span class="subxComment"># c: byte -&gt; eax: boolean</span>
<span id="L306" class="LineNr">306 </span><span class="subxFunction">is-decimal-digit?</span>: <span class="subxComment"># c: byte -&gt; result/eax: boolean</span>
<span id="L307" class="LineNr">307 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L308" class="LineNr">308 </span> 55/push-ebp
<span id="L309" class="LineNr">309 </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>
@ -372,7 +372,7 @@ if ('onhashchange' in window) {
<span id="L334" class="LineNr">334 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L335" class="LineNr">335 </span> 68/push 0x2f/imm32
<span id="L336" class="LineNr">336 </span> <span class="subxS2Comment"># . . call</span>
<span id="L337" class="LineNr">337 </span> e8/call <a href='075write-int-decimal.subx.html#L306'>is-decimal-digit?</a>/disp32
<span id="L337" class="LineNr">337 </span> e8/call <a href='126write-int-decimal.subx.html#L306'>is-decimal-digit?</a>/disp32
<span id="L338" class="LineNr">338 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L339" class="LineNr">339 </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="L340" class="LineNr">340 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -381,7 +381,7 @@ if ('onhashchange' in window) {
<span id="L343" class="LineNr">343 </span> 68/push 0/imm32/false
<span id="L344" class="LineNr">344 </span> 50/push-eax
<span id="L345" class="LineNr">345 </span> <span class="subxS2Comment"># . . call</span>
<span id="L346" class="LineNr">346 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L346" class="LineNr">346 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L347" class="LineNr">347 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L348" class="LineNr">348 </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="L349" class="LineNr">349 </span> c3/return
@ -391,7 +391,7 @@ if ('onhashchange' in window) {
<span id="L353" class="LineNr">353 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L354" class="LineNr">354 </span> 68/push 0x30/imm32
<span id="L355" class="LineNr">355 </span> <span class="subxS2Comment"># . . call</span>
<span id="L356" class="LineNr">356 </span> e8/call <a href='075write-int-decimal.subx.html#L306'>is-decimal-digit?</a>/disp32
<span id="L356" class="LineNr">356 </span> e8/call <a href='126write-int-decimal.subx.html#L306'>is-decimal-digit?</a>/disp32
<span id="L357" class="LineNr">357 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L358" class="LineNr">358 </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="L359" class="LineNr">359 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -400,14 +400,14 @@ if ('onhashchange' in window) {
<span id="L362" class="LineNr">362 </span> 68/push 1/imm32/true
<span id="L363" class="LineNr">363 </span> 50/push-eax
<span id="L364" class="LineNr">364 </span> <span class="subxS2Comment"># . . call</span>
<span id="L365" class="LineNr">365 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L365" class="LineNr">365 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L366" class="LineNr">366 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L367" class="LineNr">367 </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="L368" class="LineNr">368 </span> <span class="subxComment"># eax = is-decimal-digit?(0x39)</span>
<span id="L369" class="LineNr">369 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L370" class="LineNr">370 </span> 68/push 0x39/imm32
<span id="L371" class="LineNr">371 </span> <span class="subxS2Comment"># . . call</span>
<span id="L372" class="LineNr">372 </span> e8/call <a href='075write-int-decimal.subx.html#L306'>is-decimal-digit?</a>/disp32
<span id="L372" class="LineNr">372 </span> e8/call <a href='126write-int-decimal.subx.html#L306'>is-decimal-digit?</a>/disp32
<span id="L373" class="LineNr">373 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L374" class="LineNr">374 </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="L375" class="LineNr">375 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -416,7 +416,7 @@ if ('onhashchange' in window) {
<span id="L378" class="LineNr">378 </span> 68/push 1/imm32/true
<span id="L379" class="LineNr">379 </span> 50/push-eax
<span id="L380" class="LineNr">380 </span> <span class="subxS2Comment"># . . call</span>
<span id="L381" class="LineNr">381 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L381" class="LineNr">381 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L382" class="LineNr">382 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L383" class="LineNr">383 </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="L384" class="LineNr">384 </span> c3/return
@ -426,7 +426,7 @@ if ('onhashchange' in window) {
<span id="L388" class="LineNr">388 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L389" class="LineNr">389 </span> 68/push 0x3a/imm32
<span id="L390" class="LineNr">390 </span> <span class="subxS2Comment"># . . call</span>
<span id="L391" class="LineNr">391 </span> e8/call <a href='075write-int-decimal.subx.html#L306'>is-decimal-digit?</a>/disp32
<span id="L391" class="LineNr">391 </span> e8/call <a href='126write-int-decimal.subx.html#L306'>is-decimal-digit?</a>/disp32
<span id="L392" class="LineNr">392 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L393" class="LineNr">393 </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="L394" class="LineNr">394 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -435,7 +435,7 @@ if ('onhashchange' in window) {
<span id="L397" class="LineNr">397 </span> 68/push 0/imm32/false
<span id="L398" class="LineNr">398 </span> 50/push-eax
<span id="L399" class="LineNr">399 </span> <span class="subxS2Comment"># . . call</span>
<span id="L400" class="LineNr">400 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L400" class="LineNr">400 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L401" class="LineNr">401 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L402" class="LineNr">402 </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="L403" class="LineNr">403 </span> c3/return
@ -467,33 +467,33 @@ if ('onhashchange' in window) {
<span id="L429" class="LineNr">429 </span> <span class="subxS1Comment"># . write-buffered(stderr, error)</span>
<span id="L430" class="LineNr">430 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L431" class="LineNr">431 </span> 68/push <span class="Constant">&quot;to-decimal-digit: not a digit character: &quot;</span>/imm32
<span id="L432" class="LineNr">432 </span> 68/push <span class="SpecialChar"><a href='065write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L432" class="LineNr">432 </span> 68/push <span class="SpecialChar"><a href='116write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L433" class="LineNr">433 </span> <span class="subxS2Comment"># . . call</span>
<span id="L434" class="LineNr">434 </span> e8/call <a href='065write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L434" class="LineNr">434 </span> e8/call <a href='116write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L435" class="LineNr">435 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L436" class="LineNr">436 </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="L437" class="LineNr">437 </span> <span class="subxS1Comment"># . write-byte-buffered(stderr, %eax)</span>
<span id="L438" class="LineNr">438 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L439" class="LineNr">439 </span> 50/push-eax
<span id="L440" class="LineNr">440 </span> 68/push <span class="SpecialChar"><a href='065write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L440" class="LineNr">440 </span> 68/push <span class="SpecialChar"><a href='116write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L441" class="LineNr">441 </span> <span class="subxS2Comment"># . . call</span>
<span id="L442" class="LineNr">442 </span><span class="CommentedCode">#? e8/call write-byte-buffered/disp32</span>
<span id="L443" class="LineNr">443 </span> e8/call <a href='066write-int-hex.subx.html#L266'>write-int32-hex-buffered</a>/disp32
<span id="L443" class="LineNr">443 </span> e8/call <a href='117write-int-hex.subx.html#L266'>write-int32-hex-buffered</a>/disp32
<span id="L444" class="LineNr">444 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L445" class="LineNr">445 </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="L446" class="LineNr">446 </span> <span class="subxS1Comment"># . write-buffered(stderr, &quot;\n&quot;)</span>
<span id="L447" class="LineNr">447 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L448" class="LineNr">448 </span> 68/push <span class="SpecialChar"><a href='051test.subx.html#L82'>Newline</a></span>/imm32
<span id="L449" class="LineNr">449 </span> 68/push <span class="SpecialChar"><a href='065write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L448" class="LineNr">448 </span> 68/push <span class="SpecialChar"><a href='102test.subx.html#L82'>Newline</a></span>/imm32
<span id="L449" class="LineNr">449 </span> 68/push <span class="SpecialChar"><a href='116write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L450" class="LineNr">450 </span> <span class="subxS2Comment"># . . call</span>
<span id="L451" class="LineNr">451 </span> e8/call <a href='065write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L451" class="LineNr">451 </span> e8/call <a href='116write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L452" class="LineNr">452 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L453" class="LineNr">453 </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="L454" class="LineNr">454 </span> <span class="subxS1Comment"># . flush(Stderr)</span>
<span id="L455" class="LineNr">455 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L456" class="LineNr">456 </span> 68/push <span class="SpecialChar"><a href='065write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L456" class="LineNr">456 </span> 68/push <span class="SpecialChar"><a href='116write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L457" class="LineNr">457 </span> <span class="subxS2Comment"># . . call</span>
<span id="L458" class="LineNr">458 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L458" class="LineNr">458 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L459" class="LineNr">459 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L460" class="LineNr">460 </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="L461" class="LineNr">461 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 076next-word.subx</title>
<title>Mu - 127next-word.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -55,7 +55,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/076next-word.subx'>https://github.com/akkartik/mu/blob/master/076next-word.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/127next-word.subx'>https://github.com/akkartik/mu/blob/master/127next-word.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Tokenize by whitespace.</span>
<span id="L2" class="LineNr"> 2 </span>
@ -84,7 +84,7 @@ if ('onhashchange' in window) {
<span id="L25" class="LineNr"> 25 </span> 68/push 0x20/imm32/space
<span id="L26" class="LineNr"> 26 </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="L27" class="LineNr"> 27 </span> <span class="subxS2Comment"># . . call</span>
<span id="L28" class="LineNr"> 28 </span> e8/call <a href='073next-token.subx.html#L341'>skip-chars-matching</a>/disp32
<span id="L28" class="LineNr"> 28 </span> e8/call <a href='124next-token.subx.html#L341'>skip-chars-matching</a>/disp32
<span id="L29" class="LineNr"> 29 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L30" class="LineNr"> 30 </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="L31" class="LineNr"> 31 </span><span class="Constant">$next-word:check0</span>:
@ -124,7 +124,7 @@ if ('onhashchange' in window) {
<span id="L65" class="LineNr"> 65 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L66" class="LineNr"> 66 </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="L67" class="LineNr"> 67 </span> <span class="subxS2Comment"># . . call</span>
<span id="L68" class="LineNr"> 68 </span> e8/call <a href='073next-token.subx.html#L716'>skip-chars-not-matching-whitespace</a>/disp32
<span id="L68" class="LineNr"> 68 </span> e8/call <a href='124next-token.subx.html#L716'>skip-chars-not-matching-whitespace</a>/disp32
<span id="L69" class="LineNr"> 69 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L70" class="LineNr"> 70 </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="L71" class="LineNr"> 71 </span> <span class="subxComment"># out-&gt;end = &amp;line-&gt;data[line-&gt;read]</span>
@ -149,9 +149,9 @@ if ('onhashchange' in window) {
<span id="L90" class="LineNr"> 90 </span> <span class="subxComment"># setup</span>
<span id="L91" class="LineNr"> 91 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L92" class="LineNr"> 92 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L93" class="LineNr"> 93 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L93" class="LineNr"> 93 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L94" class="LineNr"> 94 </span> <span class="subxS2Comment"># . . call</span>
<span id="L95" class="LineNr"> 95 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L95" class="LineNr"> 95 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L96" class="LineNr"> 96 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L97" class="LineNr"> 97 </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="L98" class="LineNr"> 98 </span> <span class="subxComment"># var slice/ecx: slice</span>
@ -161,43 +161,43 @@ if ('onhashchange' in window) {
<span id="L102" class="LineNr">102 </span> <span class="subxComment"># write(_test-stream, &quot; ab&quot;)</span>
<span id="L103" class="LineNr">103 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L104" class="LineNr">104 </span> 68/push <span class="Constant">&quot; ab&quot;</span>/imm32
<span id="L105" class="LineNr">105 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L105" class="LineNr">105 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L106" class="LineNr">106 </span> <span class="subxS2Comment"># . . call</span>
<span id="L107" class="LineNr">107 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L107" class="LineNr">107 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L108" class="LineNr">108 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L109" class="LineNr">109 </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="L110" class="LineNr">110 </span> <span class="subxComment"># next-word(_test-stream, slice)</span>
<span id="L111" class="LineNr">111 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L112" class="LineNr">112 </span> 51/push-ecx
<span id="L113" class="LineNr">113 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L113" class="LineNr">113 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L114" class="LineNr">114 </span> <span class="subxS2Comment"># . . call</span>
<span id="L115" class="LineNr">115 </span> e8/call <a href='076next-word.subx.html#L10'>next-word</a>/disp32
<span id="L115" class="LineNr">115 </span> e8/call <a href='127next-word.subx.html#L10'>next-word</a>/disp32
<span id="L116" class="LineNr">116 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L117" class="LineNr">117 </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="L118" class="LineNr">118 </span> <span class="subxComment"># check-ints-equal(slice-&gt;start - _test-stream-&gt;data, 2, msg)</span>
<span id="L119" class="LineNr">119 </span> <span class="subxS1Comment"># . check-ints-equal(slice-&gt;start - _test-stream, 14, msg)</span>
<span id="L120" class="LineNr">120 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L121" class="LineNr">121 </span> 68/push <span class="Constant">&quot;F - <a href='076next-word.subx.html#L86'>test-next-word</a>: start&quot;</span>/imm32
<span id="L121" class="LineNr">121 </span> 68/push <span class="Constant">&quot;F - <a href='127next-word.subx.html#L86'>test-next-word</a>: start&quot;</span>/imm32
<span id="L122" class="LineNr">122 </span> 68/push 0xe/imm32
<span id="L123" class="LineNr">123 </span> <span class="subxS2Comment"># . . push slice-&gt;start - _test-stream</span>
<span id="L124" class="LineNr">124 </span> 8b/copy 0/mod/indirect 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy *ecx to eax</span>
<span id="L125" class="LineNr">125 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='057write.subx.html#L148'>_test-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L125" class="LineNr">125 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='108write.subx.html#L148'>_test-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L126" class="LineNr">126 </span> 50/push-eax
<span id="L127" class="LineNr">127 </span> <span class="subxS2Comment"># . . call</span>
<span id="L128" class="LineNr">128 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L128" class="LineNr">128 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L129" class="LineNr">129 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L130" class="LineNr">130 </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="L131" class="LineNr">131 </span> <span class="subxComment"># check-ints-equal(slice-&gt;end - _test-stream-&gt;data, 4, msg)</span>
<span id="L132" class="LineNr">132 </span> <span class="subxS1Comment"># . check-ints-equal(slice-&gt;end - _test-stream, 16, msg)</span>
<span id="L133" class="LineNr">133 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L134" class="LineNr">134 </span> 68/push <span class="Constant">&quot;F - <a href='076next-word.subx.html#L86'>test-next-word</a>: end&quot;</span>/imm32
<span id="L134" class="LineNr">134 </span> 68/push <span class="Constant">&quot;F - <a href='127next-word.subx.html#L86'>test-next-word</a>: end&quot;</span>/imm32
<span id="L135" class="LineNr">135 </span> 68/push 0x10/imm32
<span id="L136" class="LineNr">136 </span> <span class="subxS2Comment"># . . push slice-&gt;end - _test-stream</span>
<span id="L137" class="LineNr">137 </span> 8b/copy 1/mod/*+disp8 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ecx+4) to eax</span>
<span id="L138" class="LineNr">138 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='057write.subx.html#L148'>_test-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L138" class="LineNr">138 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='108write.subx.html#L148'>_test-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L139" class="LineNr">139 </span> 50/push-eax
<span id="L140" class="LineNr">140 </span> <span class="subxS2Comment"># . . call</span>
<span id="L141" class="LineNr">141 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L141" class="LineNr">141 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L142" class="LineNr">142 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L143" class="LineNr">143 </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="L144" class="LineNr">144 </span> <span class="subxS1Comment"># . epilogue</span>
@ -212,9 +212,9 @@ if ('onhashchange' in window) {
<span id="L153" class="LineNr">153 </span> <span class="subxComment"># setup</span>
<span id="L154" class="LineNr">154 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L155" class="LineNr">155 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L156" class="LineNr">156 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L156" class="LineNr">156 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L157" class="LineNr">157 </span> <span class="subxS2Comment"># . . call</span>
<span id="L158" class="LineNr">158 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L158" class="LineNr">158 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L159" class="LineNr">159 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L160" class="LineNr">160 </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="L161" class="LineNr">161 </span> <span class="subxComment"># var slice/ecx: slice</span>
@ -224,43 +224,43 @@ if ('onhashchange' in window) {
<span id="L165" class="LineNr">165 </span> <span class="subxComment"># write(_test-stream, &quot; # a&quot;)</span>
<span id="L166" class="LineNr">166 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L167" class="LineNr">167 </span> 68/push <span class="Constant">&quot; # a&quot;</span>/imm32
<span id="L168" class="LineNr">168 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L168" class="LineNr">168 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L169" class="LineNr">169 </span> <span class="subxS2Comment"># . . call</span>
<span id="L170" class="LineNr">170 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L170" class="LineNr">170 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L171" class="LineNr">171 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L172" class="LineNr">172 </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="L173" class="LineNr">173 </span> <span class="subxComment"># next-word(_test-stream, slice)</span>
<span id="L174" class="LineNr">174 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L175" class="LineNr">175 </span> 51/push-ecx
<span id="L176" class="LineNr">176 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L176" class="LineNr">176 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L177" class="LineNr">177 </span> <span class="subxS2Comment"># . . call</span>
<span id="L178" class="LineNr">178 </span> e8/call <a href='076next-word.subx.html#L10'>next-word</a>/disp32
<span id="L178" class="LineNr">178 </span> e8/call <a href='127next-word.subx.html#L10'>next-word</a>/disp32
<span id="L179" class="LineNr">179 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L180" class="LineNr">180 </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="L181" class="LineNr">181 </span> <span class="subxComment"># check-ints-equal(slice-&gt;start - _test-stream-&gt;data, 2, msg)</span>
<span id="L182" class="LineNr">182 </span> <span class="subxS1Comment"># . check-ints-equal(slice-&gt;start - _test-stream, 14, msg)</span>
<span id="L183" class="LineNr">183 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L184" class="LineNr">184 </span> 68/push <span class="Constant">&quot;F - <a href='076next-word.subx.html#L149'>test-next-word-returns-whole-comment</a>: start&quot;</span>/imm32
<span id="L184" class="LineNr">184 </span> 68/push <span class="Constant">&quot;F - <a href='127next-word.subx.html#L149'>test-next-word-returns-whole-comment</a>: start&quot;</span>/imm32
<span id="L185" class="LineNr">185 </span> 68/push 0xe/imm32
<span id="L186" class="LineNr">186 </span> <span class="subxS2Comment"># . . push slice-&gt;start - _test-stream</span>
<span id="L187" class="LineNr">187 </span> 8b/copy 0/mod/indirect 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy *ecx to eax</span>
<span id="L188" class="LineNr">188 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='057write.subx.html#L148'>_test-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L188" class="LineNr">188 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='108write.subx.html#L148'>_test-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L189" class="LineNr">189 </span> 50/push-eax
<span id="L190" class="LineNr">190 </span> <span class="subxS2Comment"># . . call</span>
<span id="L191" class="LineNr">191 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L191" class="LineNr">191 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L192" class="LineNr">192 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L193" class="LineNr">193 </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="L194" class="LineNr">194 </span> <span class="subxComment"># check-ints-equal(slice-&gt;end - _test-stream-&gt;data, 5, msg)</span>
<span id="L195" class="LineNr">195 </span> <span class="subxS1Comment"># . check-ints-equal(slice-&gt;end - _test-stream, 17, msg)</span>
<span id="L196" class="LineNr">196 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L197" class="LineNr">197 </span> 68/push <span class="Constant">&quot;F - <a href='076next-word.subx.html#L149'>test-next-word-returns-whole-comment</a>: end&quot;</span>/imm32
<span id="L197" class="LineNr">197 </span> 68/push <span class="Constant">&quot;F - <a href='127next-word.subx.html#L149'>test-next-word-returns-whole-comment</a>: end&quot;</span>/imm32
<span id="L198" class="LineNr">198 </span> 68/push 0x11/imm32
<span id="L199" class="LineNr">199 </span> <span class="subxS2Comment"># . . push slice-&gt;end - _test-stream</span>
<span id="L200" class="LineNr">200 </span> 8b/copy 1/mod/*+disp8 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ecx+4) to eax</span>
<span id="L201" class="LineNr">201 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='057write.subx.html#L148'>_test-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L201" class="LineNr">201 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='108write.subx.html#L148'>_test-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L202" class="LineNr">202 </span> 50/push-eax
<span id="L203" class="LineNr">203 </span> <span class="subxS2Comment"># . . call</span>
<span id="L204" class="LineNr">204 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L204" class="LineNr">204 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L205" class="LineNr">205 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L206" class="LineNr">206 </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="L207" class="LineNr">207 </span> <span class="subxS1Comment"># . epilogue</span>
@ -275,9 +275,9 @@ if ('onhashchange' in window) {
<span id="L216" class="LineNr">216 </span> <span class="subxComment"># setup</span>
<span id="L217" class="LineNr">217 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L218" class="LineNr">218 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L219" class="LineNr">219 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L219" class="LineNr">219 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L220" class="LineNr">220 </span> <span class="subxS2Comment"># . . call</span>
<span id="L221" class="LineNr">221 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L221" class="LineNr">221 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L222" class="LineNr">222 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L223" class="LineNr">223 </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="L224" class="LineNr">224 </span> <span class="subxComment"># var slice/ecx: slice</span>
@ -288,9 +288,9 @@ if ('onhashchange' in window) {
<span id="L229" class="LineNr">229 </span> <span class="subxComment"># next-word(_test-stream, slice)</span>
<span id="L230" class="LineNr">230 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L231" class="LineNr">231 </span> 51/push-ecx
<span id="L232" class="LineNr">232 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L232" class="LineNr">232 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L233" class="LineNr">233 </span> <span class="subxS2Comment"># . . call</span>
<span id="L234" class="LineNr">234 </span> e8/call <a href='076next-word.subx.html#L10'>next-word</a>/disp32
<span id="L234" class="LineNr">234 </span> e8/call <a href='127next-word.subx.html#L10'>next-word</a>/disp32
<span id="L235" class="LineNr">235 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L236" class="LineNr">236 </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="L237" class="LineNr">237 </span> <span class="subxComment"># check-ints-equal(slice-&gt;end - slice-&gt;start, 0, msg)</span>
@ -302,7 +302,7 @@ if ('onhashchange' in window) {
<span id="L243" class="LineNr">243 </span> 2b/subtract 0/mod/indirect 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># subtract *ecx from eax</span>
<span id="L244" class="LineNr">244 </span> 50/push-eax
<span id="L245" class="LineNr">245 </span> <span class="subxS2Comment"># . . call</span>
<span id="L246" class="LineNr">246 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L246" class="LineNr">246 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L247" class="LineNr">247 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L248" class="LineNr">248 </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="L249" class="LineNr">249 </span> <span class="subxS1Comment"># . epilogue</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 077subx-words.subx</title>
<title>Mu - 128subx-words.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -55,7 +55,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/077subx-words.subx'>https://github.com/akkartik/mu/blob/master/077subx-words.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/128subx-words.subx'>https://github.com/akkartik/mu/blob/master/128subx-words.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Helpers for parsing SubX words, with their rules for hex, labels and metadata.</span>
<span id="L2" class="LineNr"> 2 </span>
@ -64,7 +64,7 @@ if ('onhashchange' in window) {
<span id="L5" class="LineNr"> 5 </span><span class="subxS1Comment"># . op subop mod rm32 base index scale r32</span>
<span id="L6" class="LineNr"> 6 </span><span class="subxS1Comment"># . 1-3 bytes 3 bits 2 bits 3 bits 3 bits 3 bits 2 bits 2 bits 0/1/2/4 bytes 0/1/2/4 bytes</span>
<span id="L7" class="LineNr"> 7 </span>
<span id="L8" class="LineNr"> 8 </span><span class="subxFunction">has-metadata?</span>: <span class="subxComment"># word: (addr slice), s: (addr string) -&gt; eax: boolean</span>
<span id="L8" class="LineNr"> 8 </span><span class="subxFunction">has-metadata?</span>: <span class="subxComment"># word: (addr slice), s: (addr string) -&gt; result/eax: boolean</span>
<span id="L9" class="LineNr"> 9 </span> <span class="subxComment"># pseudocode:</span>
<span id="L10" class="LineNr"> 10 </span> <span class="subxComment"># var twig: &amp;slice = next-token-from-slice(word-&gt;start, word-&gt;end, '/') # skip name</span>
<span id="L11" class="LineNr"> 11 </span> <span class="subxComment"># curr = twig-&gt;end</span>
@ -97,7 +97,7 @@ if ('onhashchange' in window) {
<span id="L38" class="LineNr"> 38 </span> 52/push-edx
<span id="L39" class="LineNr"> 39 </span> ff 6/subop/push 0/mod/indirect 6/rm32/esi <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 *esi</span>
<span id="L40" class="LineNr"> 40 </span> <span class="subxS2Comment"># . . call</span>
<span id="L41" class="LineNr"> 41 </span> e8/call <a href='073next-token.subx.html#L163'>next-token-from-slice</a>/disp32
<span id="L41" class="LineNr"> 41 </span> e8/call <a href='124next-token.subx.html#L163'>next-token-from-slice</a>/disp32
<span id="L42" class="LineNr"> 42 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L43" class="LineNr"> 43 </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> 0x10/imm32 <span class="subxComment"># add to esp</span>
<span id="L44" class="LineNr"> 44 </span><span class="Constant">$has-metadata?:loop</span>:
@ -108,7 +108,7 @@ if ('onhashchange' in window) {
<span id="L49" class="LineNr"> 49 </span> 52/push-edx
<span id="L50" class="LineNr"> 50 </span> ff 6/subop/push 1/mod/*+disp8 7/rm32/edi <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 *(edi+4)</span>
<span id="L51" class="LineNr"> 51 </span> <span class="subxS2Comment"># . . call</span>
<span id="L52" class="LineNr"> 52 </span> e8/call <a href='073next-token.subx.html#L163'>next-token-from-slice</a>/disp32
<span id="L52" class="LineNr"> 52 </span> e8/call <a href='124next-token.subx.html#L163'>next-token-from-slice</a>/disp32
<span id="L53" class="LineNr"> 53 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L54" class="LineNr"> 54 </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> 0x10/imm32 <span class="subxComment"># add to esp</span>
<span id="L55" class="LineNr"> 55 </span> <span class="subxComment"># if (slice-empty?(twig)) return false</span>
@ -116,7 +116,7 @@ if ('onhashchange' in window) {
<span id="L57" class="LineNr"> 57 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L58" class="LineNr"> 58 </span> 57/push-edi
<span id="L59" class="LineNr"> 59 </span> <span class="subxS2Comment"># . . call</span>
<span id="L60" class="LineNr"> 60 </span> e8/call <a href='072slice.subx.html#L9'>slice-empty?</a>/disp32
<span id="L60" class="LineNr"> 60 </span> e8/call <a href='123slice.subx.html#L9'>slice-empty?</a>/disp32
<span id="L61" class="LineNr"> 61 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L62" class="LineNr"> 62 </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="L63" class="LineNr"> 63 </span> <span class="subxS1Comment"># . if (eax != false) return false</span>
@ -128,7 +128,7 @@ if ('onhashchange' in window) {
<span id="L69" class="LineNr"> 69 </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="L70" class="LineNr"> 70 </span> 57/push-edi
<span id="L71" class="LineNr"> 71 </span> <span class="subxS2Comment"># . . call</span>
<span id="L72" class="LineNr"> 72 </span> e8/call <a href='072slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L72" class="LineNr"> 72 </span> e8/call <a href='123slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L73" class="LineNr"> 73 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L74" class="LineNr"> 74 </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="L75" class="LineNr"> 75 </span> <span class="subxS1Comment"># . if (eax != false) return true</span>
@ -169,7 +169,7 @@ if ('onhashchange' in window) {
<span id="L110" class="LineNr">110 </span> 68/push <span class="Constant">&quot;imm32&quot;</span>/imm32
<span id="L111" class="LineNr">111 </span> 56/push-esi
<span id="L112" class="LineNr">112 </span> <span class="subxS2Comment"># . . call</span>
<span id="L113" class="LineNr">113 </span> e8/call <a href='077subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L113" class="LineNr">113 </span> e8/call <a href='128subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L114" class="LineNr">114 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L115" class="LineNr">115 </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="L116" class="LineNr">116 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -178,7 +178,7 @@ if ('onhashchange' in window) {
<span id="L119" class="LineNr">119 </span> 68/push 1/imm32/true
<span id="L120" class="LineNr">120 </span> 50/push-eax
<span id="L121" class="LineNr">121 </span> <span class="subxS2Comment"># . . call</span>
<span id="L122" class="LineNr">122 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L122" class="LineNr">122 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L123" class="LineNr">123 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L124" class="LineNr">124 </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="L125" class="LineNr">125 </span> <span class="subxS1Comment"># . epilogue</span>
@ -204,7 +204,7 @@ if ('onhashchange' in window) {
<span id="L145" class="LineNr">145 </span> 68/push <span class="Constant">&quot;d&quot;</span>/imm32
<span id="L146" class="LineNr">146 </span> 56/push-esi
<span id="L147" class="LineNr">147 </span> <span class="subxS2Comment"># . . call</span>
<span id="L148" class="LineNr">148 </span> e8/call <a href='077subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L148" class="LineNr">148 </span> e8/call <a href='128subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L149" class="LineNr">149 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L150" class="LineNr">150 </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="L151" class="LineNr">151 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -213,7 +213,7 @@ if ('onhashchange' in window) {
<span id="L154" class="LineNr">154 </span> 68/push 0/imm32/false
<span id="L155" class="LineNr">155 </span> 50/push-eax
<span id="L156" class="LineNr">156 </span> <span class="subxS2Comment"># . . call</span>
<span id="L157" class="LineNr">157 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L157" class="LineNr">157 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L158" class="LineNr">158 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L159" class="LineNr">159 </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="L160" class="LineNr">160 </span> <span class="subxS1Comment"># . epilogue</span>
@ -239,7 +239,7 @@ if ('onhashchange' in window) {
<span id="L180" class="LineNr">180 </span> 68/push <span class="Constant">&quot;a&quot;</span>/imm32
<span id="L181" class="LineNr">181 </span> 56/push-esi
<span id="L182" class="LineNr">182 </span> <span class="subxS2Comment"># . . call</span>
<span id="L183" class="LineNr">183 </span> e8/call <a href='077subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L183" class="LineNr">183 </span> e8/call <a href='128subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L184" class="LineNr">184 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L185" class="LineNr">185 </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="L186" class="LineNr">186 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -248,7 +248,7 @@ if ('onhashchange' in window) {
<span id="L189" class="LineNr">189 </span> 68/push 0/imm32/false
<span id="L190" class="LineNr">190 </span> 50/push-eax
<span id="L191" class="LineNr">191 </span> <span class="subxS2Comment"># . . call</span>
<span id="L192" class="LineNr">192 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L192" class="LineNr">192 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L193" class="LineNr">193 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L194" class="LineNr">194 </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="L195" class="LineNr">195 </span> <span class="subxS1Comment"># . epilogue</span>
@ -274,7 +274,7 @@ if ('onhashchange' in window) {
<span id="L215" class="LineNr">215 </span> 68/push <span class="Constant">&quot;c&quot;</span>/imm32
<span id="L216" class="LineNr">216 </span> 56/push-esi
<span id="L217" class="LineNr">217 </span> <span class="subxS2Comment"># . . call</span>
<span id="L218" class="LineNr">218 </span> e8/call <a href='077subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L218" class="LineNr">218 </span> e8/call <a href='128subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L219" class="LineNr">219 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L220" class="LineNr">220 </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="L221" class="LineNr">221 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -283,7 +283,7 @@ if ('onhashchange' in window) {
<span id="L224" class="LineNr">224 </span> 68/push 1/imm32/true
<span id="L225" class="LineNr">225 </span> 50/push-eax
<span id="L226" class="LineNr">226 </span> <span class="subxS2Comment"># . . call</span>
<span id="L227" class="LineNr">227 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L227" class="LineNr">227 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L228" class="LineNr">228 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L229" class="LineNr">229 </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="L230" class="LineNr">230 </span> <span class="subxS1Comment"># . epilogue</span>
@ -309,7 +309,7 @@ if ('onhashchange' in window) {
<span id="L250" class="LineNr">250 </span> 68/push <span class="Constant">&quot;d&quot;</span>/imm32
<span id="L251" class="LineNr">251 </span> 56/push-esi
<span id="L252" class="LineNr">252 </span> <span class="subxS2Comment"># . . call</span>
<span id="L253" class="LineNr">253 </span> e8/call <a href='077subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L253" class="LineNr">253 </span> e8/call <a href='128subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L254" class="LineNr">254 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L255" class="LineNr">255 </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="L256" class="LineNr">256 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -318,7 +318,7 @@ if ('onhashchange' in window) {
<span id="L259" class="LineNr">259 </span> 68/push 0/imm32/false
<span id="L260" class="LineNr">260 </span> 50/push-eax
<span id="L261" class="LineNr">261 </span> <span class="subxS2Comment"># . . call</span>
<span id="L262" class="LineNr">262 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L262" class="LineNr">262 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L263" class="LineNr">263 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L264" class="LineNr">264 </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="L265" class="LineNr">265 </span> <span class="subxS1Comment"># . epilogue</span>
@ -334,7 +334,7 @@ if ('onhashchange' in window) {
<span id="L275" class="LineNr">275 </span><span class="subxComment">#: - if it starts with '0x' it's treated as a number. (redundant)</span>
<span id="L276" class="LineNr">276 </span><span class="subxComment">#: - if it's two characters long, it can't be a name. Either it's a hex</span>
<span id="L277" class="LineNr">277 </span><span class="subxComment">#: byte, or it raises an error.</span>
<span id="L278" class="LineNr">278 </span><span class="subxFunction">is-valid-name?</span>: <span class="subxComment"># in: (addr slice) -&gt; eax: boolean</span>
<span id="L278" class="LineNr">278 </span><span class="subxFunction">is-valid-name?</span>: <span class="subxComment"># in: (addr slice) -&gt; result/eax: boolean</span>
<span id="L279" class="LineNr">279 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L280" class="LineNr">280 </span> 55/push-ebp
<span id="L281" class="LineNr">281 </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>
@ -404,7 +404,7 @@ if ('onhashchange' in window) {
<span id="L345" class="LineNr">345 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L346" class="LineNr">346 </span> 51/push-ecx
<span id="L347" class="LineNr">347 </span> <span class="subxS2Comment"># . . call</span>
<span id="L348" class="LineNr">348 </span> e8/call <a href='077subx-words.subx.html#L278'>is-valid-name?</a>/disp32
<span id="L348" class="LineNr">348 </span> e8/call <a href='128subx-words.subx.html#L278'>is-valid-name?</a>/disp32
<span id="L349" class="LineNr">349 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L350" class="LineNr">350 </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="L351" class="LineNr">351 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -413,7 +413,7 @@ if ('onhashchange' in window) {
<span id="L354" class="LineNr">354 </span> 68/push 0/imm32/false
<span id="L355" class="LineNr">355 </span> 50/push-eax
<span id="L356" class="LineNr">356 </span> <span class="subxS2Comment"># . . call</span>
<span id="L357" class="LineNr">357 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L357" class="LineNr">357 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L358" class="LineNr">358 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L359" class="LineNr">359 </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="L360" class="LineNr">360 </span> <span class="subxS1Comment"># . epilogue</span>
@ -438,7 +438,7 @@ if ('onhashchange' in window) {
<span id="L379" class="LineNr">379 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L380" class="LineNr">380 </span> 51/push-ecx
<span id="L381" class="LineNr">381 </span> <span class="subxS2Comment"># . . call</span>
<span id="L382" class="LineNr">382 </span> e8/call <a href='077subx-words.subx.html#L278'>is-valid-name?</a>/disp32
<span id="L382" class="LineNr">382 </span> e8/call <a href='128subx-words.subx.html#L278'>is-valid-name?</a>/disp32
<span id="L383" class="LineNr">383 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L384" class="LineNr">384 </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="L385" class="LineNr">385 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -447,7 +447,7 @@ if ('onhashchange' in window) {
<span id="L388" class="LineNr">388 </span> 68/push 0/imm32/false
<span id="L389" class="LineNr">389 </span> 50/push-eax
<span id="L390" class="LineNr">390 </span> <span class="subxS2Comment"># . . call</span>
<span id="L391" class="LineNr">391 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L391" class="LineNr">391 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L392" class="LineNr">392 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L393" class="LineNr">393 </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="L394" class="LineNr">394 </span> <span class="subxS1Comment"># . epilogue</span>
@ -472,7 +472,7 @@ if ('onhashchange' in window) {
<span id="L413" class="LineNr">413 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L414" class="LineNr">414 </span> 51/push-ecx
<span id="L415" class="LineNr">415 </span> <span class="subxS2Comment"># . . call</span>
<span id="L416" class="LineNr">416 </span> e8/call <a href='077subx-words.subx.html#L278'>is-valid-name?</a>/disp32
<span id="L416" class="LineNr">416 </span> e8/call <a href='128subx-words.subx.html#L278'>is-valid-name?</a>/disp32
<span id="L417" class="LineNr">417 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L418" class="LineNr">418 </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="L419" class="LineNr">419 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -481,7 +481,7 @@ if ('onhashchange' in window) {
<span id="L422" class="LineNr">422 </span> 68/push 0/imm32/false
<span id="L423" class="LineNr">423 </span> 50/push-eax
<span id="L424" class="LineNr">424 </span> <span class="subxS2Comment"># . . call</span>
<span id="L425" class="LineNr">425 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L425" class="LineNr">425 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L426" class="LineNr">426 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L427" class="LineNr">427 </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="L428" class="LineNr">428 </span> <span class="subxS1Comment"># . epilogue</span>
@ -506,7 +506,7 @@ if ('onhashchange' in window) {
<span id="L447" class="LineNr">447 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L448" class="LineNr">448 </span> 51/push-ecx
<span id="L449" class="LineNr">449 </span> <span class="subxS2Comment"># . . call</span>
<span id="L450" class="LineNr">450 </span> e8/call <a href='077subx-words.subx.html#L278'>is-valid-name?</a>/disp32
<span id="L450" class="LineNr">450 </span> e8/call <a href='128subx-words.subx.html#L278'>is-valid-name?</a>/disp32
<span id="L451" class="LineNr">451 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L452" class="LineNr">452 </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="L453" class="LineNr">453 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -515,7 +515,7 @@ if ('onhashchange' in window) {
<span id="L456" class="LineNr">456 </span> 68/push 1/imm32/true
<span id="L457" class="LineNr">457 </span> 50/push-eax
<span id="L458" class="LineNr">458 </span> <span class="subxS2Comment"># . . call</span>
<span id="L459" class="LineNr">459 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L459" class="LineNr">459 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L460" class="LineNr">460 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L461" class="LineNr">461 </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="L462" class="LineNr">462 </span> <span class="subxS1Comment"># . epilogue</span>
@ -540,7 +540,7 @@ if ('onhashchange' in window) {
<span id="L481" class="LineNr">481 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L482" class="LineNr">482 </span> 51/push-ecx
<span id="L483" class="LineNr">483 </span> <span class="subxS2Comment"># . . call</span>
<span id="L484" class="LineNr">484 </span> e8/call <a href='077subx-words.subx.html#L278'>is-valid-name?</a>/disp32
<span id="L484" class="LineNr">484 </span> e8/call <a href='128subx-words.subx.html#L278'>is-valid-name?</a>/disp32
<span id="L485" class="LineNr">485 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L486" class="LineNr">486 </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="L487" class="LineNr">487 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
@ -549,7 +549,7 @@ if ('onhashchange' in window) {
<span id="L490" class="LineNr">490 </span> 68/push 1/imm32/true
<span id="L491" class="LineNr">491 </span> 50/push-eax
<span id="L492" class="LineNr">492 </span> <span class="subxS2Comment"># . . call</span>
<span id="L493" class="LineNr">493 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L493" class="LineNr">493 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L494" class="LineNr">494 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L495" class="LineNr">495 </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="L496" class="LineNr">496 </span> <span class="subxS1Comment"># . epilogue</span>
@ -574,7 +574,7 @@ if ('onhashchange' in window) {
<span id="L515" class="LineNr">515 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L516" class="LineNr">516 </span> 51/push-ecx
<span id="L517" class="LineNr">517 </span> <span class="subxS2Comment"># . . call</span>
<span id="L518" class="LineNr">518 </span> e8/call <a href='077subx-words.subx.html#L278'>is-valid-name?</a>/disp32
<span id="L518" class="LineNr">518 </span> e8/call <a href='128subx-words.subx.html#L278'>is-valid-name?</a>/disp32
<span id="L519" class="LineNr">519 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L520" class="LineNr">520 </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="L521" class="LineNr">521 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
@ -583,7 +583,7 @@ if ('onhashchange' in window) {
<span id="L524" class="LineNr">524 </span> 68/push 0/imm32/false
<span id="L525" class="LineNr">525 </span> 50/push-eax
<span id="L526" class="LineNr">526 </span> <span class="subxS2Comment"># . . call</span>
<span id="L527" class="LineNr">527 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L527" class="LineNr">527 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L528" class="LineNr">528 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L529" class="LineNr">529 </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="L530" class="LineNr">530 </span> <span class="subxS1Comment"># . epilogue</span>
@ -591,7 +591,7 @@ if ('onhashchange' in window) {
<span id="L532" class="LineNr">532 </span> 5d/pop-to-ebp
<span id="L533" class="LineNr">533 </span> c3/return
<span id="L534" class="LineNr">534 </span>
<span id="L535" class="LineNr">535 </span><span class="subxFunction">is-label?</span>: <span class="subxComment"># word: (addr slice) -&gt; eax: boolean</span>
<span id="L535" class="LineNr">535 </span><span class="subxFunction">is-label?</span>: <span class="subxComment"># word: (addr slice) -&gt; result/eax: boolean</span>
<span id="L536" class="LineNr">536 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L537" class="LineNr">537 </span> 55/push-ebp
<span id="L538" class="LineNr">538 </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>
@ -636,16 +636,16 @@ if ('onhashchange' in window) {
<span id="L577" class="LineNr">577 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L578" class="LineNr">578 </span> 51/push-ecx
<span id="L579" class="LineNr">579 </span> <span class="subxS2Comment"># . . call</span>
<span id="L580" class="LineNr">580 </span> e8/call <a href='077subx-words.subx.html#L535'>is-label?</a>/disp32
<span id="L580" class="LineNr">580 </span> e8/call <a href='128subx-words.subx.html#L535'>is-label?</a>/disp32
<span id="L581" class="LineNr">581 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L582" class="LineNr">582 </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="L583" class="LineNr">583 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
<span id="L584" class="LineNr">584 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L585" class="LineNr">585 </span> 68/push <span class="Constant">&quot;F - <a href='077subx-words.subx.html#L562'>test-is-label?</a>:true&quot;</span>/imm32
<span id="L585" class="LineNr">585 </span> 68/push <span class="Constant">&quot;F - <a href='128subx-words.subx.html#L562'>test-is-label?</a>:true&quot;</span>/imm32
<span id="L586" class="LineNr">586 </span> 68/push 1/imm32
<span id="L587" class="LineNr">587 </span> 50/push-eax
<span id="L588" class="LineNr">588 </span> <span class="subxS2Comment"># . . call</span>
<span id="L589" class="LineNr">589 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L589" class="LineNr">589 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L590" class="LineNr">590 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L591" class="LineNr">591 </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="L592" class="LineNr">592 </span><span class="Constant">$test-is-label?:false</span>:
@ -662,16 +662,16 @@ if ('onhashchange' in window) {
<span id="L603" class="LineNr">603 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L604" class="LineNr">604 </span> 51/push-ecx
<span id="L605" class="LineNr">605 </span> <span class="subxS2Comment"># . . call</span>
<span id="L606" class="LineNr">606 </span> e8/call <a href='077subx-words.subx.html#L535'>is-label?</a>/disp32
<span id="L606" class="LineNr">606 </span> e8/call <a href='128subx-words.subx.html#L535'>is-label?</a>/disp32
<span id="L607" class="LineNr">607 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L608" class="LineNr">608 </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="L609" class="LineNr">609 </span> <span class="subxComment"># check-ints-equal(eax, 0, msg)</span>
<span id="L610" class="LineNr">610 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L611" class="LineNr">611 </span> 68/push <span class="Constant">&quot;F - <a href='077subx-words.subx.html#L562'>test-is-label?</a>:false&quot;</span>/imm32
<span id="L611" class="LineNr">611 </span> 68/push <span class="Constant">&quot;F - <a href='128subx-words.subx.html#L562'>test-is-label?</a>:false&quot;</span>/imm32
<span id="L612" class="LineNr">612 </span> 68/push 0/imm32
<span id="L613" class="LineNr">613 </span> 50/push-eax
<span id="L614" class="LineNr">614 </span> <span class="subxS2Comment"># . . call</span>
<span id="L615" class="LineNr">615 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L615" class="LineNr">615 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L616" class="LineNr">616 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L617" class="LineNr">617 </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="L618" class="LineNr">618 </span> <span class="subxS1Comment"># . epilogue</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 078emit-hex.subx</title>
<title>Mu - 129emit-hex.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -55,7 +55,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/078emit-hex.subx'>https://github.com/akkartik/mu/blob/master/078emit-hex.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/129emit-hex.subx'>https://github.com/akkartik/mu/blob/master/129emit-hex.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span>== code
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># instruction effective address register displacement immediate</span>
@ -90,7 +90,7 @@ if ('onhashchange' in window) {
<span id="L31" class="LineNr"> 31 </span> 53/push-ebx
<span id="L32" class="LineNr"> 32 </span> 57/push-edi
<span id="L33" class="LineNr"> 33 </span> <span class="subxS2Comment"># . . call</span>
<span id="L34" class="LineNr"> 34 </span> e8/call <a href='066write-int-hex.subx.html#L93'>write-byte-hex-buffered</a>/disp32
<span id="L34" class="LineNr"> 34 </span> e8/call <a href='117write-int-hex.subx.html#L93'>write-byte-hex-buffered</a>/disp32
<span id="L35" class="LineNr"> 35 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L36" class="LineNr"> 36 </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="L37" class="LineNr"> 37 </span> <span class="subxComment"># write-byte-buffered(out, ' ')</span>
@ -98,7 +98,7 @@ if ('onhashchange' in window) {
<span id="L39" class="LineNr"> 39 </span> 68/push 0x20/imm32/space
<span id="L40" class="LineNr"> 40 </span> 57/push-edi
<span id="L41" class="LineNr"> 41 </span> <span class="subxS2Comment"># . . call</span>
<span id="L42" class="LineNr"> 42 </span> e8/call <a href='064write-byte.subx.html#L33'>write-byte-buffered</a>/disp32
<span id="L42" class="LineNr"> 42 </span> e8/call <a href='115write-byte.subx.html#L33'>write-byte-buffered</a>/disp32
<span id="L43" class="LineNr"> 43 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L44" class="LineNr"> 44 </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="L45" class="LineNr"> 45 </span> <span class="subxComment"># ebx = ebx &gt;&gt; 8</span>
@ -123,32 +123,32 @@ if ('onhashchange' in window) {
<span id="L64" class="LineNr"> 64 </span> <span class="subxComment"># setup</span>
<span id="L65" class="LineNr"> 65 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L66" class="LineNr"> 66 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L67" class="LineNr"> 67 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L67" class="LineNr"> 67 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L68" class="LineNr"> 68 </span> <span class="subxS2Comment"># . . call</span>
<span id="L69" class="LineNr"> 69 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L69" class="LineNr"> 69 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L70" class="LineNr"> 70 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L71" class="LineNr"> 71 </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="L72" class="LineNr"> 72 </span> <span class="subxS1Comment"># . clear-stream($_test-output-buffered-file-&gt;buffer)</span>
<span id="L73" class="LineNr"> 73 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L74" class="LineNr"> 74 </span> 68/push $_test-output-buffered-file-&gt;buffer/imm32
<span id="L75" class="LineNr"> 75 </span> <span class="subxS2Comment"># . . call</span>
<span id="L76" class="LineNr"> 76 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L76" class="LineNr"> 76 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L77" class="LineNr"> 77 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L78" class="LineNr"> 78 </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="L79" class="LineNr"> 79 </span> <span class="subxComment"># emit-hex(_test-output-buffered-file, 0xab, 1)</span>
<span id="L80" class="LineNr"> 80 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L81" class="LineNr"> 81 </span> 68/push 1/imm32
<span id="L82" class="LineNr"> 82 </span> 68/push 0xab/imm32
<span id="L83" class="LineNr"> 83 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L83" class="LineNr"> 83 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L84" class="LineNr"> 84 </span> <span class="subxS2Comment"># . . call</span>
<span id="L85" class="LineNr"> 85 </span> e8/call <a href='078emit-hex.subx.html#L7'>emit-hex</a>/disp32
<span id="L85" class="LineNr"> 85 </span> e8/call <a href='129emit-hex.subx.html#L7'>emit-hex</a>/disp32
<span id="L86" class="LineNr"> 86 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L87" class="LineNr"> 87 </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="L88" class="LineNr"> 88 </span> <span class="subxComment"># flush(_test-output-buffered-file)</span>
<span id="L89" class="LineNr"> 89 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L90" class="LineNr"> 90 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L90" class="LineNr"> 90 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L91" class="LineNr"> 91 </span> <span class="subxS2Comment"># . . call</span>
<span id="L92" class="LineNr"> 92 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L92" class="LineNr"> 92 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L93" class="LineNr"> 93 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L94" class="LineNr"> 94 </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="L95" class="LineNr"> 95 </span> <span class="subxComment"># check-ints-equal(*_test-output-stream-&gt;data, 'ab ', msg)</span>
@ -156,10 +156,10 @@ if ('onhashchange' in window) {
<span id="L97" class="LineNr"> 97 </span> 68/push <span class="Constant">&quot;F - test-emit-hex-single-byte&quot;</span>/imm32
<span id="L98" class="LineNr"> 98 </span> 68/push 0x206261/imm32
<span id="L99" class="LineNr"> 99 </span> <span class="subxS2Comment"># . . push *_test-output-stream-&gt;data</span>
<span id="L100" class="LineNr">100 </span> b8/copy-to-eax <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L100" class="LineNr">100 </span> b8/copy-to-eax <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L101" class="LineNr">101 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+12)</span>
<span id="L102" class="LineNr">102 </span> <span class="subxS2Comment"># . . call</span>
<span id="L103" class="LineNr">103 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L103" class="LineNr">103 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L104" class="LineNr">104 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L105" class="LineNr">105 </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="L106" class="LineNr">106 </span> <span class="subxS1Comment"># . end</span>
@ -169,41 +169,41 @@ if ('onhashchange' in window) {
<span id="L110" class="LineNr">110 </span> <span class="subxComment"># setup</span>
<span id="L111" class="LineNr">111 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L112" class="LineNr">112 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L113" class="LineNr">113 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L113" class="LineNr">113 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L114" class="LineNr">114 </span> <span class="subxS2Comment"># . . call</span>
<span id="L115" class="LineNr">115 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L115" class="LineNr">115 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L116" class="LineNr">116 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L117" class="LineNr">117 </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="L118" class="LineNr">118 </span> <span class="subxS1Comment"># . clear-stream($_test-output-buffered-file-&gt;buffer)</span>
<span id="L119" class="LineNr">119 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L120" class="LineNr">120 </span> 68/push $_test-output-buffered-file-&gt;buffer/imm32
<span id="L121" class="LineNr">121 </span> <span class="subxS2Comment"># . . call</span>
<span id="L122" class="LineNr">122 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L122" class="LineNr">122 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L123" class="LineNr">123 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L124" class="LineNr">124 </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="L125" class="LineNr">125 </span> <span class="subxComment"># emit-hex(_test-output-buffered-file, 0x1234, 2)</span>
<span id="L126" class="LineNr">126 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L127" class="LineNr">127 </span> 68/push 2/imm32
<span id="L128" class="LineNr">128 </span> 68/push 0x1234/imm32
<span id="L129" class="LineNr">129 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L129" class="LineNr">129 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L130" class="LineNr">130 </span> <span class="subxS2Comment"># . . call</span>
<span id="L131" class="LineNr">131 </span> e8/call <a href='078emit-hex.subx.html#L7'>emit-hex</a>/disp32
<span id="L131" class="LineNr">131 </span> e8/call <a href='129emit-hex.subx.html#L7'>emit-hex</a>/disp32
<span id="L132" class="LineNr">132 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L133" class="LineNr">133 </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="L134" class="LineNr">134 </span> <span class="subxComment"># flush(_test-output-buffered-file)</span>
<span id="L135" class="LineNr">135 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L136" class="LineNr">136 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L136" class="LineNr">136 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L137" class="LineNr">137 </span> <span class="subxS2Comment"># . . call</span>
<span id="L138" class="LineNr">138 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L138" class="LineNr">138 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L139" class="LineNr">139 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L140" class="LineNr">140 </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="L141" class="LineNr">141 </span> <span class="subxComment"># check-stream-equal(_test-output-stream, &quot;34 12 &quot;, msg)</span>
<span id="L142" class="LineNr">142 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L143" class="LineNr">143 </span> 68/push <span class="Constant">&quot;F - <a href='078emit-hex.subx.html#L109'>test-emit-hex-multiple-byte</a>/1&quot;</span>/imm32
<span id="L143" class="LineNr">143 </span> 68/push <span class="Constant">&quot;F - <a href='129emit-hex.subx.html#L109'>test-emit-hex-multiple-byte</a>/1&quot;</span>/imm32
<span id="L144" class="LineNr">144 </span> 68/push <span class="Constant">&quot;34 12 &quot;</span>/imm32
<span id="L145" class="LineNr">145 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L145" class="LineNr">145 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L146" class="LineNr">146 </span> <span class="subxS2Comment"># . . call</span>
<span id="L147" class="LineNr">147 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L147" class="LineNr">147 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L148" class="LineNr">148 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L149" class="LineNr">149 </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="L150" class="LineNr">150 </span> <span class="subxS1Comment"># . end</span>
@ -213,41 +213,41 @@ if ('onhashchange' in window) {
<span id="L154" class="LineNr">154 </span> <span class="subxComment"># setup</span>
<span id="L155" class="LineNr">155 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L156" class="LineNr">156 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L157" class="LineNr">157 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L157" class="LineNr">157 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L158" class="LineNr">158 </span> <span class="subxS2Comment"># . . call</span>
<span id="L159" class="LineNr">159 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L159" class="LineNr">159 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L160" class="LineNr">160 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L161" class="LineNr">161 </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="L162" class="LineNr">162 </span> <span class="subxS1Comment"># . clear-stream($_test-output-buffered-file-&gt;buffer)</span>
<span id="L163" class="LineNr">163 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L164" class="LineNr">164 </span> 68/push $_test-output-buffered-file-&gt;buffer/imm32
<span id="L165" class="LineNr">165 </span> <span class="subxS2Comment"># . . call</span>
<span id="L166" class="LineNr">166 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L166" class="LineNr">166 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L167" class="LineNr">167 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L168" class="LineNr">168 </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="L169" class="LineNr">169 </span> <span class="subxComment"># emit-hex(_test-output-buffered-file, 0xab, 2)</span>
<span id="L170" class="LineNr">170 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L171" class="LineNr">171 </span> 68/push 2/imm32
<span id="L172" class="LineNr">172 </span> 68/push 0xab/imm32
<span id="L173" class="LineNr">173 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L173" class="LineNr">173 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L174" class="LineNr">174 </span> <span class="subxS2Comment"># . . call</span>
<span id="L175" class="LineNr">175 </span> e8/call <a href='078emit-hex.subx.html#L7'>emit-hex</a>/disp32
<span id="L175" class="LineNr">175 </span> e8/call <a href='129emit-hex.subx.html#L7'>emit-hex</a>/disp32
<span id="L176" class="LineNr">176 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L177" class="LineNr">177 </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="L178" class="LineNr">178 </span> <span class="subxComment"># flush(_test-output-buffered-file)</span>
<span id="L179" class="LineNr">179 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L180" class="LineNr">180 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L180" class="LineNr">180 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L181" class="LineNr">181 </span> <span class="subxS2Comment"># . . call</span>
<span id="L182" class="LineNr">182 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L182" class="LineNr">182 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L183" class="LineNr">183 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L184" class="LineNr">184 </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="L185" class="LineNr">185 </span> <span class="subxComment"># check(_test-output-stream-&gt;data == 'ab 00 ')</span>
<span id="L186" class="LineNr">186 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L187" class="LineNr">187 </span> 68/push <span class="Constant">&quot;F - <a href='078emit-hex.subx.html#L153'>test-emit-hex-zero-pad</a>/1&quot;</span>/imm32
<span id="L187" class="LineNr">187 </span> 68/push <span class="Constant">&quot;F - <a href='129emit-hex.subx.html#L153'>test-emit-hex-zero-pad</a>/1&quot;</span>/imm32
<span id="L188" class="LineNr">188 </span> 68/push <span class="Constant">&quot;ab 00 &quot;</span>/imm32
<span id="L189" class="LineNr">189 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L189" class="LineNr">189 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L190" class="LineNr">190 </span> <span class="subxS2Comment"># . . call</span>
<span id="L191" class="LineNr">191 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L191" class="LineNr">191 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L192" class="LineNr">192 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L193" class="LineNr">193 </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="L194" class="LineNr">194 </span> <span class="subxS1Comment"># . end</span>
@ -257,41 +257,41 @@ if ('onhashchange' in window) {
<span id="L198" class="LineNr">198 </span> <span class="subxComment"># setup</span>
<span id="L199" class="LineNr">199 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L200" class="LineNr">200 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L201" class="LineNr">201 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L201" class="LineNr">201 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L202" class="LineNr">202 </span> <span class="subxS2Comment"># . . call</span>
<span id="L203" class="LineNr">203 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L203" class="LineNr">203 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L204" class="LineNr">204 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L205" class="LineNr">205 </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="L206" class="LineNr">206 </span> <span class="subxS1Comment"># . clear-stream($_test-output-buffered-file-&gt;buffer)</span>
<span id="L207" class="LineNr">207 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L208" class="LineNr">208 </span> 68/push $_test-output-buffered-file-&gt;buffer/imm32
<span id="L209" class="LineNr">209 </span> <span class="subxS2Comment"># . . call</span>
<span id="L210" class="LineNr">210 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L210" class="LineNr">210 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L211" class="LineNr">211 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L212" class="LineNr">212 </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="L213" class="LineNr">213 </span> <span class="subxComment"># emit-hex(_test-output-buffered-file, -1, 2)</span>
<span id="L214" class="LineNr">214 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L215" class="LineNr">215 </span> 68/push 2/imm32
<span id="L216" class="LineNr">216 </span> 68/push -1/imm32
<span id="L217" class="LineNr">217 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L217" class="LineNr">217 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L218" class="LineNr">218 </span> <span class="subxS2Comment"># . . call</span>
<span id="L219" class="LineNr">219 </span> e8/call <a href='078emit-hex.subx.html#L7'>emit-hex</a>/disp32
<span id="L219" class="LineNr">219 </span> e8/call <a href='129emit-hex.subx.html#L7'>emit-hex</a>/disp32
<span id="L220" class="LineNr">220 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L221" class="LineNr">221 </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="L222" class="LineNr">222 </span> <span class="subxComment"># flush(_test-output-buffered-file)</span>
<span id="L223" class="LineNr">223 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L224" class="LineNr">224 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L224" class="LineNr">224 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L225" class="LineNr">225 </span> <span class="subxS2Comment"># . . call</span>
<span id="L226" class="LineNr">226 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L226" class="LineNr">226 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L227" class="LineNr">227 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L228" class="LineNr">228 </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="L229" class="LineNr">229 </span> <span class="subxComment"># check-stream-equal(_test-output-stream == &quot;ff ff &quot;)</span>
<span id="L230" class="LineNr">230 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L231" class="LineNr">231 </span> 68/push <span class="Constant">&quot;F - <a href='078emit-hex.subx.html#L197'>test-emit-hex-negative</a>/1&quot;</span>/imm32
<span id="L231" class="LineNr">231 </span> 68/push <span class="Constant">&quot;F - <a href='129emit-hex.subx.html#L197'>test-emit-hex-negative</a>/1&quot;</span>/imm32
<span id="L232" class="LineNr">232 </span> 68/push <span class="Constant">&quot;ff ff &quot;</span>/imm32
<span id="L233" class="LineNr">233 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L233" class="LineNr">233 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L234" class="LineNr">234 </span> <span class="subxS2Comment"># . . call</span>
<span id="L235" class="LineNr">235 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L235" class="LineNr">235 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L236" class="LineNr">236 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L237" class="LineNr">237 </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="L238" class="LineNr">238 </span> <span class="subxS1Comment"># . end</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 079emit.subx</title>
<title>Mu - 130emit.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -57,7 +57,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/079emit.subx'>https://github.com/akkartik/mu/blob/master/079emit.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/130emit.subx'>https://github.com/akkartik/mu/blob/master/130emit.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span>== code
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># instruction effective address register displacement immediate</span>
@ -89,7 +89,7 @@ if ('onhashchange' in window) {
<span id="L28" class="LineNr"> 28 </span> ff 6/subop/push 1/mod/*+disp8 6/rm32/esi <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 *(esi+4)</span>
<span id="L29" class="LineNr"> 29 </span> ff 6/subop/push 0/mod/indirect 6/rm32/esi <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 *esi</span>
<span id="L30" class="LineNr"> 30 </span> <span class="subxS2Comment"># . . call</span>
<span id="L31" class="LineNr"> 31 </span> e8/call <a href='073next-token.subx.html#L163'>next-token-from-slice</a>/disp32
<span id="L31" class="LineNr"> 31 </span> e8/call <a href='124next-token.subx.html#L163'>next-token-from-slice</a>/disp32
<span id="L32" class="LineNr"> 32 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L33" class="LineNr"> 33 </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> 0x10/imm32 <span class="subxComment"># add to esp</span>
<span id="L34" class="LineNr"> 34 </span> <span class="subxComment"># if (is-valid-name?(datum)) write-slice-buffered(out, word) and return</span>
@ -97,7 +97,7 @@ if ('onhashchange' in window) {
<span id="L36" class="LineNr"> 36 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L37" class="LineNr"> 37 </span> 57/push-edi
<span id="L38" class="LineNr"> 38 </span> <span class="subxS2Comment"># . . call</span>
<span id="L39" class="LineNr"> 39 </span> e8/call <a href='077subx-words.subx.html#L278'>is-valid-name?</a>/disp32
<span id="L39" class="LineNr"> 39 </span> e8/call <a href='128subx-words.subx.html#L278'>is-valid-name?</a>/disp32
<span id="L40" class="LineNr"> 40 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L41" class="LineNr"> 41 </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="L42" class="LineNr"> 42 </span> <span class="subxS1Comment"># . if (eax != false)</span>
@ -109,15 +109,15 @@ if ('onhashchange' in window) {
<span id="L48" class="LineNr"> 48 </span> 56/push-esi
<span id="L49" class="LineNr"> 49 </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="L50" class="LineNr"> 50 </span> <span class="subxS2Comment"># . . call</span>
<span id="L51" class="LineNr"> 51 </span> e8/call <a href='072slice.subx.html#L908'>write-slice-buffered</a>/disp32
<span id="L51" class="LineNr"> 51 </span> e8/call <a href='123slice.subx.html#L908'>write-slice-buffered</a>/disp32
<span id="L52" class="LineNr"> 52 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L53" class="LineNr"> 53 </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="L54" class="LineNr"> 54 </span> <span class="subxS1Comment"># . write-buffered(out, &quot; &quot;)</span>
<span id="L55" class="LineNr"> 55 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L56" class="LineNr"> 56 </span> 68/push <span class="SpecialChar"><a href='051test.subx.html#L93'>Space</a></span>/imm32
<span id="L56" class="LineNr"> 56 </span> 68/push <span class="SpecialChar"><a href='102test.subx.html#L93'>Space</a></span>/imm32
<span id="L57" class="LineNr"> 57 </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="L58" class="LineNr"> 58 </span> <span class="subxS2Comment"># . . call</span>
<span id="L59" class="LineNr"> 59 </span> e8/call <a href='065write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L59" class="LineNr"> 59 </span> e8/call <a href='116write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L60" class="LineNr"> 60 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L61" class="LineNr"> 61 </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="L62" class="LineNr"> 62 </span> <span class="subxS1Comment"># . return</span>
@ -133,7 +133,7 @@ if ('onhashchange' in window) {
<span id="L72" class="LineNr"> 72 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L73" class="LineNr"> 73 </span> 57/push-edi
<span id="L74" class="LineNr"> 74 </span> <span class="subxS2Comment"># . . call</span>
<span id="L75" class="LineNr"> 75 </span> e8/call <a href='067parse-hex.subx.html#L387'>parse-hex-int-from-slice</a>/disp32
<span id="L75" class="LineNr"> 75 </span> e8/call <a href='118parse-hex.subx.html#L387'>parse-hex-int-from-slice</a>/disp32
<span id="L76" class="LineNr"> 76 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L77" class="LineNr"> 77 </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="L78" class="LineNr"> 78 </span> <span class="subxS1Comment"># . emit-hex(out, value, width)</span>
@ -142,7 +142,7 @@ if ('onhashchange' in window) {
<span id="L81" class="LineNr"> 81 </span> 50/push-eax
<span id="L82" class="LineNr"> 82 </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="L83" class="LineNr"> 83 </span> <span class="subxS2Comment"># . . call</span>
<span id="L84" class="LineNr"> 84 </span> e8/call <a href='078emit-hex.subx.html#L7'>emit-hex</a>/disp32
<span id="L84" class="LineNr"> 84 </span> e8/call <a href='129emit-hex.subx.html#L7'>emit-hex</a>/disp32
<span id="L85" class="LineNr"> 85 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L86" class="LineNr"> 86 </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="L87" class="LineNr"> 87 </span><span class="Constant">$emit:end</span>:
@ -164,16 +164,16 @@ if ('onhashchange' in window) {
<span id="L103" class="LineNr">103 </span> <span class="subxComment"># setup</span>
<span id="L104" class="LineNr">104 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L105" class="LineNr">105 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L106" class="LineNr">106 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L106" class="LineNr">106 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L107" class="LineNr">107 </span> <span class="subxS2Comment"># . . call</span>
<span id="L108" class="LineNr">108 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L108" class="LineNr">108 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L109" class="LineNr">109 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L110" class="LineNr">110 </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="L111" class="LineNr">111 </span> <span class="subxS1Comment"># . clear-stream($_test-output-buffered-file-&gt;buffer)</span>
<span id="L112" class="LineNr">112 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L113" class="LineNr">113 </span> 68/push $_test-output-buffered-file-&gt;buffer/imm32
<span id="L114" class="LineNr">114 </span> <span class="subxS2Comment"># . . call</span>
<span id="L115" class="LineNr">115 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L115" class="LineNr">115 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L116" class="LineNr">116 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L117" class="LineNr">117 </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="L118" class="LineNr">118 </span> <span class="subxComment"># (eax..ecx) = &quot;30&quot;</span>
@ -189,25 +189,25 @@ if ('onhashchange' in window) {
<span id="L128" class="LineNr">128 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L129" class="LineNr">129 </span> 68/push 1/imm32
<span id="L130" class="LineNr">130 </span> 51/push-ecx
<span id="L131" class="LineNr">131 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L131" class="LineNr">131 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L132" class="LineNr">132 </span> <span class="subxS2Comment"># . . call</span>
<span id="L133" class="LineNr">133 </span> e8/call <a href='079emit.subx.html#L10'>emit</a>/disp32
<span id="L133" class="LineNr">133 </span> e8/call <a href='130emit.subx.html#L10'>emit</a>/disp32
<span id="L134" class="LineNr">134 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L135" class="LineNr">135 </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="L136" class="LineNr">136 </span> <span class="subxComment"># flush(_test-output-buffered-file)</span>
<span id="L137" class="LineNr">137 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L138" class="LineNr">138 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L138" class="LineNr">138 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L139" class="LineNr">139 </span> <span class="subxS2Comment"># . . call</span>
<span id="L140" class="LineNr">140 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L140" class="LineNr">140 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L141" class="LineNr">141 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L142" class="LineNr">142 </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="L143" class="LineNr">143 </span> <span class="subxComment"># check-stream-equal(_test-output-stream, &quot;30 &quot;, msg)</span>
<span id="L144" class="LineNr">144 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L145" class="LineNr">145 </span> 68/push <span class="Constant">&quot;F - <a href='079emit.subx.html#L99'>test-emit-number</a>/1&quot;</span>/imm32
<span id="L145" class="LineNr">145 </span> 68/push <span class="Constant">&quot;F - <a href='130emit.subx.html#L99'>test-emit-number</a>/1&quot;</span>/imm32
<span id="L146" class="LineNr">146 </span> 68/push <span class="Constant">&quot;30 &quot;</span>/imm32
<span id="L147" class="LineNr">147 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L147" class="LineNr">147 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L148" class="LineNr">148 </span> <span class="subxS2Comment"># . . call</span>
<span id="L149" class="LineNr">149 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L149" class="LineNr">149 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L150" class="LineNr">150 </span> <span class="subxS2Comment"># . . discard args</span>
<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="subxS1Comment"># . epilogue</span>
@ -223,16 +223,16 @@ if ('onhashchange' in window) {
<span id="L162" class="LineNr">162 </span> <span class="subxComment"># setup</span>
<span id="L163" class="LineNr">163 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L164" class="LineNr">164 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L165" class="LineNr">165 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L165" class="LineNr">165 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L166" class="LineNr">166 </span> <span class="subxS2Comment"># . . call</span>
<span id="L167" class="LineNr">167 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L167" class="LineNr">167 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L168" class="LineNr">168 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L169" class="LineNr">169 </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="L170" class="LineNr">170 </span> <span class="subxS1Comment"># . clear-stream($_test-output-buffered-file-&gt;buffer)</span>
<span id="L171" class="LineNr">171 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L172" class="LineNr">172 </span> 68/push $_test-output-buffered-file-&gt;buffer/imm32
<span id="L173" class="LineNr">173 </span> <span class="subxS2Comment"># . . call</span>
<span id="L174" class="LineNr">174 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L174" class="LineNr">174 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L175" class="LineNr">175 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L176" class="LineNr">176 </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="L177" class="LineNr">177 </span> <span class="subxComment"># (eax..ecx) = &quot;-2&quot;</span>
@ -248,25 +248,25 @@ if ('onhashchange' in window) {
<span id="L187" class="LineNr">187 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L188" class="LineNr">188 </span> 68/push 2/imm32
<span id="L189" class="LineNr">189 </span> 51/push-ecx
<span id="L190" class="LineNr">190 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L190" class="LineNr">190 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L191" class="LineNr">191 </span> <span class="subxS2Comment"># . . call</span>
<span id="L192" class="LineNr">192 </span> e8/call <a href='079emit.subx.html#L10'>emit</a>/disp32
<span id="L192" class="LineNr">192 </span> e8/call <a href='130emit.subx.html#L10'>emit</a>/disp32
<span id="L193" class="LineNr">193 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L194" class="LineNr">194 </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="L195" class="LineNr">195 </span> <span class="subxComment"># flush(_test-output-buffered-file)</span>
<span id="L196" class="LineNr">196 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L197" class="LineNr">197 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L197" class="LineNr">197 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L198" class="LineNr">198 </span> <span class="subxS2Comment"># . . call</span>
<span id="L199" class="LineNr">199 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L199" class="LineNr">199 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L200" class="LineNr">200 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L201" class="LineNr">201 </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="L202" class="LineNr">202 </span> <span class="subxComment"># check-stream-equal(_test-output-stream, &quot;fe ff &quot;, msg)</span>
<span id="L203" class="LineNr">203 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L204" class="LineNr">204 </span> 68/push <span class="Constant">&quot;F - <a href='079emit.subx.html#L99'>test-emit-number</a>/1&quot;</span>/imm32
<span id="L204" class="LineNr">204 </span> 68/push <span class="Constant">&quot;F - <a href='130emit.subx.html#L99'>test-emit-number</a>/1&quot;</span>/imm32
<span id="L205" class="LineNr">205 </span> 68/push <span class="Constant">&quot;fe ff &quot;</span>/imm32
<span id="L206" class="LineNr">206 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L206" class="LineNr">206 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L207" class="LineNr">207 </span> <span class="subxS2Comment"># . . call</span>
<span id="L208" class="LineNr">208 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L208" class="LineNr">208 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L209" class="LineNr">209 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L210" class="LineNr">210 </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="L211" class="LineNr">211 </span> <span class="subxS1Comment"># . epilogue</span>
@ -281,16 +281,16 @@ if ('onhashchange' in window) {
<span id="L220" class="LineNr">220 </span> <span class="subxComment"># setup</span>
<span id="L221" class="LineNr">221 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L222" class="LineNr">222 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L223" class="LineNr">223 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L223" class="LineNr">223 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L224" class="LineNr">224 </span> <span class="subxS2Comment"># . . call</span>
<span id="L225" class="LineNr">225 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L225" class="LineNr">225 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L226" class="LineNr">226 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L227" class="LineNr">227 </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="L228" class="LineNr">228 </span> <span class="subxS1Comment"># . clear-stream($_test-output-buffered-file-&gt;buffer)</span>
<span id="L229" class="LineNr">229 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L230" class="LineNr">230 </span> 68/push $_test-output-buffered-file-&gt;buffer/imm32
<span id="L231" class="LineNr">231 </span> <span class="subxS2Comment"># . . call</span>
<span id="L232" class="LineNr">232 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L232" class="LineNr">232 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L233" class="LineNr">233 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L234" class="LineNr">234 </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="L235" class="LineNr">235 </span> <span class="subxComment"># (eax..ecx) = &quot;-2/foo&quot;</span>
@ -306,16 +306,16 @@ if ('onhashchange' in window) {
<span id="L245" class="LineNr">245 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L246" class="LineNr">246 </span> 68/push 2/imm32
<span id="L247" class="LineNr">247 </span> 51/push-ecx
<span id="L248" class="LineNr">248 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L248" class="LineNr">248 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L249" class="LineNr">249 </span> <span class="subxS2Comment"># . . call</span>
<span id="L250" class="LineNr">250 </span> e8/call <a href='079emit.subx.html#L10'>emit</a>/disp32
<span id="L250" class="LineNr">250 </span> e8/call <a href='130emit.subx.html#L10'>emit</a>/disp32
<span id="L251" class="LineNr">251 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L252" class="LineNr">252 </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="L253" class="LineNr">253 </span> <span class="subxComment"># flush(_test-output-buffered-file)</span>
<span id="L254" class="LineNr">254 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L255" class="LineNr">255 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L255" class="LineNr">255 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L256" class="LineNr">256 </span> <span class="subxS2Comment"># . . call</span>
<span id="L257" class="LineNr">257 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L257" class="LineNr">257 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L258" class="LineNr">258 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L259" class="LineNr">259 </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="L260" class="LineNr">260 </span> <span class="subxComment"># the '/foo' will have no impact on the output</span>
@ -323,9 +323,9 @@ if ('onhashchange' in window) {
<span id="L262" class="LineNr">262 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L263" class="LineNr">263 </span> 68/push <span class="Constant">&quot;F - test-emit-number-with-metadata&quot;</span>/imm32
<span id="L264" class="LineNr">264 </span> 68/push <span class="Constant">&quot;fe ff &quot;</span>/imm32
<span id="L265" class="LineNr">265 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L265" class="LineNr">265 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L266" class="LineNr">266 </span> <span class="subxS2Comment"># . . call</span>
<span id="L267" class="LineNr">267 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L267" class="LineNr">267 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L268" class="LineNr">268 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L269" class="LineNr">269 </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="L270" class="LineNr">270 </span> <span class="subxS1Comment"># . epilogue</span>
@ -340,16 +340,16 @@ if ('onhashchange' in window) {
<span id="L279" class="LineNr">279 </span> <span class="subxComment"># setup</span>
<span id="L280" class="LineNr">280 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L281" class="LineNr">281 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L282" class="LineNr">282 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L282" class="LineNr">282 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L283" class="LineNr">283 </span> <span class="subxS2Comment"># . . call</span>
<span id="L284" class="LineNr">284 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L284" class="LineNr">284 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L285" class="LineNr">285 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L286" class="LineNr">286 </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="L287" class="LineNr">287 </span> <span class="subxS1Comment"># . clear-stream($_test-output-buffered-file-&gt;buffer)</span>
<span id="L288" class="LineNr">288 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L289" class="LineNr">289 </span> 68/push $_test-output-buffered-file-&gt;buffer/imm32
<span id="L290" class="LineNr">290 </span> <span class="subxS2Comment"># . . call</span>
<span id="L291" class="LineNr">291 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L291" class="LineNr">291 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L292" class="LineNr">292 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L293" class="LineNr">293 </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="L294" class="LineNr">294 </span> <span class="subxComment"># (eax..ecx) = &quot;xyz&quot;</span>
@ -365,25 +365,25 @@ if ('onhashchange' in window) {
<span id="L304" class="LineNr">304 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L305" class="LineNr">305 </span> 68/push 2/imm32
<span id="L306" class="LineNr">306 </span> 51/push-ecx
<span id="L307" class="LineNr">307 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L307" class="LineNr">307 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L308" class="LineNr">308 </span> <span class="subxS2Comment"># . . call</span>
<span id="L309" class="LineNr">309 </span> e8/call <a href='079emit.subx.html#L10'>emit</a>/disp32
<span id="L309" class="LineNr">309 </span> e8/call <a href='130emit.subx.html#L10'>emit</a>/disp32
<span id="L310" class="LineNr">310 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L311" class="LineNr">311 </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="L312" class="LineNr">312 </span> <span class="subxComment"># flush(_test-output-buffered-file)</span>
<span id="L313" class="LineNr">313 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L314" class="LineNr">314 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L314" class="LineNr">314 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L315" class="LineNr">315 </span> <span class="subxS2Comment"># . . call</span>
<span id="L316" class="LineNr">316 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L316" class="LineNr">316 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L317" class="LineNr">317 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L318" class="LineNr">318 </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="L319" class="LineNr">319 </span> <span class="subxComment"># check-stream-equal(_test-output-stream, &quot;xyz&quot;, msg)</span>
<span id="L320" class="LineNr">320 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L321" class="LineNr">321 </span> 68/push <span class="Constant">&quot;F - test-emit-non-number&quot;</span>/imm32
<span id="L322" class="LineNr">322 </span> 68/push <span class="Constant">&quot;xyz &quot;</span>/imm32
<span id="L323" class="LineNr">323 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L323" class="LineNr">323 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L324" class="LineNr">324 </span> <span class="subxS2Comment"># . . call</span>
<span id="L325" class="LineNr">325 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L325" class="LineNr">325 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L326" class="LineNr">326 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L327" class="LineNr">327 </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="L328" class="LineNr">328 </span> <span class="subxS1Comment"># . epilogue</span>
@ -398,16 +398,16 @@ if ('onhashchange' in window) {
<span id="L337" class="LineNr">337 </span> <span class="subxComment"># setup</span>
<span id="L338" class="LineNr">338 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L339" class="LineNr">339 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L340" class="LineNr">340 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L340" class="LineNr">340 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L341" class="LineNr">341 </span> <span class="subxS2Comment"># . . call</span>
<span id="L342" class="LineNr">342 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L342" class="LineNr">342 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L343" class="LineNr">343 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L344" class="LineNr">344 </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="L345" class="LineNr">345 </span> <span class="subxS1Comment"># . clear-stream($_test-output-buffered-file-&gt;buffer)</span>
<span id="L346" class="LineNr">346 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L347" class="LineNr">347 </span> 68/push $_test-output-buffered-file-&gt;buffer/imm32
<span id="L348" class="LineNr">348 </span> <span class="subxS2Comment"># . . call</span>
<span id="L349" class="LineNr">349 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L349" class="LineNr">349 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L350" class="LineNr">350 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L351" class="LineNr">351 </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="L352" class="LineNr">352 </span> <span class="subxComment"># (eax..ecx) = &quot;xyz/&quot;</span>
@ -423,25 +423,25 @@ if ('onhashchange' in window) {
<span id="L362" class="LineNr">362 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L363" class="LineNr">363 </span> 68/push 2/imm32
<span id="L364" class="LineNr">364 </span> 51/push-ecx
<span id="L365" class="LineNr">365 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L365" class="LineNr">365 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L366" class="LineNr">366 </span> <span class="subxS2Comment"># . . call</span>
<span id="L367" class="LineNr">367 </span> e8/call <a href='079emit.subx.html#L10'>emit</a>/disp32
<span id="L367" class="LineNr">367 </span> e8/call <a href='130emit.subx.html#L10'>emit</a>/disp32
<span id="L368" class="LineNr">368 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L369" class="LineNr">369 </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="L370" class="LineNr">370 </span> <span class="subxComment"># flush(_test-output-buffered-file)</span>
<span id="L371" class="LineNr">371 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L372" class="LineNr">372 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L372" class="LineNr">372 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L373" class="LineNr">373 </span> <span class="subxS2Comment"># . . call</span>
<span id="L374" class="LineNr">374 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L374" class="LineNr">374 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L375" class="LineNr">375 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L376" class="LineNr">376 </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="L377" class="LineNr">377 </span> <span class="subxComment"># check-stream-equal(_test-output-stream, &quot;xyz/&quot;, msg)</span>
<span id="L378" class="LineNr">378 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L379" class="LineNr">379 </span> 68/push <span class="Constant">&quot;F - test-emit-non-number-with-metadata&quot;</span>/imm32
<span id="L380" class="LineNr">380 </span> 68/push <span class="Constant">&quot;xyz/ &quot;</span>/imm32
<span id="L381" class="LineNr">381 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L381" class="LineNr">381 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L382" class="LineNr">382 </span> <span class="subxS2Comment"># . . call</span>
<span id="L383" class="LineNr">383 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L383" class="LineNr">383 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L384" class="LineNr">384 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L385" class="LineNr">385 </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="L386" class="LineNr">386 </span> <span class="subxS1Comment"># . epilogue</span>
@ -456,16 +456,16 @@ if ('onhashchange' in window) {
<span id="L395" class="LineNr">395 </span> <span class="subxComment"># setup</span>
<span id="L396" class="LineNr">396 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L397" class="LineNr">397 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L398" class="LineNr">398 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L398" class="LineNr">398 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L399" class="LineNr">399 </span> <span class="subxS2Comment"># . . call</span>
<span id="L400" class="LineNr">400 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L400" class="LineNr">400 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L401" class="LineNr">401 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L402" class="LineNr">402 </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="L403" class="LineNr">403 </span> <span class="subxS1Comment"># . clear-stream($_test-output-buffered-file-&gt;buffer)</span>
<span id="L404" class="LineNr">404 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L405" class="LineNr">405 </span> 68/push $_test-output-buffered-file-&gt;buffer/imm32
<span id="L406" class="LineNr">406 </span> <span class="subxS2Comment"># . . call</span>
<span id="L407" class="LineNr">407 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L407" class="LineNr">407 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L408" class="LineNr">408 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L409" class="LineNr">409 </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="L410" class="LineNr">410 </span> <span class="subxComment"># (eax..ecx) = &quot;abcd/xyz&quot;</span>
@ -481,16 +481,16 @@ if ('onhashchange' in window) {
<span id="L420" class="LineNr">420 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L421" class="LineNr">421 </span> 68/push 2/imm32
<span id="L422" class="LineNr">422 </span> 51/push-ecx
<span id="L423" class="LineNr">423 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L423" class="LineNr">423 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L424" class="LineNr">424 </span> <span class="subxS2Comment"># . . call</span>
<span id="L425" class="LineNr">425 </span> e8/call <a href='079emit.subx.html#L10'>emit</a>/disp32
<span id="L425" class="LineNr">425 </span> e8/call <a href='130emit.subx.html#L10'>emit</a>/disp32
<span id="L426" class="LineNr">426 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L427" class="LineNr">427 </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="L428" class="LineNr">428 </span> <span class="subxComment"># flush(_test-output-buffered-file)</span>
<span id="L429" class="LineNr">429 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L430" class="LineNr">430 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L430" class="LineNr">430 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L431" class="LineNr">431 </span> <span class="subxS2Comment"># . . call</span>
<span id="L432" class="LineNr">432 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L432" class="LineNr">432 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L433" class="LineNr">433 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L434" class="LineNr">434 </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="L435" class="Folded">435 </span><span class="Folded">+-- 26 lines: #? # dump output ------------------------------------------------------------------------------------------------------------------------------------------------------</span>
@ -498,9 +498,9 @@ if ('onhashchange' in window) {
<span id="L462" class="LineNr">462 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L463" class="LineNr">463 </span> 68/push <span class="Constant">&quot;F - test-emit-non-number-with-all-hex-digits&quot;</span>/imm32
<span id="L464" class="LineNr">464 </span> 68/push <span class="Constant">&quot;abcd/xyz &quot;</span>/imm32
<span id="L465" class="LineNr">465 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L465" class="LineNr">465 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L466" class="LineNr">466 </span> <span class="subxS2Comment"># . . call</span>
<span id="L467" class="LineNr">467 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L467" class="LineNr">467 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L468" class="LineNr">468 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L469" class="LineNr">469 </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="L470" class="LineNr">470 </span> <span class="subxS1Comment"># . epilogue</span>

File diff suppressed because it is too large Load Diff

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 082slurp.subx</title>
<title>Mu - 132slurp.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -55,7 +55,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/082slurp.subx'>https://github.com/akkartik/mu/blob/master/082slurp.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/132slurp.subx'>https://github.com/akkartik/mu/blob/master/132slurp.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span>== code
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># instruction effective address register displacement immediate</span>
@ -103,7 +103,7 @@ if ('onhashchange' in window) {
<span id="L44" class="LineNr"> 44 </span> 8d/copy-address 1/mod/*+disp8 6/rm32/esi <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy esi+4 to eax</span>
<span id="L45" class="LineNr"> 45 </span> 50/push-eax
<span id="L46" class="LineNr"> 46 </span> <span class="subxS2Comment"># . . call</span>
<span id="L47" class="LineNr"> 47 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L47" class="LineNr"> 47 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L48" class="LineNr"> 48 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L49" class="LineNr"> 49 </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="L50" class="LineNr"> 50 </span> <span class="subxS1Comment"># . f-&gt;read must now be 0; update its cache at ecx</span>
@ -113,7 +113,7 @@ if ('onhashchange' in window) {
<span id="L54" class="LineNr"> 54 </span> 50/push-eax
<span id="L55" class="LineNr"> 55 </span> ff 6/subop/push 0/mod/indirect 6/rm32/esi <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 *esi</span>
<span id="L56" class="LineNr"> 56 </span> <span class="subxS2Comment"># . . call</span>
<span id="L57" class="LineNr"> 57 </span> e8/call <a href='060read.subx.html#L48'>read</a>/disp32
<span id="L57" class="LineNr"> 57 </span> e8/call <a href='111read.subx.html#L48'>read</a>/disp32
<span id="L58" class="LineNr"> 58 </span> <span class="subxS2Comment"># . . discard args</span>
<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="subxComment"># if (f-&gt;write == 0) break</span>
@ -154,7 +154,7 @@ if ('onhashchange' in window) {
<span id="L95" class="LineNr"> 95 </span> 68/push <span class="Constant">&quot;slurp: destination too small\n&quot;</span>/imm32
<span id="L96" class="LineNr"> 96 </span> 68/push 2/imm32/stderr
<span id="L97" class="LineNr"> 97 </span> <span class="subxS2Comment"># . . call</span>
<span id="L98" class="LineNr"> 98 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L98" class="LineNr"> 98 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L99" class="LineNr"> 99 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L100" class="LineNr">100 </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="L101" class="LineNr">101 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -166,49 +166,49 @@ if ('onhashchange' in window) {
<span id="L107" class="LineNr">107 </span> <span class="subxComment"># setup</span>
<span id="L108" class="LineNr">108 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L109" class="LineNr">109 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L110" class="LineNr">110 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L110" class="LineNr">110 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L111" class="LineNr">111 </span> <span class="subxS2Comment"># . . call</span>
<span id="L112" class="LineNr">112 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L112" class="LineNr">112 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L113" class="LineNr">113 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L114" class="LineNr">114 </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="L115" class="LineNr">115 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L116" class="LineNr">116 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L117" class="LineNr">117 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L118" class="LineNr">118 </span> <span class="subxS2Comment"># . . call</span>
<span id="L119" class="LineNr">119 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L119" class="LineNr">119 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L120" class="LineNr">120 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L121" class="LineNr">121 </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="L122" class="LineNr">122 </span> <span class="subxS1Comment"># . clear-stream(_test-tmp-stream)</span>
<span id="L123" class="LineNr">123 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L124" class="LineNr">124 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L124" class="LineNr">124 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L125" class="LineNr">125 </span> <span class="subxS2Comment"># . . call</span>
<span id="L126" class="LineNr">126 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L126" class="LineNr">126 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L127" class="LineNr">127 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L128" class="LineNr">128 </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="L129" class="LineNr">129 </span> <span class="subxComment"># write(_test-stream, &quot;ab\ncd&quot;)</span>
<span id="L130" class="LineNr">130 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L131" class="LineNr">131 </span> 68/push <span class="Constant">&quot;ab\ncd&quot;</span>/imm32
<span id="L132" class="LineNr">132 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L132" class="LineNr">132 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L133" class="LineNr">133 </span> <span class="subxS2Comment"># . . call</span>
<span id="L134" class="LineNr">134 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L134" class="LineNr">134 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L135" class="LineNr">135 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L136" class="LineNr">136 </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="L137" class="LineNr">137 </span> <span class="subxComment"># read a line from _test-stream (buffered by _test-buffered-file) into _test-tmp-stream</span>
<span id="L138" class="LineNr">138 </span> <span class="subxS1Comment"># . eax = slurp(_test-buffered-file, _test-tmp-stream)</span>
<span id="L139" class="LineNr">139 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L140" class="LineNr">140 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L141" class="LineNr">141 </span> 68/push <a href='061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L140" class="LineNr">140 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L141" class="LineNr">141 </span> 68/push <a href='112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L142" class="LineNr">142 </span> <span class="subxS2Comment"># . . call</span>
<span id="L143" class="LineNr">143 </span> e8/call <a href='082slurp.subx.html#L8'>slurp</a>/disp32
<span id="L143" class="LineNr">143 </span> e8/call <a href='132slurp.subx.html#L8'>slurp</a>/disp32
<span id="L144" class="LineNr">144 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L145" class="LineNr">145 </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="L146" class="LineNr">146 </span> <span class="subxComment"># check-stream-equal(_test-tmp-stream, &quot;ab\ncd&quot;, msg)</span>
<span id="L147" class="LineNr">147 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L148" class="LineNr">148 </span> 68/push <span class="Constant">&quot;F - test-slurp&quot;</span>/imm32
<span id="L149" class="LineNr">149 </span> 68/push <span class="Constant">&quot;ab\ncd&quot;</span>/imm32
<span id="L150" class="LineNr">150 </span> 68/push <a href='060read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L150" class="LineNr">150 </span> 68/push <a href='111read.subx.html#L428'>_test-tmp-stream</a>/imm32
<span id="L151" class="LineNr">151 </span> <span class="subxS2Comment"># . . call</span>
<span id="L152" class="LineNr">152 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L152" class="LineNr">152 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L153" class="LineNr">153 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L154" class="LineNr">154 </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="L155" class="LineNr">155 </span> <span class="subxComment"># end</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 083subx-widths.subx</title>
<title>Mu - 133subx-widths.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -55,7 +55,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/083subx-widths.subx'>https://github.com/akkartik/mu/blob/master/083subx-widths.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/133subx-widths.subx'>https://github.com/akkartik/mu/blob/master/133subx-widths.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Helpers to compute widths of SubX arguments based on their metadata.</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># /imm8 =&gt; 1 byte,</span>
@ -67,7 +67,7 @@ if ('onhashchange' in window) {
<span id="L8" class="LineNr"> 8 </span><span class="subxS1Comment"># . op subop mod rm32 base index scale r32</span>
<span id="L9" class="LineNr"> 9 </span><span class="subxS1Comment"># . 1-3 bytes 3 bits 2 bits 3 bits 3 bits 3 bits 2 bits 2 bits 0/1/2/4 bytes 0/1/2/4 bytes</span>
<span id="L10" class="LineNr"> 10 </span>
<span id="L11" class="LineNr"> 11 </span><span class="subxFunction">compute-width</span>: <span class="subxComment"># word: (addr array byte) -&gt; eax: int</span>
<span id="L11" class="LineNr"> 11 </span><span class="subxFunction">compute-width</span>: <span class="subxComment"># word: (addr array byte) -&gt; result/eax: int</span>
<span id="L12" class="LineNr"> 12 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L13" class="LineNr"> 13 </span> 55/push-ebp
<span id="L14" class="LineNr"> 14 </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>
@ -88,7 +88,7 @@ if ('onhashchange' in window) {
<span id="L29" class="LineNr"> 29 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L30" class="LineNr"> 30 </span> 51/push-ecx
<span id="L31" class="LineNr"> 31 </span> <span class="subxS2Comment"># . . call</span>
<span id="L32" class="LineNr"> 32 </span> e8/call <a href='083subx-widths.subx.html#L45'>compute-width-of-slice</a>/disp32
<span id="L32" class="LineNr"> 32 </span> e8/call <a href='133subx-widths.subx.html#L45'>compute-width-of-slice</a>/disp32
<span id="L33" class="LineNr"> 33 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L34" class="LineNr"> 34 </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="L35" class="LineNr"> 35 </span><span class="Constant">$compute-width:end</span>:
@ -101,7 +101,7 @@ if ('onhashchange' in window) {
<span id="L42" class="LineNr"> 42 </span> 5d/pop-to-ebp
<span id="L43" class="LineNr"> 43 </span> c3/return
<span id="L44" class="LineNr"> 44 </span>
<span id="L45" class="LineNr"> 45 </span><span class="subxFunction">compute-width-of-slice</span>: <span class="subxComment"># s: (addr slice) -&gt; eax: int</span>
<span id="L45" class="LineNr"> 45 </span><span class="subxFunction">compute-width-of-slice</span>: <span class="subxComment"># s: (addr slice) -&gt; result/eax: int</span>
<span id="L46" class="LineNr"> 46 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L47" class="LineNr"> 47 </span> 55/push-ebp
<span id="L48" class="LineNr"> 48 </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>
@ -115,7 +115,7 @@ if ('onhashchange' in window) {
<span id="L56" class="LineNr"> 56 </span> 68/push <span class="Constant">&quot;imm32&quot;</span>/imm32
<span id="L57" class="LineNr"> 57 </span> 51/push-ecx
<span id="L58" class="LineNr"> 58 </span> <span class="subxS2Comment"># . . call</span>
<span id="L59" class="LineNr"> 59 </span> e8/call <a href='077subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L59" class="LineNr"> 59 </span> e8/call <a href='128subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L60" class="LineNr"> 60 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L61" class="LineNr"> 61 </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="L62" class="LineNr"> 62 </span> <span class="subxS1Comment"># . if (eax != false) return 4</span>
@ -128,7 +128,7 @@ if ('onhashchange' in window) {
<span id="L69" class="LineNr"> 69 </span> 68/push <span class="Constant">&quot;disp32&quot;</span>/imm32
<span id="L70" class="LineNr"> 70 </span> 51/push-ecx
<span id="L71" class="LineNr"> 71 </span> <span class="subxS2Comment"># . . call</span>
<span id="L72" class="LineNr"> 72 </span> e8/call <a href='077subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L72" class="LineNr"> 72 </span> e8/call <a href='128subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L73" class="LineNr"> 73 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L74" class="LineNr"> 74 </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="L75" class="LineNr"> 75 </span> <span class="subxS1Comment"># . if (eax != false) return 4</span>
@ -141,7 +141,7 @@ if ('onhashchange' in window) {
<span id="L82" class="LineNr"> 82 </span> 68/push <span class="Constant">&quot;imm16&quot;</span>/imm32
<span id="L83" class="LineNr"> 83 </span> 51/push-ecx
<span id="L84" class="LineNr"> 84 </span> <span class="subxS2Comment"># . . call</span>
<span id="L85" class="LineNr"> 85 </span> e8/call <a href='077subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L85" class="LineNr"> 85 </span> e8/call <a href='128subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L86" class="LineNr"> 86 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L87" class="LineNr"> 87 </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="L88" class="LineNr"> 88 </span> <span class="subxS1Comment"># . if (eax != false) return 2</span>
@ -154,7 +154,7 @@ if ('onhashchange' in window) {
<span id="L95" class="LineNr"> 95 </span> 68/push <span class="Constant">&quot;disp16&quot;</span>/imm32
<span id="L96" class="LineNr"> 96 </span> 51/push-ecx
<span id="L97" class="LineNr"> 97 </span> <span class="subxS2Comment"># . . call</span>
<span id="L98" class="LineNr"> 98 </span> e8/call <a href='077subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L98" class="LineNr"> 98 </span> e8/call <a href='128subx-words.subx.html#L8'>has-metadata?</a>/disp32
<span id="L99" class="LineNr"> 99 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L100" class="LineNr">100 </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="L101" class="LineNr">101 </span> <span class="subxS1Comment"># . if (eax != false) return 2</span>
@ -180,16 +180,16 @@ if ('onhashchange' in window) {
<span id="L121" class="LineNr">121 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L122" class="LineNr">122 </span> 68/push <span class="Constant">&quot;0x2/imm8&quot;</span>/imm32
<span id="L123" class="LineNr">123 </span> <span class="subxS2Comment"># . . call</span>
<span id="L124" class="LineNr">124 </span> e8/call <a href='083subx-widths.subx.html#L11'>compute-width</a>/disp32
<span id="L124" class="LineNr">124 </span> e8/call <a href='133subx-widths.subx.html#L11'>compute-width</a>/disp32
<span id="L125" class="LineNr">125 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L126" class="LineNr">126 </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="L127" class="LineNr">127 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
<span id="L128" class="LineNr">128 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L129" class="LineNr">129 </span> 68/push <span class="Constant">&quot;F - <a href='083subx-widths.subx.html#L115'>test-compute-width</a>: 0x2/imm8&quot;</span>/imm32
<span id="L129" class="LineNr">129 </span> 68/push <span class="Constant">&quot;F - <a href='133subx-widths.subx.html#L115'>test-compute-width</a>: 0x2/imm8&quot;</span>/imm32
<span id="L130" class="LineNr">130 </span> 50/push-eax
<span id="L131" class="LineNr">131 </span> 68/push 1/imm32
<span id="L132" class="LineNr">132 </span> <span class="subxS2Comment"># . . call</span>
<span id="L133" class="LineNr">133 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L133" class="LineNr">133 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L134" class="LineNr">134 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L135" class="LineNr">135 </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="L136" class="LineNr">136 </span><span class="Constant">$test-compute-width:imm16</span>:
@ -197,16 +197,16 @@ if ('onhashchange' in window) {
<span id="L138" class="LineNr">138 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L139" class="LineNr">139 </span> 68/push <span class="Constant">&quot;4/imm16&quot;</span>/imm32
<span id="L140" class="LineNr">140 </span> <span class="subxS2Comment"># . . call</span>
<span id="L141" class="LineNr">141 </span> e8/call <a href='083subx-widths.subx.html#L11'>compute-width</a>/disp32
<span id="L141" class="LineNr">141 </span> e8/call <a href='133subx-widths.subx.html#L11'>compute-width</a>/disp32
<span id="L142" class="LineNr">142 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L143" class="LineNr">143 </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="L144" class="LineNr">144 </span> <span class="subxComment"># check-ints-equal(eax, 2, msg)</span>
<span id="L145" class="LineNr">145 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L146" class="LineNr">146 </span> 68/push <span class="Constant">&quot;F - <a href='083subx-widths.subx.html#L115'>test-compute-width</a>: 4/imm16&quot;</span>/imm32
<span id="L146" class="LineNr">146 </span> 68/push <span class="Constant">&quot;F - <a href='133subx-widths.subx.html#L115'>test-compute-width</a>: 4/imm16&quot;</span>/imm32
<span id="L147" class="LineNr">147 </span> 50/push-eax
<span id="L148" class="LineNr">148 </span> 68/push 2/imm32
<span id="L149" class="LineNr">149 </span> <span class="subxS2Comment"># . . call</span>
<span id="L150" class="LineNr">150 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L150" class="LineNr">150 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L151" class="LineNr">151 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L152" class="LineNr">152 </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="L153" class="LineNr">153 </span><span class="Constant">$test-compute-width:imm32</span>:
@ -214,16 +214,16 @@ if ('onhashchange' in window) {
<span id="L155" class="LineNr">155 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L156" class="LineNr">156 </span> 68/push <span class="Constant">&quot;4/imm32&quot;</span>/imm32
<span id="L157" class="LineNr">157 </span> <span class="subxS2Comment"># . . call</span>
<span id="L158" class="LineNr">158 </span> e8/call <a href='083subx-widths.subx.html#L11'>compute-width</a>/disp32
<span id="L158" class="LineNr">158 </span> e8/call <a href='133subx-widths.subx.html#L11'>compute-width</a>/disp32
<span id="L159" class="LineNr">159 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L160" class="LineNr">160 </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="L161" class="LineNr">161 </span> <span class="subxComment"># check-ints-equal(eax, 4, msg)</span>
<span id="L162" class="LineNr">162 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L163" class="LineNr">163 </span> 68/push <span class="Constant">&quot;F - <a href='083subx-widths.subx.html#L115'>test-compute-width</a>: 4/imm32&quot;</span>/imm32
<span id="L163" class="LineNr">163 </span> 68/push <span class="Constant">&quot;F - <a href='133subx-widths.subx.html#L115'>test-compute-width</a>: 4/imm32&quot;</span>/imm32
<span id="L164" class="LineNr">164 </span> 50/push-eax
<span id="L165" class="LineNr">165 </span> 68/push 4/imm32
<span id="L166" class="LineNr">166 </span> <span class="subxS2Comment"># . . call</span>
<span id="L167" class="LineNr">167 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L167" class="LineNr">167 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L168" class="LineNr">168 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L169" class="LineNr">169 </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="L170" class="LineNr">170 </span><span class="Constant">$test-compute-width:disp8</span>:
@ -231,16 +231,16 @@ if ('onhashchange' in window) {
<span id="L172" class="LineNr">172 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L173" class="LineNr">173 </span> 68/push <span class="Constant">&quot;foo/disp8&quot;</span>/imm32
<span id="L174" class="LineNr">174 </span> <span class="subxS2Comment"># . . call</span>
<span id="L175" class="LineNr">175 </span> e8/call <a href='083subx-widths.subx.html#L11'>compute-width</a>/disp32
<span id="L175" class="LineNr">175 </span> e8/call <a href='133subx-widths.subx.html#L11'>compute-width</a>/disp32
<span id="L176" class="LineNr">176 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L177" class="LineNr">177 </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="L178" class="LineNr">178 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
<span id="L179" class="LineNr">179 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L180" class="LineNr">180 </span> 68/push <span class="Constant">&quot;F - <a href='083subx-widths.subx.html#L115'>test-compute-width</a>: foo/disp8&quot;</span>/imm32
<span id="L180" class="LineNr">180 </span> 68/push <span class="Constant">&quot;F - <a href='133subx-widths.subx.html#L115'>test-compute-width</a>: foo/disp8&quot;</span>/imm32
<span id="L181" class="LineNr">181 </span> 50/push-eax
<span id="L182" class="LineNr">182 </span> 68/push 1/imm32
<span id="L183" class="LineNr">183 </span> <span class="subxS2Comment"># . . call</span>
<span id="L184" class="LineNr">184 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L184" class="LineNr">184 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L185" class="LineNr">185 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L186" class="LineNr">186 </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="L187" class="LineNr">187 </span><span class="Constant">$test-compute-width:disp16</span>:
@ -248,16 +248,16 @@ if ('onhashchange' in window) {
<span id="L189" class="LineNr">189 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L190" class="LineNr">190 </span> 68/push <span class="Constant">&quot;foo/disp16&quot;</span>/imm32
<span id="L191" class="LineNr">191 </span> <span class="subxS2Comment"># . . call</span>
<span id="L192" class="LineNr">192 </span> e8/call <a href='083subx-widths.subx.html#L11'>compute-width</a>/disp32
<span id="L192" class="LineNr">192 </span> e8/call <a href='133subx-widths.subx.html#L11'>compute-width</a>/disp32
<span id="L193" class="LineNr">193 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L194" class="LineNr">194 </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="L195" class="LineNr">195 </span> <span class="subxComment"># check-ints-equal(eax, 2, msg)</span>
<span id="L196" class="LineNr">196 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L197" class="LineNr">197 </span> 68/push <span class="Constant">&quot;F - <a href='083subx-widths.subx.html#L115'>test-compute-width</a>: foo/disp16&quot;</span>/imm32
<span id="L197" class="LineNr">197 </span> 68/push <span class="Constant">&quot;F - <a href='133subx-widths.subx.html#L115'>test-compute-width</a>: foo/disp16&quot;</span>/imm32
<span id="L198" class="LineNr">198 </span> 50/push-eax
<span id="L199" class="LineNr">199 </span> 68/push 2/imm32
<span id="L200" class="LineNr">200 </span> <span class="subxS2Comment"># . . call</span>
<span id="L201" class="LineNr">201 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L201" class="LineNr">201 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L202" class="LineNr">202 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L203" class="LineNr">203 </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="L204" class="LineNr">204 </span><span class="Constant">$test-compute-width:disp32</span>:
@ -265,16 +265,16 @@ if ('onhashchange' in window) {
<span id="L206" class="LineNr">206 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L207" class="LineNr">207 </span> 68/push <span class="Constant">&quot;foo/disp32&quot;</span>/imm32
<span id="L208" class="LineNr">208 </span> <span class="subxS2Comment"># . . call</span>
<span id="L209" class="LineNr">209 </span> e8/call <a href='083subx-widths.subx.html#L11'>compute-width</a>/disp32
<span id="L209" class="LineNr">209 </span> e8/call <a href='133subx-widths.subx.html#L11'>compute-width</a>/disp32
<span id="L210" class="LineNr">210 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L211" class="LineNr">211 </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="L212" class="LineNr">212 </span> <span class="subxComment"># check-ints-equal(eax, 4, msg)</span>
<span id="L213" class="LineNr">213 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L214" class="LineNr">214 </span> 68/push <span class="Constant">&quot;F - <a href='083subx-widths.subx.html#L115'>test-compute-width</a>: foo/disp32&quot;</span>/imm32
<span id="L214" class="LineNr">214 </span> 68/push <span class="Constant">&quot;F - <a href='133subx-widths.subx.html#L115'>test-compute-width</a>: foo/disp32&quot;</span>/imm32
<span id="L215" class="LineNr">215 </span> 50/push-eax
<span id="L216" class="LineNr">216 </span> 68/push 4/imm32
<span id="L217" class="LineNr">217 </span> <span class="subxS2Comment"># . . call</span>
<span id="L218" class="LineNr">218 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L218" class="LineNr">218 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L219" class="LineNr">219 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L220" class="LineNr">220 </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="L221" class="LineNr">221 </span><span class="Constant">$test-compute-width:no-metadata</span>:
@ -282,16 +282,16 @@ if ('onhashchange' in window) {
<span id="L223" class="LineNr">223 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L224" class="LineNr">224 </span> 68/push <span class="Constant">&quot;45&quot;</span>/imm32
<span id="L225" class="LineNr">225 </span> <span class="subxS2Comment"># . . call</span>
<span id="L226" class="LineNr">226 </span> e8/call <a href='083subx-widths.subx.html#L11'>compute-width</a>/disp32
<span id="L226" class="LineNr">226 </span> e8/call <a href='133subx-widths.subx.html#L11'>compute-width</a>/disp32
<span id="L227" class="LineNr">227 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L228" class="LineNr">228 </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="L229" class="LineNr">229 </span> <span class="subxComment"># check-ints-equal(eax, 1, msg)</span>
<span id="L230" class="LineNr">230 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L231" class="LineNr">231 </span> 68/push <span class="Constant">&quot;F - <a href='083subx-widths.subx.html#L115'>test-compute-width</a>: 45 (no metadata)&quot;</span>/imm32
<span id="L231" class="LineNr">231 </span> 68/push <span class="Constant">&quot;F - <a href='133subx-widths.subx.html#L115'>test-compute-width</a>: 45 (no metadata)&quot;</span>/imm32
<span id="L232" class="LineNr">232 </span> 50/push-eax
<span id="L233" class="LineNr">233 </span> 68/push 1/imm32
<span id="L234" class="LineNr">234 </span> <span class="subxS2Comment"># . . call</span>
<span id="L235" class="LineNr">235 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L235" class="LineNr">235 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L236" class="LineNr">236 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L237" class="LineNr">237 </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="L238" class="LineNr">238 </span> <span class="subxS1Comment"># . epilogue</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 084emit-hex-array.subx</title>
<title>Mu - 134emit-hex-array.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -56,7 +56,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/084emit-hex-array.subx'>https://github.com/akkartik/mu/blob/master/084emit-hex-array.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/134emit-hex-array.subx'>https://github.com/akkartik/mu/blob/master/134emit-hex-array.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span>== code
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># instruction effective address register displacement immediate</span>
@ -95,7 +95,7 @@ if ('onhashchange' in window) {
<span id="L35" class="LineNr"> 35 </span> 50/push-eax
<span id="L36" class="LineNr"> 36 </span> 57/push-edi
<span id="L37" class="LineNr"> 37 </span> <span class="subxS2Comment"># . . call</span>
<span id="L38" class="LineNr"> 38 </span> e8/call <a href='078emit-hex.subx.html#L7'>emit-hex</a>/disp32
<span id="L38" class="LineNr"> 38 </span> e8/call <a href='129emit-hex.subx.html#L7'>emit-hex</a>/disp32
<span id="L39" class="LineNr"> 39 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L40" class="LineNr"> 40 </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="L41" class="LineNr"> 41 </span> <span class="subxComment"># ++curr</span>
@ -119,16 +119,16 @@ if ('onhashchange' in window) {
<span id="L59" class="LineNr"> 59 </span> <span class="subxComment"># setup</span>
<span id="L60" class="LineNr"> 60 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L61" class="LineNr"> 61 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L62" class="LineNr"> 62 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L62" class="LineNr"> 62 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L63" class="LineNr"> 63 </span> <span class="subxS2Comment"># . . call</span>
<span id="L64" class="LineNr"> 64 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L64" class="LineNr"> 64 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L65" class="LineNr"> 65 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L66" class="LineNr"> 66 </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="L67" class="LineNr"> 67 </span> <span class="subxS1Comment"># . clear-stream($_test-output-buffered-file-&gt;buffer)</span>
<span id="L68" class="LineNr"> 68 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L69" class="LineNr"> 69 </span> 68/push $_test-output-buffered-file-&gt;buffer/imm32
<span id="L70" class="LineNr"> 70 </span> <span class="subxS2Comment"># . . call</span>
<span id="L71" class="LineNr"> 71 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L71" class="LineNr"> 71 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L72" class="LineNr"> 72 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L73" class="LineNr"> 73 </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="L74" class="LineNr"> 74 </span> <span class="subxComment"># var arr/ecx (array byte) = [01, 02, 03]</span>
@ -138,16 +138,16 @@ if ('onhashchange' in window) {
<span id="L78" class="LineNr"> 78 </span> <span class="subxComment"># emit-hex-array(_test-output-buffered-file, arr)</span>
<span id="L79" class="LineNr"> 79 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L80" class="LineNr"> 80 </span> 51/push-ecx
<span id="L81" class="LineNr"> 81 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L81" class="LineNr"> 81 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L82" class="LineNr"> 82 </span> <span class="subxS2Comment"># . . call</span>
<span id="L83" class="LineNr"> 83 </span> e8/call <a href='084emit-hex-array.subx.html#L7'>emit-hex-array</a>/disp32
<span id="L83" class="LineNr"> 83 </span> e8/call <a href='134emit-hex-array.subx.html#L7'>emit-hex-array</a>/disp32
<span id="L84" class="LineNr"> 84 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L85" class="LineNr"> 85 </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="L86" class="LineNr"> 86 </span> <span class="subxS1Comment"># . flush(_test-output-buffered-file)</span>
<span id="L87" class="LineNr"> 87 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L88" class="LineNr"> 88 </span> 68/push <a href='064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L88" class="LineNr"> 88 </span> 68/push <a href='115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L89" class="LineNr"> 89 </span> <span class="subxS2Comment"># . . call</span>
<span id="L90" class="LineNr"> 90 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L90" class="LineNr"> 90 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L91" class="LineNr"> 91 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L92" class="LineNr"> 92 </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="L93" class="Folded"> 93 </span><span class="Folded">+-- 33 lines: #? # dump output ------------------------------------------------------------------------------------------------------------------------------------------------------</span>
@ -155,9 +155,9 @@ if ('onhashchange' in window) {
<span id="L127" class="LineNr">127 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L128" class="LineNr">128 </span> 68/push <span class="Constant">&quot;F - test-emit-hex-array&quot;</span>/imm32
<span id="L129" class="LineNr">129 </span> 68/push <span class="Constant">&quot;01 02 03 &quot;</span>/imm32
<span id="L130" class="LineNr">130 </span> 68/push <a href='064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L130" class="LineNr">130 </span> 68/push <a href='115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L131" class="LineNr">131 </span> <span class="subxS2Comment"># . . call</span>
<span id="L132" class="LineNr">132 </span> e8/call <a href='058stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L132" class="LineNr">132 </span> e8/call <a href='109stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L133" class="LineNr">133 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L134" class="LineNr">134 </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="L135" class="LineNr">135 </span> <span class="subxS1Comment"># . epilogue</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 085next-word-or-string.subx</title>
<title>Mu - 135next-word-or-string.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -55,7 +55,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/085next-word-or-string.subx'>https://github.com/akkartik/mu/blob/master/085next-word-or-string.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/135next-word-or-string.subx'>https://github.com/akkartik/mu/blob/master/135next-word-or-string.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span>== code
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># instruction effective address register displacement immediate</span>
@ -82,7 +82,7 @@ if ('onhashchange' in window) {
<span id="L23" class="LineNr"> 23 </span> 68/push 0x20/imm32/space
<span id="L24" class="LineNr"> 24 </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="L25" class="LineNr"> 25 </span> <span class="subxS2Comment"># . . call</span>
<span id="L26" class="LineNr"> 26 </span> e8/call <a href='073next-token.subx.html#L341'>skip-chars-matching</a>/disp32
<span id="L26" class="LineNr"> 26 </span> e8/call <a href='124next-token.subx.html#L341'>skip-chars-matching</a>/disp32
<span id="L27" class="LineNr"> 27 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L28" class="LineNr"> 28 </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="L29" class="LineNr"> 29 </span><span class="Constant">$next-word-or-string:check0</span>:
@ -131,7 +131,7 @@ if ('onhashchange' in window) {
<span id="L72" class="LineNr"> 72 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L73" class="LineNr"> 73 </span> 56/push-esi
<span id="L74" class="LineNr"> 74 </span> <span class="subxS2Comment"># . . call</span>
<span id="L75" class="LineNr"> 75 </span> e8/call <a href='073next-token.subx.html#L1171'>skip-string</a>/disp32
<span id="L75" class="LineNr"> 75 </span> e8/call <a href='124next-token.subx.html#L1171'>skip-string</a>/disp32
<span id="L76" class="LineNr"> 76 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L77" class="LineNr"> 77 </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="L78" class="LineNr"> 78 </span> <span class="subxComment"># fall through</span>
@ -140,7 +140,7 @@ if ('onhashchange' in window) {
<span id="L81" class="LineNr"> 81 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L82" class="LineNr"> 82 </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="L83" class="LineNr"> 83 </span> <span class="subxS2Comment"># . . call</span>
<span id="L84" class="LineNr"> 84 </span> e8/call <a href='073next-token.subx.html#L716'>skip-chars-not-matching-whitespace</a>/disp32
<span id="L84" class="LineNr"> 84 </span> e8/call <a href='124next-token.subx.html#L716'>skip-chars-not-matching-whitespace</a>/disp32
<span id="L85" class="LineNr"> 85 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L86" class="LineNr"> 86 </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="L87" class="LineNr"> 87 </span> <span class="subxComment"># out-&gt;end = &amp;line-&gt;data[line-&gt;read]</span>
@ -165,9 +165,9 @@ if ('onhashchange' in window) {
<span id="L106" class="LineNr">106 </span> <span class="subxComment"># setup</span>
<span id="L107" class="LineNr">107 </span> <span class="subxS1Comment"># . clear-stream(_test-input-stream)</span>
<span id="L108" class="LineNr">108 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L109" class="LineNr">109 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L109" class="LineNr">109 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L110" class="LineNr">110 </span> <span class="subxS2Comment"># . . call</span>
<span id="L111" class="LineNr">111 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L111" class="LineNr">111 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L112" class="LineNr">112 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L113" class="LineNr">113 </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="L114" class="LineNr">114 </span> <span class="subxComment"># var slice/ecx: slice</span>
@ -177,53 +177,53 @@ if ('onhashchange' in window) {
<span id="L118" class="LineNr">118 </span> <span class="subxComment"># write(_test-input-stream, &quot; ab&quot;)</span>
<span id="L119" class="LineNr">119 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L120" class="LineNr">120 </span> 68/push <span class="Constant">&quot; ab&quot;</span>/imm32
<span id="L121" class="LineNr">121 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L121" class="LineNr">121 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L122" class="LineNr">122 </span> <span class="subxS2Comment"># . . call</span>
<span id="L123" class="LineNr">123 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L123" class="LineNr">123 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L124" class="LineNr">124 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L125" class="LineNr">125 </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="L126" class="LineNr">126 </span> <span class="subxComment"># next-word-or-string(_test-input-stream, slice)</span>
<span id="L127" class="LineNr">127 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L128" class="LineNr">128 </span> 51/push-ecx
<span id="L129" class="LineNr">129 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L129" class="LineNr">129 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L130" class="LineNr">130 </span> <span class="subxS2Comment"># . . call</span>
<span id="L131" class="LineNr">131 </span> e8/call <a href='085next-word-or-string.subx.html#L8'>next-word-or-string</a>/disp32
<span id="L131" class="LineNr">131 </span> e8/call <a href='135next-word-or-string.subx.html#L8'>next-word-or-string</a>/disp32
<span id="L132" class="LineNr">132 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L133" class="LineNr">133 </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="L134" class="LineNr">134 </span> <span class="subxComment"># check-ints-equal(_test-input-stream-&gt;read, 4, msg)</span>
<span id="L135" class="LineNr">135 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L136" class="LineNr">136 </span> 68/push <span class="Constant">&quot;F - <a href='085next-word-or-string.subx.html#L102'>test-next-word-or-string</a>/updates-stream-read-correctly&quot;</span>/imm32
<span id="L136" class="LineNr">136 </span> 68/push <span class="Constant">&quot;F - <a href='135next-word-or-string.subx.html#L102'>test-next-word-or-string</a>/updates-stream-read-correctly&quot;</span>/imm32
<span id="L137" class="LineNr">137 </span> 68/push 4/imm32
<span id="L138" class="LineNr">138 </span> b8/copy-to-eax <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L138" class="LineNr">138 </span> b8/copy-to-eax <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L139" class="LineNr">139 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+4)</span>
<span id="L140" class="LineNr">140 </span> <span class="subxS2Comment"># . . call</span>
<span id="L141" class="LineNr">141 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L141" class="LineNr">141 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L142" class="LineNr">142 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L143" class="LineNr">143 </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="L144" class="LineNr">144 </span> <span class="subxComment"># check-ints-equal(slice-&gt;start - _test-input-stream-&gt;data, 2, msg)</span>
<span id="L145" class="LineNr">145 </span> <span class="subxS1Comment"># . check-ints-equal(slice-&gt;start - _test-input-stream, 14, msg)</span>
<span id="L146" class="LineNr">146 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L147" class="LineNr">147 </span> 68/push <span class="Constant">&quot;F - <a href='085next-word-or-string.subx.html#L102'>test-next-word-or-string</a>: start&quot;</span>/imm32
<span id="L147" class="LineNr">147 </span> 68/push <span class="Constant">&quot;F - <a href='135next-word-or-string.subx.html#L102'>test-next-word-or-string</a>: start&quot;</span>/imm32
<span id="L148" class="LineNr">148 </span> 68/push 0xe/imm32
<span id="L149" class="LineNr">149 </span> <span class="subxS2Comment"># . . push slice-&gt;start - _test-input-stream</span>
<span id="L150" class="LineNr">150 </span> 8b/copy 0/mod/indirect 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy *ecx to eax</span>
<span id="L151" class="LineNr">151 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L151" class="LineNr">151 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L152" class="LineNr">152 </span> 50/push-eax
<span id="L153" class="LineNr">153 </span> <span class="subxS2Comment"># . . call</span>
<span id="L154" class="LineNr">154 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L154" class="LineNr">154 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L155" class="LineNr">155 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L156" class="LineNr">156 </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="L157" class="LineNr">157 </span> <span class="subxComment"># check-ints-equal(slice-&gt;end - _test-input-stream-&gt;data, 4, msg)</span>
<span id="L158" class="LineNr">158 </span> <span class="subxS1Comment"># . check-ints-equal(slice-&gt;end - _test-input-stream, 16, msg)</span>
<span id="L159" class="LineNr">159 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L160" class="LineNr">160 </span> 68/push <span class="Constant">&quot;F - <a href='085next-word-or-string.subx.html#L102'>test-next-word-or-string</a>: end&quot;</span>/imm32
<span id="L160" class="LineNr">160 </span> 68/push <span class="Constant">&quot;F - <a href='135next-word-or-string.subx.html#L102'>test-next-word-or-string</a>: end&quot;</span>/imm32
<span id="L161" class="LineNr">161 </span> 68/push 0x10/imm32
<span id="L162" class="LineNr">162 </span> <span class="subxS2Comment"># . . push slice-&gt;end - _test-input-stream</span>
<span id="L163" class="LineNr">163 </span> 8b/copy 1/mod/*+disp8 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ecx+4) to eax</span>
<span id="L164" class="LineNr">164 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L164" class="LineNr">164 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L165" class="LineNr">165 </span> 50/push-eax
<span id="L166" class="LineNr">166 </span> <span class="subxS2Comment"># . . call</span>
<span id="L167" class="LineNr">167 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L167" class="LineNr">167 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L168" class="LineNr">168 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L169" class="LineNr">169 </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="L170" class="LineNr">170 </span> <span class="subxS1Comment"># . epilogue</span>
@ -238,9 +238,9 @@ if ('onhashchange' in window) {
<span id="L179" class="LineNr">179 </span> <span class="subxComment"># setup</span>
<span id="L180" class="LineNr">180 </span> <span class="subxS1Comment"># . clear-stream(_test-input-stream)</span>
<span id="L181" class="LineNr">181 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L182" class="LineNr">182 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L182" class="LineNr">182 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L183" class="LineNr">183 </span> <span class="subxS2Comment"># . . call</span>
<span id="L184" class="LineNr">184 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L184" class="LineNr">184 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L185" class="LineNr">185 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L186" class="LineNr">186 </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="L187" class="LineNr">187 </span> <span class="subxComment"># var slice/ecx: slice</span>
@ -250,53 +250,53 @@ if ('onhashchange' in window) {
<span id="L191" class="LineNr">191 </span> <span class="subxComment"># write(_test-input-stream, &quot; # a&quot;)</span>
<span id="L192" class="LineNr">192 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L193" class="LineNr">193 </span> 68/push <span class="Constant">&quot; # a&quot;</span>/imm32
<span id="L194" class="LineNr">194 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L194" class="LineNr">194 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L195" class="LineNr">195 </span> <span class="subxS2Comment"># . . call</span>
<span id="L196" class="LineNr">196 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L196" class="LineNr">196 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L197" class="LineNr">197 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L198" class="LineNr">198 </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="L199" class="LineNr">199 </span> <span class="subxComment"># next-word-or-string(_test-input-stream, slice)</span>
<span id="L200" class="LineNr">200 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L201" class="LineNr">201 </span> 51/push-ecx
<span id="L202" class="LineNr">202 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L202" class="LineNr">202 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L203" class="LineNr">203 </span> <span class="subxS2Comment"># . . call</span>
<span id="L204" class="LineNr">204 </span> e8/call <a href='085next-word-or-string.subx.html#L8'>next-word-or-string</a>/disp32
<span id="L204" class="LineNr">204 </span> e8/call <a href='135next-word-or-string.subx.html#L8'>next-word-or-string</a>/disp32
<span id="L205" class="LineNr">205 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L206" class="LineNr">206 </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="L207" class="LineNr">207 </span> <span class="subxComment"># check-ints-equal(_test-input-stream-&gt;read, 5, msg)</span>
<span id="L208" class="LineNr">208 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L209" class="LineNr">209 </span> 68/push <span class="Constant">&quot;F - <a href='085next-word-or-string.subx.html#L175'>test-next-word-or-string-returns-whole-comment</a>/updates-stream-read-correctly&quot;</span>/imm32
<span id="L209" class="LineNr">209 </span> 68/push <span class="Constant">&quot;F - <a href='135next-word-or-string.subx.html#L175'>test-next-word-or-string-returns-whole-comment</a>/updates-stream-read-correctly&quot;</span>/imm32
<span id="L210" class="LineNr">210 </span> 68/push 5/imm32
<span id="L211" class="LineNr">211 </span> b8/copy-to-eax <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L211" class="LineNr">211 </span> b8/copy-to-eax <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L212" class="LineNr">212 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+4)</span>
<span id="L213" class="LineNr">213 </span> <span class="subxS2Comment"># . . call</span>
<span id="L214" class="LineNr">214 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L214" class="LineNr">214 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L215" class="LineNr">215 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L216" class="LineNr">216 </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="L217" class="LineNr">217 </span> <span class="subxComment"># check-ints-equal(slice-&gt;start - _test-input-stream-&gt;data, 2, msg)</span>
<span id="L218" class="LineNr">218 </span> <span class="subxS1Comment"># . check-ints-equal(slice-&gt;start - _test-input-stream, 14, msg)</span>
<span id="L219" class="LineNr">219 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L220" class="LineNr">220 </span> 68/push <span class="Constant">&quot;F - <a href='085next-word-or-string.subx.html#L175'>test-next-word-or-string-returns-whole-comment</a>: start&quot;</span>/imm32
<span id="L220" class="LineNr">220 </span> 68/push <span class="Constant">&quot;F - <a href='135next-word-or-string.subx.html#L175'>test-next-word-or-string-returns-whole-comment</a>: start&quot;</span>/imm32
<span id="L221" class="LineNr">221 </span> 68/push 0xe/imm32
<span id="L222" class="LineNr">222 </span> <span class="subxS2Comment"># . . push slice-&gt;start - _test-input-stream</span>
<span id="L223" class="LineNr">223 </span> 8b/copy 0/mod/indirect 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy *ecx to eax</span>
<span id="L224" class="LineNr">224 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L224" class="LineNr">224 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L225" class="LineNr">225 </span> 50/push-eax
<span id="L226" class="LineNr">226 </span> <span class="subxS2Comment"># . . call</span>
<span id="L227" class="LineNr">227 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L227" class="LineNr">227 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L228" class="LineNr">228 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L229" class="LineNr">229 </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="L230" class="LineNr">230 </span> <span class="subxComment"># check-ints-equal(slice-&gt;end - _test-input-stream-&gt;data, 5, msg)</span>
<span id="L231" class="LineNr">231 </span> <span class="subxS1Comment"># . check-ints-equal(slice-&gt;end - _test-input-stream, 17, msg)</span>
<span id="L232" class="LineNr">232 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L233" class="LineNr">233 </span> 68/push <span class="Constant">&quot;F - <a href='085next-word-or-string.subx.html#L175'>test-next-word-or-string-returns-whole-comment</a>: end&quot;</span>/imm32
<span id="L233" class="LineNr">233 </span> 68/push <span class="Constant">&quot;F - <a href='135next-word-or-string.subx.html#L175'>test-next-word-or-string-returns-whole-comment</a>: end&quot;</span>/imm32
<span id="L234" class="LineNr">234 </span> 68/push 0x11/imm32
<span id="L235" class="LineNr">235 </span> <span class="subxS2Comment"># . . push slice-&gt;end - _test-input-stream</span>
<span id="L236" class="LineNr">236 </span> 8b/copy 1/mod/*+disp8 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ecx+4) to eax</span>
<span id="L237" class="LineNr">237 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L237" class="LineNr">237 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L238" class="LineNr">238 </span> 50/push-eax
<span id="L239" class="LineNr">239 </span> <span class="subxS2Comment"># . . call</span>
<span id="L240" class="LineNr">240 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L240" class="LineNr">240 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L241" class="LineNr">241 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L242" class="LineNr">242 </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="L243" class="LineNr">243 </span> <span class="subxS1Comment"># . epilogue</span>
@ -311,9 +311,9 @@ if ('onhashchange' in window) {
<span id="L252" class="LineNr">252 </span> <span class="subxComment"># setup</span>
<span id="L253" class="LineNr">253 </span> <span class="subxS1Comment"># . clear-stream(_test-input-stream)</span>
<span id="L254" class="LineNr">254 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L255" class="LineNr">255 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L255" class="LineNr">255 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L256" class="LineNr">256 </span> <span class="subxS2Comment"># . . call</span>
<span id="L257" class="LineNr">257 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L257" class="LineNr">257 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L258" class="LineNr">258 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L259" class="LineNr">259 </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="L260" class="LineNr">260 </span> <span class="subxComment"># var slice/ecx: slice</span>
@ -324,9 +324,9 @@ if ('onhashchange' in window) {
<span id="L265" class="LineNr">265 </span> <span class="subxComment"># next-word-or-string(_test-input-stream, slice)</span>
<span id="L266" class="LineNr">266 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L267" class="LineNr">267 </span> 51/push-ecx
<span id="L268" class="LineNr">268 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L268" class="LineNr">268 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L269" class="LineNr">269 </span> <span class="subxS2Comment"># . . call</span>
<span id="L270" class="LineNr">270 </span> e8/call <a href='085next-word-or-string.subx.html#L8'>next-word-or-string</a>/disp32
<span id="L270" class="LineNr">270 </span> e8/call <a href='135next-word-or-string.subx.html#L8'>next-word-or-string</a>/disp32
<span id="L271" class="LineNr">271 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L272" class="LineNr">272 </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="L273" class="LineNr">273 </span> <span class="subxComment"># check-ints-equal(slice-&gt;end - slice-&gt;start, 0, msg)</span>
@ -338,7 +338,7 @@ if ('onhashchange' in window) {
<span id="L279" class="LineNr">279 </span> 2b/subtract 0/mod/indirect 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># subtract *ecx from eax</span>
<span id="L280" class="LineNr">280 </span> 50/push-eax
<span id="L281" class="LineNr">281 </span> <span class="subxS2Comment"># . . call</span>
<span id="L282" class="LineNr">282 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L282" class="LineNr">282 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L283" class="LineNr">283 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L284" class="LineNr">284 </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="L285" class="LineNr">285 </span> <span class="subxS1Comment"># . epilogue</span>
@ -353,9 +353,9 @@ if ('onhashchange' in window) {
<span id="L294" class="LineNr">294 </span> <span class="subxComment"># setup</span>
<span id="L295" class="LineNr">295 </span> <span class="subxS1Comment"># . clear-stream(_test-input-stream)</span>
<span id="L296" class="LineNr">296 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L297" class="LineNr">297 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L297" class="LineNr">297 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L298" class="LineNr">298 </span> <span class="subxS2Comment"># . . call</span>
<span id="L299" class="LineNr">299 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L299" class="LineNr">299 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L300" class="LineNr">300 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L301" class="LineNr">301 </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="L302" class="LineNr">302 </span> <span class="subxComment"># var slice/ecx: slice</span>
@ -365,43 +365,43 @@ if ('onhashchange' in window) {
<span id="L306" class="LineNr">306 </span> <span class="subxComment"># write(_test-input-stream, &quot; \&quot;a b\&quot;/imm32 &quot;)</span>
<span id="L307" class="LineNr">307 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L308" class="LineNr">308 </span> 68/push <span class="Constant">&quot; \&quot;</span>a b\<span class="Constant">&quot;/imm32 &quot;</span>/imm32
<span id="L309" class="LineNr">309 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L309" class="LineNr">309 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L310" class="LineNr">310 </span> <span class="subxS2Comment"># . . call</span>
<span id="L311" class="LineNr">311 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L311" class="LineNr">311 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L312" class="LineNr">312 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L313" class="LineNr">313 </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="L314" class="LineNr">314 </span> <span class="subxComment"># next-word-or-string(_test-input-stream, slice)</span>
<span id="L315" class="LineNr">315 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L316" class="LineNr">316 </span> 51/push-ecx
<span id="L317" class="LineNr">317 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L317" class="LineNr">317 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L318" class="LineNr">318 </span> <span class="subxS2Comment"># . . call</span>
<span id="L319" class="LineNr">319 </span> e8/call <a href='085next-word-or-string.subx.html#L8'>next-word-or-string</a>/disp32
<span id="L319" class="LineNr">319 </span> e8/call <a href='135next-word-or-string.subx.html#L8'>next-word-or-string</a>/disp32
<span id="L320" class="LineNr">320 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L321" class="LineNr">321 </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="L322" class="LineNr">322 </span> <span class="subxComment"># check-ints-equal(slice-&gt;start - _test-input-stream-&gt;data, 1, msg)</span>
<span id="L323" class="LineNr">323 </span> <span class="subxS1Comment"># . check-ints-equal(slice-&gt;start - _test-input-stream, 13, msg)</span>
<span id="L324" class="LineNr">324 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L325" class="LineNr">325 </span> 68/push <span class="Constant">&quot;F - <a href='085next-word-or-string.subx.html#L290'>test-next-word-or-string-returns-string-literal</a>: start&quot;</span>/imm32
<span id="L325" class="LineNr">325 </span> 68/push <span class="Constant">&quot;F - <a href='135next-word-or-string.subx.html#L290'>test-next-word-or-string-returns-string-literal</a>: start&quot;</span>/imm32
<span id="L326" class="LineNr">326 </span> 68/push 0xd/imm32
<span id="L327" class="LineNr">327 </span> <span class="subxS2Comment"># . . push slice-&gt;start - _test-input-stream</span>
<span id="L328" class="LineNr">328 </span> 8b/copy 0/mod/indirect 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy *ecx to eax</span>
<span id="L329" class="LineNr">329 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L329" class="LineNr">329 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L330" class="LineNr">330 </span> 50/push-eax
<span id="L331" class="LineNr">331 </span> <span class="subxS2Comment"># . . call</span>
<span id="L332" class="LineNr">332 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L332" class="LineNr">332 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L333" class="LineNr">333 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L334" class="LineNr">334 </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="L335" class="LineNr">335 </span> <span class="subxComment"># check-ints-equal(slice-&gt;end - _test-input-stream-&gt;data, 12, msg)</span>
<span id="L336" class="LineNr">336 </span> <span class="subxS1Comment"># . check-ints-equal(slice-&gt;end - _test-input-stream, 24, msg)</span>
<span id="L337" class="LineNr">337 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L338" class="LineNr">338 </span> 68/push <span class="Constant">&quot;F - <a href='085next-word-or-string.subx.html#L290'>test-next-word-or-string-returns-string-literal</a>: end&quot;</span>/imm32
<span id="L338" class="LineNr">338 </span> 68/push <span class="Constant">&quot;F - <a href='135next-word-or-string.subx.html#L290'>test-next-word-or-string-returns-string-literal</a>: end&quot;</span>/imm32
<span id="L339" class="LineNr">339 </span> 68/push 0x18/imm32
<span id="L340" class="LineNr">340 </span> <span class="subxS2Comment"># . . push slice-&gt;end - _test-input-stream</span>
<span id="L341" class="LineNr">341 </span> 8b/copy 1/mod/*+disp8 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ecx+4) to eax</span>
<span id="L342" class="LineNr">342 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L342" class="LineNr">342 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L343" class="LineNr">343 </span> 50/push-eax
<span id="L344" class="LineNr">344 </span> <span class="subxS2Comment"># . . call</span>
<span id="L345" class="LineNr">345 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L345" class="LineNr">345 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L346" class="LineNr">346 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L347" class="LineNr">347 </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="L348" class="LineNr">348 </span> <span class="subxS1Comment"># . epilogue</span>
@ -416,9 +416,9 @@ if ('onhashchange' in window) {
<span id="L357" class="LineNr">357 </span> <span class="subxComment"># setup</span>
<span id="L358" class="LineNr">358 </span> <span class="subxS1Comment"># . clear-stream(_test-input-stream)</span>
<span id="L359" class="LineNr">359 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L360" class="LineNr">360 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L360" class="LineNr">360 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L361" class="LineNr">361 </span> <span class="subxS2Comment"># . . call</span>
<span id="L362" class="LineNr">362 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L362" class="LineNr">362 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L363" class="LineNr">363 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L364" class="LineNr">364 </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="L365" class="LineNr">365 </span> <span class="subxComment"># var slice/ecx: slice</span>
@ -428,43 +428,43 @@ if ('onhashchange' in window) {
<span id="L369" class="LineNr">369 </span> <span class="subxComment"># write(_test-input-stream, &quot; \&quot;a\\\&quot;b\&quot;/x&quot;)</span>
<span id="L370" class="LineNr">370 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L371" class="LineNr">371 </span> 68/push <span class="Constant">&quot; \&quot;</span>a\\\<span class="Constant">&quot;b\&quot;</span>/x&quot;/imm32
<span id="L372" class="LineNr">372 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L372" class="LineNr">372 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L373" class="LineNr">373 </span> <span class="subxS2Comment"># . . call</span>
<span id="L374" class="LineNr">374 </span> e8/call <a href='057write.subx.html#L24'>write</a>/disp32
<span id="L374" class="LineNr">374 </span> e8/call <a href='108write.subx.html#L24'>write</a>/disp32
<span id="L375" class="LineNr">375 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L376" class="LineNr">376 </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="L377" class="LineNr">377 </span> <span class="subxComment"># next-word-or-string(_test-input-stream, slice)</span>
<span id="L378" class="LineNr">378 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L379" class="LineNr">379 </span> 51/push-ecx
<span id="L380" class="LineNr">380 </span> 68/push <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L380" class="LineNr">380 </span> 68/push <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L381" class="LineNr">381 </span> <span class="subxS2Comment"># . . call</span>
<span id="L382" class="LineNr">382 </span> e8/call <a href='085next-word-or-string.subx.html#L8'>next-word-or-string</a>/disp32
<span id="L382" class="LineNr">382 </span> e8/call <a href='135next-word-or-string.subx.html#L8'>next-word-or-string</a>/disp32
<span id="L383" class="LineNr">383 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L384" class="LineNr">384 </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="L385" class="LineNr">385 </span> <span class="subxComment"># check-ints-equal(slice-&gt;start - _test-input-stream-&gt;data, 1, msg)</span>
<span id="L386" class="LineNr">386 </span> <span class="subxS1Comment"># . check-ints-equal(slice-&gt;start - _test-input-stream, 13, msg)</span>
<span id="L387" class="LineNr">387 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L388" class="LineNr">388 </span> 68/push <span class="Constant">&quot;F - <a href='085next-word-or-string.subx.html#L353'>test-next-word-or-string-returns-string-with-escapes</a>: start&quot;</span>/imm32
<span id="L388" class="LineNr">388 </span> 68/push <span class="Constant">&quot;F - <a href='135next-word-or-string.subx.html#L353'>test-next-word-or-string-returns-string-with-escapes</a>: start&quot;</span>/imm32
<span id="L389" class="LineNr">389 </span> 68/push 0xd/imm32
<span id="L390" class="LineNr">390 </span> <span class="subxS2Comment"># . . push slice-&gt;start - _test-input-stream</span>
<span id="L391" class="LineNr">391 </span> 8b/copy 0/mod/indirect 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy *ecx to eax</span>
<span id="L392" class="LineNr">392 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L392" class="LineNr">392 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L393" class="LineNr">393 </span> 50/push-eax
<span id="L394" class="LineNr">394 </span> <span class="subxS2Comment"># . . call</span>
<span id="L395" class="LineNr">395 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L395" class="LineNr">395 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L396" class="LineNr">396 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L397" class="LineNr">397 </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="L398" class="LineNr">398 </span> <span class="subxComment"># check-ints-equal(slice-&gt;end - _test-input-stream-&gt;data, 9, msg)</span>
<span id="L399" class="LineNr">399 </span> <span class="subxS1Comment"># . check-ints-equal(slice-&gt;end - _test-input-stream, 21, msg)</span>
<span id="L400" class="LineNr">400 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L401" class="LineNr">401 </span> 68/push <span class="Constant">&quot;F - <a href='085next-word-or-string.subx.html#L353'>test-next-word-or-string-returns-string-with-escapes</a>: end&quot;</span>/imm32
<span id="L401" class="LineNr">401 </span> 68/push <span class="Constant">&quot;F - <a href='135next-word-or-string.subx.html#L353'>test-next-word-or-string-returns-string-with-escapes</a>: end&quot;</span>/imm32
<span id="L402" class="LineNr">402 </span> 68/push 0x15/imm32
<span id="L403" class="LineNr">403 </span> <span class="subxS2Comment"># . . push slice-&gt;end - _test-input-stream</span>
<span id="L404" class="LineNr">404 </span> 8b/copy 1/mod/*+disp8 1/rm32/ecx <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 0/r32/eax 4/disp8 <span class="Normal"> . </span> <span class="subxComment"># copy *(ecx+4) to eax</span>
<span id="L405" class="LineNr">405 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='061read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L405" class="LineNr">405 </span> 81 5/subop/subtract 3/mod/direct 0/rm32/eax <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <a href='112read-byte.subx.html#L287'>_test-input-stream</a>/imm32 <span class="subxComment"># subtract from eax</span>
<span id="L406" class="LineNr">406 </span> 50/push-eax
<span id="L407" class="LineNr">407 </span> <span class="subxS2Comment"># . . call</span>
<span id="L408" class="LineNr">408 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L408" class="LineNr">408 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L409" class="LineNr">409 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L410" class="LineNr">410 </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="L411" class="LineNr">411 </span> <span class="subxS1Comment"># . epilogue</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 090register-names.subx</title>
<title>Mu - 201register-names.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -51,7 +51,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/090register-names.subx'>https://github.com/akkartik/mu/blob/master/090register-names.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/201register-names.subx'>https://github.com/akkartik/mu/blob/master/201register-names.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span>== data
<span id="L2" class="LineNr"> 2 </span><span class="SpecialChar">Registers</span>: <span class="subxComment"># (addr stream {(handle array byte), int})</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 091write-int.subx</title>
<title>Mu - 202write-int.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -56,7 +56,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/091write-int.subx'>https://github.com/akkartik/mu/blob/master/091write-int.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/202write-int.subx'>https://github.com/akkartik/mu/blob/master/202write-int.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># write-int: add (the binary representation of) a single int to a stream</span>
<span id="L2" class="LineNr"> 2 </span>
@ -102,7 +102,7 @@ if ('onhashchange' in window) {
<span id="L42" class="LineNr"> 42 </span> 68/push <span class="Constant">&quot;write-int: out of space\n&quot;</span>/imm32
<span id="L43" class="LineNr"> 43 </span> 68/push 2/imm32/stderr
<span id="L44" class="LineNr"> 44 </span> <span class="subxS2Comment"># . . call</span>
<span id="L45" class="LineNr"> 45 </span> e8/call <a href='050_write.subx.html#L12'>_write</a>/disp32
<span id="L45" class="LineNr"> 45 </span> e8/call <a href='101_write.subx.html#L12'>_write</a>/disp32
<span id="L46" class="LineNr"> 46 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L47" class="LineNr"> 47 </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="L48" class="LineNr"> 48 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -115,26 +115,26 @@ if ('onhashchange' in window) {
<span id="L55" class="LineNr"> 55 </span> <span class="subxComment"># setup</span>
<span id="L56" class="LineNr"> 56 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L57" class="LineNr"> 57 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L58" class="LineNr"> 58 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L58" class="LineNr"> 58 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L59" class="LineNr"> 59 </span> <span class="subxS2Comment"># . . call</span>
<span id="L60" class="LineNr"> 60 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L60" class="LineNr"> 60 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L61" class="LineNr"> 61 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L62" class="LineNr"> 62 </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="L63" class="LineNr"> 63 </span> <span class="subxComment"># write-int(_test-stream, &quot;abcd&quot;)</span>
<span id="L64" class="LineNr"> 64 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L65" class="LineNr"> 65 </span> 68/push 0x64636261/imm32
<span id="L66" class="LineNr"> 66 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L66" class="LineNr"> 66 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L67" class="LineNr"> 67 </span> <span class="subxS2Comment"># . . call</span>
<span id="L68" class="LineNr"> 68 </span> e8/call <a href='091write-int.subx.html#L8'>write-int</a>/disp32
<span id="L68" class="LineNr"> 68 </span> e8/call <a href='202write-int.subx.html#L8'>write-int</a>/disp32
<span id="L69" class="LineNr"> 69 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L70" class="LineNr"> 70 </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="L71" class="LineNr"> 71 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;abcd&quot;, msg)</span>
<span id="L72" class="LineNr"> 72 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L73" class="LineNr"> 73 </span> 68/push <span class="Constant">&quot;F - test-write-int-single&quot;</span>/imm32
<span id="L74" class="LineNr"> 74 </span> 68/push <span class="Constant">&quot;abcd&quot;</span>/imm32
<span id="L75" class="LineNr"> 75 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L75" class="LineNr"> 75 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L76" class="LineNr"> 76 </span> <span class="subxS2Comment"># . . call</span>
<span id="L77" class="LineNr"> 77 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L77" class="LineNr"> 77 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L78" class="LineNr"> 78 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L79" class="LineNr"> 79 </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="L80" class="LineNr"> 80 </span> <span class="subxS1Comment"># . end</span>
@ -145,34 +145,34 @@ if ('onhashchange' in window) {
<span id="L85" class="LineNr"> 85 </span> <span class="subxComment"># setup</span>
<span id="L86" class="LineNr"> 86 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L87" class="LineNr"> 87 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L88" class="LineNr"> 88 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L88" class="LineNr"> 88 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L89" class="LineNr"> 89 </span> <span class="subxS2Comment"># . . call</span>
<span id="L90" class="LineNr"> 90 </span> e8/call <a href='055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L90" class="LineNr"> 90 </span> e8/call <a href='106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L91" class="LineNr"> 91 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L92" class="LineNr"> 92 </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="L93" class="LineNr"> 93 </span> <span class="subxComment"># write-int(_test-stream, &quot;abcd&quot;)</span>
<span id="L94" class="LineNr"> 94 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L95" class="LineNr"> 95 </span> 68/push 0x64636261/imm32
<span id="L96" class="LineNr"> 96 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L96" class="LineNr"> 96 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L97" class="LineNr"> 97 </span> <span class="subxS2Comment"># . . call</span>
<span id="L98" class="LineNr"> 98 </span> e8/call <a href='091write-int.subx.html#L8'>write-int</a>/disp32
<span id="L98" class="LineNr"> 98 </span> e8/call <a href='202write-int.subx.html#L8'>write-int</a>/disp32
<span id="L99" class="LineNr"> 99 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L100" class="LineNr">100 </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="L101" class="LineNr">101 </span> <span class="subxComment"># write-int(_test-stream, &quot;efgh&quot;)</span>
<span id="L102" class="LineNr">102 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L103" class="LineNr">103 </span> 68/push 0x68676665/imm32
<span id="L104" class="LineNr">104 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L104" class="LineNr">104 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L105" class="LineNr">105 </span> <span class="subxS2Comment"># . . call</span>
<span id="L106" class="LineNr">106 </span> e8/call <a href='091write-int.subx.html#L8'>write-int</a>/disp32
<span id="L106" class="LineNr">106 </span> e8/call <a href='202write-int.subx.html#L8'>write-int</a>/disp32
<span id="L107" class="LineNr">107 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L108" class="LineNr">108 </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="L109" class="LineNr">109 </span> <span class="subxComment"># check-stream-equal(_test-stream, &quot;abcdefgh&quot;, msg)</span>
<span id="L110" class="LineNr">110 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L111" class="LineNr">111 </span> 68/push <span class="Constant">&quot;F - test-write-byte-buffered-multiple&quot;</span>/imm32
<span id="L112" class="LineNr">112 </span> 68/push <span class="Constant">&quot;abcdefgh&quot;</span>/imm32
<span id="L113" class="LineNr">113 </span> 68/push <a href='057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L113" class="LineNr">113 </span> 68/push <a href='108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L114" class="LineNr">114 </span> <span class="subxS2Comment"># . . call</span>
<span id="L115" class="LineNr">115 </span> e8/call <a href='058stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L115" class="LineNr">115 </span> e8/call <a href='109stream-equal.subx.html#L194'>check-stream-equal</a>/disp32
<span id="L116" class="LineNr">116 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L117" class="LineNr">117 </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="L118" class="LineNr">118 </span> <span class="subxS1Comment"># . end</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 092stack.subx</title>
<title>Mu - 203stack.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -56,7 +56,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/092stack.subx'>https://github.com/akkartik/mu/blob/master/092stack.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/203stack.subx'>https://github.com/akkartik/mu/blob/master/203stack.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># A stack looks like this:</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># top: int</span>
@ -118,51 +118,51 @@ if ('onhashchange' in window) {
<span id="L58" class="LineNr"> 58 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L59" class="LineNr"> 59 </span> 51/push-ecx
<span id="L60" class="LineNr"> 60 </span> <span class="subxS2Comment"># . . call</span>
<span id="L61" class="LineNr"> 61 </span> e8/call <a href='092stack.subx.html#L13'>clear-stack</a>/disp32
<span id="L61" class="LineNr"> 61 </span> e8/call <a href='203stack.subx.html#L13'>clear-stack</a>/disp32
<span id="L62" class="LineNr"> 62 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L63" class="LineNr"> 63 </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="L64" class="LineNr"> 64 </span> <span class="subxComment"># top should be 0</span>
<span id="L65" class="LineNr"> 65 </span> 58/pop-to-eax
<span id="L66" class="LineNr"> 66 </span> <span class="subxS1Comment"># . check-ints-equal(eax, 0, msg)</span>
<span id="L67" class="LineNr"> 67 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L68" class="LineNr"> 68 </span> 68/push <span class="Constant">&quot;F - <a href='092stack.subx.html#L47'>test-clear-stack</a>: top&quot;</span>/imm32
<span id="L68" class="LineNr"> 68 </span> 68/push <span class="Constant">&quot;F - <a href='203stack.subx.html#L47'>test-clear-stack</a>: top&quot;</span>/imm32
<span id="L69" class="LineNr"> 69 </span> 68/push 0/imm32
<span id="L70" class="LineNr"> 70 </span> 50/push-eax
<span id="L71" class="LineNr"> 71 </span> <span class="subxS2Comment"># . . call</span>
<span id="L72" class="LineNr"> 72 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L72" class="LineNr"> 72 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L73" class="LineNr"> 73 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L74" class="LineNr"> 74 </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="L75" class="LineNr"> 75 </span> <span class="subxComment"># size should remain 8</span>
<span id="L76" class="LineNr"> 76 </span> 58/pop-to-eax
<span id="L77" class="LineNr"> 77 </span> <span class="subxS1Comment"># . check-ints-equal(eax, 8, msg)</span>
<span id="L78" class="LineNr"> 78 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L79" class="LineNr"> 79 </span> 68/push <span class="Constant">&quot;F - <a href='092stack.subx.html#L47'>test-clear-stack</a>: size&quot;</span>/imm32
<span id="L79" class="LineNr"> 79 </span> 68/push <span class="Constant">&quot;F - <a href='203stack.subx.html#L47'>test-clear-stack</a>: size&quot;</span>/imm32
<span id="L80" class="LineNr"> 80 </span> 68/push 8/imm32
<span id="L81" class="LineNr"> 81 </span> 50/push-eax
<span id="L82" class="LineNr"> 82 </span> <span class="subxS2Comment"># . . call</span>
<span id="L83" class="LineNr"> 83 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L83" class="LineNr"> 83 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L84" class="LineNr"> 84 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L85" class="LineNr"> 85 </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="L86" class="LineNr"> 86 </span> <span class="subxComment"># first word is 0</span>
<span id="L87" class="LineNr"> 87 </span> 58/pop-to-eax
<span id="L88" class="LineNr"> 88 </span> <span class="subxS1Comment"># . check-ints-equal(eax, 0, msg)</span>
<span id="L89" class="LineNr"> 89 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L90" class="LineNr"> 90 </span> 68/push <span class="Constant">&quot;F - <a href='092stack.subx.html#L47'>test-clear-stack</a>: data[0..3]&quot;</span>/imm32
<span id="L90" class="LineNr"> 90 </span> 68/push <span class="Constant">&quot;F - <a href='203stack.subx.html#L47'>test-clear-stack</a>: data[0..3]&quot;</span>/imm32
<span id="L91" class="LineNr"> 91 </span> 68/push 0/imm32
<span id="L92" class="LineNr"> 92 </span> 50/push-eax
<span id="L93" class="LineNr"> 93 </span> <span class="subxS2Comment"># . . call</span>
<span id="L94" class="LineNr"> 94 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L94" class="LineNr"> 94 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L95" class="LineNr"> 95 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L96" class="LineNr"> 96 </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="L97" class="LineNr"> 97 </span> <span class="subxComment"># second word is 0</span>
<span id="L98" class="LineNr"> 98 </span> 58/pop-to-eax
<span id="L99" class="LineNr"> 99 </span> <span class="subxS1Comment"># . check-ints-equal(eax, 0, msg)</span>
<span id="L100" class="LineNr">100 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L101" class="LineNr">101 </span> 68/push <span class="Constant">&quot;F - <a href='092stack.subx.html#L47'>test-clear-stack</a>: data[4..7]&quot;</span>/imm32
<span id="L101" class="LineNr">101 </span> 68/push <span class="Constant">&quot;F - <a href='203stack.subx.html#L47'>test-clear-stack</a>: data[4..7]&quot;</span>/imm32
<span id="L102" class="LineNr">102 </span> 68/push 0/imm32
<span id="L103" class="LineNr">103 </span> 50/push-eax
<span id="L104" class="LineNr">104 </span> <span class="subxS2Comment"># . . call</span>
<span id="L105" class="LineNr">105 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L105" class="LineNr">105 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L106" class="LineNr">106 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L107" class="LineNr">107 </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="L108" class="LineNr">108 </span> <span class="subxS1Comment"># . epilogue</span>
@ -205,17 +205,17 @@ if ('onhashchange' in window) {
<span id="L145" class="LineNr">145 </span> <span class="subxComment"># print(stderr, &quot;error: push: no space left&quot;)</span>
<span id="L146" class="LineNr">146 </span> <span class="subxS1Comment"># . write-buffered(Stderr, &quot;error: push: no space left&quot;)</span>
<span id="L147" class="LineNr">147 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L148" class="LineNr">148 </span> 68/push <span class="Constant">&quot;error: <a href='092stack.subx.html#L114'>push</a>: no space left&quot;</span>/imm32
<span id="L149" class="LineNr">149 </span> 68/push <span class="SpecialChar"><a href='065write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L148" class="LineNr">148 </span> 68/push <span class="Constant">&quot;error: <a href='203stack.subx.html#L114'>push</a>: no space left&quot;</span>/imm32
<span id="L149" class="LineNr">149 </span> 68/push <span class="SpecialChar"><a href='116write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L150" class="LineNr">150 </span> <span class="subxS2Comment"># . . call</span>
<span id="L151" class="LineNr">151 </span> e8/call <a href='065write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L151" class="LineNr">151 </span> e8/call <a href='116write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L152" class="LineNr">152 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L153" class="LineNr">153 </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="L154" class="LineNr">154 </span> <span class="subxS1Comment"># . flush(Stderr)</span>
<span id="L155" class="LineNr">155 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L156" class="LineNr">156 </span> 68/push <span class="SpecialChar"><a href='065write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L156" class="LineNr">156 </span> 68/push <span class="SpecialChar"><a href='116write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L157" class="LineNr">157 </span> <span class="subxS2Comment"># . . call</span>
<span id="L158" class="LineNr">158 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L158" class="LineNr">158 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L159" class="LineNr">159 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L160" class="LineNr">160 </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="L161" class="LineNr">161 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -238,51 +238,51 @@ if ('onhashchange' in window) {
<span id="L178" class="LineNr">178 </span> 68/push 0x42/imm32
<span id="L179" class="LineNr">179 </span> 51/push-ecx
<span id="L180" class="LineNr">180 </span> <span class="subxS2Comment"># . . call</span>
<span id="L181" class="LineNr">181 </span> e8/call <a href='092stack.subx.html#L114'>push</a>/disp32
<span id="L181" class="LineNr">181 </span> e8/call <a href='203stack.subx.html#L114'>push</a>/disp32
<span id="L182" class="LineNr">182 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L183" class="LineNr">183 </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="L184" class="LineNr">184 </span> <span class="subxComment"># check top</span>
<span id="L185" class="LineNr">185 </span> 58/pop-to-eax
<span id="L186" class="LineNr">186 </span> <span class="subxS1Comment"># . check-ints-equal(eax, 4, msg)</span>
<span id="L187" class="LineNr">187 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L188" class="LineNr">188 </span> 68/push <span class="Constant">&quot;F - <a href='092stack.subx.html#L166'>test-push</a>: top&quot;</span>/imm32
<span id="L188" class="LineNr">188 </span> 68/push <span class="Constant">&quot;F - <a href='203stack.subx.html#L166'>test-push</a>: top&quot;</span>/imm32
<span id="L189" class="LineNr">189 </span> 68/push 4/imm32
<span id="L190" class="LineNr">190 </span> 50/push-eax
<span id="L191" class="LineNr">191 </span> <span class="subxS2Comment"># . . call</span>
<span id="L192" class="LineNr">192 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L192" class="LineNr">192 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L193" class="LineNr">193 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L194" class="LineNr">194 </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="L195" class="LineNr">195 </span> <span class="subxComment"># check size</span>
<span id="L196" class="LineNr">196 </span> 58/pop-to-eax
<span id="L197" class="LineNr">197 </span> <span class="subxS1Comment"># . check-ints-equal(eax, 8, msg)</span>
<span id="L198" class="LineNr">198 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L199" class="LineNr">199 </span> 68/push <span class="Constant">&quot;F - <a href='092stack.subx.html#L166'>test-push</a>: size&quot;</span>/imm32
<span id="L199" class="LineNr">199 </span> 68/push <span class="Constant">&quot;F - <a href='203stack.subx.html#L166'>test-push</a>: size&quot;</span>/imm32
<span id="L200" class="LineNr">200 </span> 68/push 8/imm32
<span id="L201" class="LineNr">201 </span> 50/push-eax
<span id="L202" class="LineNr">202 </span> <span class="subxS2Comment"># . . call</span>
<span id="L203" class="LineNr">203 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L203" class="LineNr">203 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L204" class="LineNr">204 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L205" class="LineNr">205 </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="L206" class="LineNr">206 </span> <span class="subxComment"># first word is 0x42</span>
<span id="L207" class="LineNr">207 </span> 58/pop-to-eax
<span id="L208" class="LineNr">208 </span> <span class="subxS1Comment"># . check-ints-equal(eax, 0x42, msg)</span>
<span id="L209" class="LineNr">209 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L210" class="LineNr">210 </span> 68/push <span class="Constant">&quot;F - <a href='092stack.subx.html#L166'>test-push</a>: data[0..3]&quot;</span>/imm32
<span id="L210" class="LineNr">210 </span> 68/push <span class="Constant">&quot;F - <a href='203stack.subx.html#L166'>test-push</a>: data[0..3]&quot;</span>/imm32
<span id="L211" class="LineNr">211 </span> 68/push 0x42/imm32
<span id="L212" class="LineNr">212 </span> 50/push-eax
<span id="L213" class="LineNr">213 </span> <span class="subxS2Comment"># . . call</span>
<span id="L214" class="LineNr">214 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L214" class="LineNr">214 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L215" class="LineNr">215 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L216" class="LineNr">216 </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="L217" class="LineNr">217 </span> <span class="subxComment"># second word is 0</span>
<span id="L218" class="LineNr">218 </span> 58/pop-to-eax
<span id="L219" class="LineNr">219 </span> <span class="subxS1Comment"># . check-ints-equal(eax, 0, msg)</span>
<span id="L220" class="LineNr">220 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L221" class="LineNr">221 </span> 68/push <span class="Constant">&quot;F - <a href='092stack.subx.html#L166'>test-push</a>: data[4..7]&quot;</span>/imm32
<span id="L221" class="LineNr">221 </span> 68/push <span class="Constant">&quot;F - <a href='203stack.subx.html#L166'>test-push</a>: data[4..7]&quot;</span>/imm32
<span id="L222" class="LineNr">222 </span> 68/push 0/imm32
<span id="L223" class="LineNr">223 </span> 50/push-eax
<span id="L224" class="LineNr">224 </span> <span class="subxS2Comment"># . . call</span>
<span id="L225" class="LineNr">225 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L225" class="LineNr">225 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L226" class="LineNr">226 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L227" class="LineNr">227 </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="L228" class="LineNr">228 </span> <span class="subxS1Comment"># . epilogue</span>
@ -323,17 +323,17 @@ if ('onhashchange' in window) {
<span id="L263" class="LineNr">263 </span> <span class="subxComment"># print(stderr, &quot;error: pop: nothing left in stack&quot;)</span>
<span id="L264" class="LineNr">264 </span> <span class="subxS1Comment"># . write-buffered(Stderr, &quot;error: pop: nothing left in stack&quot;)</span>
<span id="L265" class="LineNr">265 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L266" class="LineNr">266 </span> 68/push <span class="Constant">&quot;error: <a href='092stack.subx.html#L234'>pop</a>: nothing left in stack&quot;</span>/imm32
<span id="L267" class="LineNr">267 </span> 68/push <span class="SpecialChar"><a href='065write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L266" class="LineNr">266 </span> 68/push <span class="Constant">&quot;error: <a href='203stack.subx.html#L234'>pop</a>: nothing left in stack&quot;</span>/imm32
<span id="L267" class="LineNr">267 </span> 68/push <span class="SpecialChar"><a href='116write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L268" class="LineNr">268 </span> <span class="subxS2Comment"># . . call</span>
<span id="L269" class="LineNr">269 </span> e8/call <a href='065write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L269" class="LineNr">269 </span> e8/call <a href='116write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L270" class="LineNr">270 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L271" class="LineNr">271 </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="L272" class="LineNr">272 </span> <span class="subxS1Comment"># . flush(Stderr)</span>
<span id="L273" class="LineNr">273 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L274" class="LineNr">274 </span> 68/push <span class="SpecialChar"><a href='065write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L274" class="LineNr">274 </span> 68/push <span class="SpecialChar"><a href='116write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L275" class="LineNr">275 </span> <span class="subxS2Comment"># . . call</span>
<span id="L276" class="LineNr">276 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L276" class="LineNr">276 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L277" class="LineNr">277 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L278" class="LineNr">278 </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="L279" class="LineNr">279 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -355,38 +355,38 @@ if ('onhashchange' in window) {
<span id="L295" class="LineNr">295 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L296" class="LineNr">296 </span> 51/push-ecx
<span id="L297" class="LineNr">297 </span> <span class="subxS2Comment"># . . call</span>
<span id="L298" class="LineNr">298 </span> e8/call <a href='092stack.subx.html#L234'>pop</a>/disp32
<span id="L298" class="LineNr">298 </span> e8/call <a href='203stack.subx.html#L234'>pop</a>/disp32
<span id="L299" class="LineNr">299 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L300" class="LineNr">300 </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="L301" class="LineNr">301 </span> <span class="subxComment"># check-ints-equal(eax, 0x42, msg)</span>
<span id="L302" class="LineNr">302 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L303" class="LineNr">303 </span> 68/push <span class="Constant">&quot;F - <a href='092stack.subx.html#L284'>test-pop</a>: result&quot;</span>/imm32
<span id="L303" class="LineNr">303 </span> 68/push <span class="Constant">&quot;F - <a href='203stack.subx.html#L284'>test-pop</a>: result&quot;</span>/imm32
<span id="L304" class="LineNr">304 </span> 68/push 0x42/imm32
<span id="L305" class="LineNr">305 </span> 50/push-eax
<span id="L306" class="LineNr">306 </span> <span class="subxS2Comment"># . . call</span>
<span id="L307" class="LineNr">307 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L307" class="LineNr">307 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L308" class="LineNr">308 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L309" class="LineNr">309 </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="L310" class="LineNr">310 </span> <span class="subxComment"># check top</span>
<span id="L311" class="LineNr">311 </span> 58/pop-to-eax
<span id="L312" class="LineNr">312 </span> <span class="subxS1Comment"># . check-ints-equal(eax, 0, msg)</span>
<span id="L313" class="LineNr">313 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L314" class="LineNr">314 </span> 68/push <span class="Constant">&quot;F - <a href='092stack.subx.html#L284'>test-pop</a>: top&quot;</span>/imm32
<span id="L314" class="LineNr">314 </span> 68/push <span class="Constant">&quot;F - <a href='203stack.subx.html#L284'>test-pop</a>: top&quot;</span>/imm32
<span id="L315" class="LineNr">315 </span> 68/push 0/imm32
<span id="L316" class="LineNr">316 </span> 50/push-eax
<span id="L317" class="LineNr">317 </span> <span class="subxS2Comment"># . . call</span>
<span id="L318" class="LineNr">318 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L318" class="LineNr">318 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L319" class="LineNr">319 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L320" class="LineNr">320 </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="L321" class="LineNr">321 </span> <span class="subxComment"># check size</span>
<span id="L322" class="LineNr">322 </span> 58/pop-to-eax
<span id="L323" class="LineNr">323 </span> <span class="subxS1Comment"># . check-ints-equal(eax, 8, msg)</span>
<span id="L324" class="LineNr">324 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L325" class="LineNr">325 </span> 68/push <span class="Constant">&quot;F - <a href='092stack.subx.html#L284'>test-pop</a>: size&quot;</span>/imm32
<span id="L325" class="LineNr">325 </span> 68/push <span class="Constant">&quot;F - <a href='203stack.subx.html#L284'>test-pop</a>: size&quot;</span>/imm32
<span id="L326" class="LineNr">326 </span> 68/push 8/imm32
<span id="L327" class="LineNr">327 </span> 50/push-eax
<span id="L328" class="LineNr">328 </span> <span class="subxS2Comment"># . . call</span>
<span id="L329" class="LineNr">329 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L329" class="LineNr">329 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L330" class="LineNr">330 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L331" class="LineNr">331 </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="L332" class="LineNr">332 </span> <span class="subxS1Comment"># . epilogue</span>
@ -424,17 +424,17 @@ if ('onhashchange' in window) {
<span id="L364" class="LineNr">364 </span> <span class="subxComment"># print(stderr, &quot;error: top: nothing left in stack&quot;)</span>
<span id="L365" class="LineNr">365 </span> <span class="subxS1Comment"># . write-buffered(Stderr, &quot;error: top: nothing left in stack&quot;)</span>
<span id="L366" class="LineNr">366 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L367" class="LineNr">367 </span> 68/push <span class="Constant">&quot;error: <a href='092stack.subx.html#L338'>top</a>: nothing left in stack&quot;</span>/imm32
<span id="L368" class="LineNr">368 </span> 68/push <span class="SpecialChar"><a href='065write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L367" class="LineNr">367 </span> 68/push <span class="Constant">&quot;error: <a href='203stack.subx.html#L338'>top</a>: nothing left in stack&quot;</span>/imm32
<span id="L368" class="LineNr">368 </span> 68/push <span class="SpecialChar"><a href='116write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L369" class="LineNr">369 </span> <span class="subxS2Comment"># . . call</span>
<span id="L370" class="LineNr">370 </span> e8/call <a href='065write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L370" class="LineNr">370 </span> e8/call <a href='116write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L371" class="LineNr">371 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L372" class="LineNr">372 </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="L373" class="LineNr">373 </span> <span class="subxS1Comment"># . flush(Stderr)</span>
<span id="L374" class="LineNr">374 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L375" class="LineNr">375 </span> 68/push <span class="SpecialChar"><a href='065write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L375" class="LineNr">375 </span> 68/push <span class="SpecialChar"><a href='116write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L376" class="LineNr">376 </span> <span class="subxS2Comment"># . . call</span>
<span id="L377" class="LineNr">377 </span> e8/call <a href='064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L377" class="LineNr">377 </span> e8/call <a href='115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L378" class="LineNr">378 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L379" class="LineNr">379 </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="L380" class="LineNr">380 </span> <span class="subxS1Comment"># . syscall(exit, 1)</span>
@ -456,16 +456,16 @@ if ('onhashchange' in window) {
<span id="L396" class="LineNr">396 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L397" class="LineNr">397 </span> 51/push-ecx
<span id="L398" class="LineNr">398 </span> <span class="subxS2Comment"># . . call</span>
<span id="L399" class="LineNr">399 </span> e8/call <a href='092stack.subx.html#L338'>top</a>/disp32
<span id="L399" class="LineNr">399 </span> e8/call <a href='203stack.subx.html#L338'>top</a>/disp32
<span id="L400" class="LineNr">400 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L401" class="LineNr">401 </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="L402" class="LineNr">402 </span> <span class="subxComment"># check-ints-equal(eax, 42, msg&quot;)</span>
<span id="L403" class="LineNr">403 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L404" class="LineNr">404 </span> 68/push <span class="Constant">&quot;F - <a href='092stack.subx.html#L385'>test-top</a>: result&quot;</span>/imm32
<span id="L404" class="LineNr">404 </span> 68/push <span class="Constant">&quot;F - <a href='203stack.subx.html#L385'>test-top</a>: result&quot;</span>/imm32
<span id="L405" class="LineNr">405 </span> 68/push 0x42/imm32
<span id="L406" class="LineNr">406 </span> 50/push-eax
<span id="L407" class="LineNr">407 </span> <span class="subxS2Comment"># . . call</span>
<span id="L408" class="LineNr">408 </span> e8/call <a href='051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L408" class="LineNr">408 </span> e8/call <a href='102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L409" class="LineNr">409 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L410" class="LineNr">410 </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="L411" class="LineNr">411 </span> <span class="subxS1Comment"># . epilogue</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 100array-equal.subx</title>
<title>Mu - 301array-equal.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -56,13 +56,13 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/100array-equal.subx'>https://github.com/akkartik/mu/blob/master/100array-equal.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/301array-equal.subx'>https://github.com/akkartik/mu/blob/master/301array-equal.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Comparing arrays of numbers.</span>
<span id="L2" class="LineNr"> 2 </span>
<span id="L3" class="LineNr"> 3 </span>== code
<span id="L4" class="LineNr"> 4 </span>
<span id="L5" class="LineNr"> 5 </span><span class="subxFunction">array-equal?</span>: <span class="subxComment"># a: (addr array int), b: (addr array int) -&gt; eax: boolean</span>
<span id="L5" class="LineNr"> 5 </span><span class="subxFunction">array-equal?</span>: <span class="subxComment"># a: (addr array int), b: (addr array int) -&gt; result/eax: boolean</span>
<span id="L6" class="LineNr"> 6 </span> <span class="subxComment"># pseudocode:</span>
<span id="L7" class="LineNr"> 7 </span> <span class="subxComment"># asize = a-&gt;size</span>
<span id="L8" class="LineNr"> 8 </span> <span class="subxComment"># if (asize != b-&gt;size) return false</span>
@ -157,8 +157,8 @@ if ('onhashchange' in window) {
<span id="L97" class="LineNr"> 97 </span> 68/push 0/imm32/size
<span id="L98" class="LineNr"> 98 </span> 89/&lt;- %edx 4/r32/esp
<span id="L99" class="LineNr"> 99 </span> <span class="subxComment">#</span>
<span id="L100" class="LineNr">100 </span> (<a href='100array-equal.subx.html#L5'>array-equal?</a> %ecx %edx) <span class="subxComment"># =&gt; eax</span>
<span id="L101" class="LineNr">101 </span> (<a href='051test.subx.html#L23'>check-ints-equal</a> %eax 1 <span class="Constant">&quot;F - test-compare-empty-with-empty-array&quot;</span>)
<span id="L100" class="LineNr">100 </span> (<a href='301array-equal.subx.html#L5'>array-equal?</a> %ecx %edx) <span class="subxComment"># =&gt; eax</span>
<span id="L101" class="LineNr">101 </span> (<a href='102test.subx.html#L23'>check-ints-equal</a> %eax 1 <span class="Constant">&quot;F - test-compare-empty-with-empty-array&quot;</span>)
<span id="L102" class="LineNr">102 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L103" class="LineNr">103 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L104" class="LineNr">104 </span> 5d/pop-to-ebp
@ -176,8 +176,8 @@ if ('onhashchange' in window) {
<span id="L116" class="LineNr">116 </span> 68/push 0/imm32/size
<span id="L117" class="LineNr">117 </span> 89/&lt;- %edx 4/r32/esp
<span id="L118" class="LineNr">118 </span> <span class="subxComment">#</span>
<span id="L119" class="LineNr">119 </span> (<a href='100array-equal.subx.html#L5'>array-equal?</a> %ecx %edx) <span class="subxComment"># =&gt; eax</span>
<span id="L120" class="LineNr">120 </span> (<a href='051test.subx.html#L23'>check-ints-equal</a> %eax 0 <span class="Constant">&quot;F - test-compare-empty-with-non-empty-array&quot;</span>)
<span id="L119" class="LineNr">119 </span> (<a href='301array-equal.subx.html#L5'>array-equal?</a> %ecx %edx) <span class="subxComment"># =&gt; eax</span>
<span id="L120" class="LineNr">120 </span> (<a href='102test.subx.html#L23'>check-ints-equal</a> %eax 0 <span class="Constant">&quot;F - test-compare-empty-with-non-empty-array&quot;</span>)
<span id="L121" class="LineNr">121 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L122" class="LineNr">122 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L123" class="LineNr">123 </span> 5d/pop-to-ebp
@ -200,8 +200,8 @@ if ('onhashchange' in window) {
<span id="L140" class="LineNr">140 </span> 68/push 0xc/imm32/size
<span id="L141" class="LineNr">141 </span> 89/&lt;- %edx 4/r32/esp
<span id="L142" class="LineNr">142 </span> <span class="subxComment">#</span>
<span id="L143" class="LineNr">143 </span> (<a href='100array-equal.subx.html#L5'>array-equal?</a> %ecx %edx) <span class="subxComment"># =&gt; eax</span>
<span id="L144" class="LineNr">144 </span> (<a href='051test.subx.html#L23'>check-ints-equal</a> %eax 1 <span class="Constant">&quot;F - test-compare-equal-arrays&quot;</span>)
<span id="L143" class="LineNr">143 </span> (<a href='301array-equal.subx.html#L5'>array-equal?</a> %ecx %edx) <span class="subxComment"># =&gt; eax</span>
<span id="L144" class="LineNr">144 </span> (<a href='102test.subx.html#L23'>check-ints-equal</a> %eax 1 <span class="Constant">&quot;F - test-compare-equal-arrays&quot;</span>)
<span id="L145" class="LineNr">145 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L146" class="LineNr">146 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L147" class="LineNr">147 </span> 5d/pop-to-ebp
@ -224,8 +224,8 @@ if ('onhashchange' in window) {
<span id="L164" class="LineNr">164 </span> 68/push 0xc/imm32/size
<span id="L165" class="LineNr">165 </span> 89/&lt;- %edx 4/r32/esp
<span id="L166" class="LineNr">166 </span> <span class="subxComment">#</span>
<span id="L167" class="LineNr">167 </span> (<a href='100array-equal.subx.html#L5'>array-equal?</a> %ecx %edx) <span class="subxComment"># =&gt; eax</span>
<span id="L168" class="LineNr">168 </span> (<a href='051test.subx.html#L23'>check-ints-equal</a> %eax 0 <span class="Constant">&quot;F - test-compare-inequal-arrays-equal-sizes&quot;</span>)
<span id="L167" class="LineNr">167 </span> (<a href='301array-equal.subx.html#L5'>array-equal?</a> %ecx %edx) <span class="subxComment"># =&gt; eax</span>
<span id="L168" class="LineNr">168 </span> (<a href='102test.subx.html#L23'>check-ints-equal</a> %eax 0 <span class="Constant">&quot;F - test-compare-inequal-arrays-equal-sizes&quot;</span>)
<span id="L169" class="LineNr">169 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L170" class="LineNr">170 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L171" class="LineNr">171 </span> 5d/pop-to-ebp
@ -281,19 +281,19 @@ if ('onhashchange' in window) {
<span id="L221" class="LineNr">221 </span> 39/compare %ecx 2/r32/edx
<span id="L222" class="LineNr">222 </span> 73/jump-if-addr&gt;= $parse-array-of-ints:break1/disp8
<span id="L223" class="LineNr">223 </span> <span class="subxComment"># curr = skip-chars-matching-in-slice(curr, end, ' ')</span>
<span id="L224" class="LineNr">224 </span> (<a href='073next-token.subx.html#L804'>skip-chars-matching-in-slice</a> %ecx %edx 0x20) <span class="subxComment"># =&gt; eax</span>
<span id="L224" class="LineNr">224 </span> (<a href='124next-token.subx.html#L804'>skip-chars-matching-in-slice</a> %ecx %edx 0x20) <span class="subxComment"># =&gt; eax</span>
<span id="L225" class="LineNr">225 </span> 89/&lt;- %ecx 0/r32/eax
<span id="L226" class="LineNr">226 </span> <span class="subxComment"># if (curr &gt;= end) break</span>
<span id="L227" class="LineNr">227 </span> 39/compare %ecx 2/r32/edx
<span id="L228" class="LineNr">228 </span> 73/jump-if-addr&gt;= $parse-array-of-ints:break1/disp8
<span id="L229" class="LineNr">229 </span> <span class="subxComment"># curr = skip-chars-not-matching-in-slice(curr, end, ' ')</span>
<span id="L230" class="LineNr">230 </span> (<a href='073next-token.subx.html#L973'>skip-chars-not-matching-in-slice</a> %ecx %edx 0x20) <span class="subxComment"># =&gt; eax</span>
<span id="L230" class="LineNr">230 </span> (<a href='124next-token.subx.html#L973'>skip-chars-not-matching-in-slice</a> %ecx %edx 0x20) <span class="subxComment"># =&gt; eax</span>
<span id="L231" class="LineNr">231 </span> 89/&lt;- %ecx 0/r32/eax
<span id="L232" class="LineNr">232 </span> <span class="subxComment"># size += 4</span>
<span id="L233" class="LineNr">233 </span> 81 0/subop/add %ebx 4/imm32
<span id="L234" class="LineNr">234 </span> eb/jump $parse-array-of-ints:loop1/disp8
<span id="L235" class="LineNr">235 </span><span class="Constant">$parse-array-of-ints:break1</span>:
<span id="L236" class="LineNr">236 </span> (<a href='069allocate.subx.html#L576'>allocate-array</a> *(ebp+8) %ebx *(ebp+0x10))
<span id="L236" class="LineNr">236 </span> (<a href='120allocate.subx.html#L576'>allocate-array</a> *(ebp+8) %ebx *(ebp+0x10))
<span id="L237" class="LineNr">237 </span><span class="Constant">$parse-array-of-ints:pass2</span>:
<span id="L238" class="LineNr">238 </span> <span class="subxComment"># var slice/edi: slice = {s-&gt;data, 0}</span>
<span id="L239" class="LineNr">239 </span> 68/push 0/imm32/end
@ -302,23 +302,23 @@ if ('onhashchange' in window) {
<span id="L242" class="LineNr">242 </span> 89/&lt;- %edi 4/r32/esp
<span id="L243" class="LineNr">243 </span> <span class="subxComment"># curr = lookup(out)-&gt;data</span>
<span id="L244" class="LineNr">244 </span> 8b/-&gt; *(ebp+0x10) 0/r32/eax
<span id="L245" class="LineNr">245 </span> (<a href='069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L245" class="LineNr">245 </span> (<a href='120allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L246" class="LineNr">246 </span> 8d/copy-address *(eax+4) 1/r32/ecx
<span id="L247" class="LineNr">247 </span><span class="Constant">$parse-array-of-ints:loop2</span>:
<span id="L248" class="LineNr">248 </span> <span class="subxComment"># if (slice-&gt;start &gt;= end) break</span>
<span id="L249" class="LineNr">249 </span> 39/compare *edi 2/r32/edx
<span id="L250" class="LineNr">250 </span> 73/jump-if-addr&gt;= $parse-array-of-ints:end/disp8
<span id="L251" class="LineNr">251 </span> <span class="subxComment"># slice-&gt;start = skip-chars-matching-in-slice(slice-&gt;start, end, ' ')</span>
<span id="L252" class="LineNr">252 </span> (<a href='073next-token.subx.html#L804'>skip-chars-matching-in-slice</a> *edi %edx 0x20) <span class="subxComment"># =&gt; eax</span>
<span id="L252" class="LineNr">252 </span> (<a href='124next-token.subx.html#L804'>skip-chars-matching-in-slice</a> *edi %edx 0x20) <span class="subxComment"># =&gt; eax</span>
<span id="L253" class="LineNr">253 </span> 89/&lt;- *edi 0/r32/eax
<span id="L254" class="LineNr">254 </span> <span class="subxComment"># if (slice-&gt;start &gt;= end) break</span>
<span id="L255" class="LineNr">255 </span> 39/compare *edi 2/r32/edx
<span id="L256" class="LineNr">256 </span> 73/jump-if-addr&gt;= $parse-array-of-ints:end/disp8
<span id="L257" class="LineNr">257 </span> <span class="subxComment"># slice-&gt;end = skip-chars-not-matching-in-slice(slice-&gt;start, end, ' ')</span>
<span id="L258" class="LineNr">258 </span> (<a href='073next-token.subx.html#L973'>skip-chars-not-matching-in-slice</a> *edi %edx 0x20) <span class="subxComment"># =&gt; eax</span>
<span id="L258" class="LineNr">258 </span> (<a href='124next-token.subx.html#L973'>skip-chars-not-matching-in-slice</a> *edi %edx 0x20) <span class="subxComment"># =&gt; eax</span>
<span id="L259" class="LineNr">259 </span> 89/&lt;- *(edi+4) 0/r32/eax
<span id="L260" class="LineNr">260 </span> <span class="subxComment"># *curr = parse-hex-int-from-slice(slice)</span>
<span id="L261" class="LineNr">261 </span> (<a href='067parse-hex.subx.html#L387'>parse-hex-int-from-slice</a> %edi)
<span id="L261" class="LineNr">261 </span> (<a href='118parse-hex.subx.html#L387'>parse-hex-int-from-slice</a> %edi)
<span id="L262" class="LineNr">262 </span> 89/&lt;- *ecx 0/r32/eax
<span id="L263" class="LineNr">263 </span> <span class="subxComment"># curr += 4</span>
<span id="L264" class="LineNr">264 </span> 81 0/subop/add %ecx 4/imm32
@ -356,10 +356,10 @@ if ('onhashchange' in window) {
<span id="L296" class="LineNr">296 </span> 68/push 0xc/imm32/size
<span id="L297" class="LineNr">297 </span> 89/&lt;- %ecx 4/r32/esp
<span id="L298" class="LineNr">298 </span> <span class="subxComment">#</span>
<span id="L299" class="LineNr">299 </span> (<a href='100array-equal.subx.html#L174'>parse-array-of-ints</a> <span class="SpecialChar"><a href='069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">&quot;1 2 3&quot;</span> %esi)
<span id="L300" class="LineNr">300 </span> (<a href='069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L301" class="LineNr">301 </span> (<a href='100array-equal.subx.html#L5'>array-equal?</a> %ecx %eax) <span class="subxComment"># =&gt; eax</span>
<span id="L302" class="LineNr">302 </span> (<a href='051test.subx.html#L23'>check-ints-equal</a> %eax 1 <span class="Constant">&quot;F - test-parse-array-of-ints&quot;</span>)
<span id="L299" class="LineNr">299 </span> (<a href='301array-equal.subx.html#L174'>parse-array-of-ints</a> <span class="SpecialChar"><a href='120allocate.subx.html#L27'>Heap</a></span> <span class="Constant">&quot;1 2 3&quot;</span> %esi)
<span id="L300" class="LineNr">300 </span> (<a href='120allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L301" class="LineNr">301 </span> (<a href='301array-equal.subx.html#L5'>array-equal?</a> %ecx %eax) <span class="subxComment"># =&gt; eax</span>
<span id="L302" class="LineNr">302 </span> (<a href='102test.subx.html#L23'>check-ints-equal</a> %eax 1 <span class="Constant">&quot;F - test-parse-array-of-ints&quot;</span>)
<span id="L303" class="LineNr">303 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L304" class="LineNr">304 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L305" class="LineNr">305 </span> 5d/pop-to-ebp
@ -375,9 +375,9 @@ if ('onhashchange' in window) {
<span id="L315" class="LineNr">315 </span> 68/push 0/imm32
<span id="L316" class="LineNr">316 </span> 89/&lt;- %esi 4/r32/esp
<span id="L317" class="LineNr">317 </span> <span class="subxComment">#</span>
<span id="L318" class="LineNr">318 </span> (<a href='100array-equal.subx.html#L174'>parse-array-of-ints</a> <span class="SpecialChar"><a href='069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">&quot;&quot;</span> %esi)
<span id="L319" class="LineNr">319 </span> (<a href='069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L320" class="LineNr">320 </span> (<a href='051test.subx.html#L23'>check-ints-equal</a> *eax 0 <span class="Constant">&quot;F - test-parse-array-of-ints-empty&quot;</span>)
<span id="L318" class="LineNr">318 </span> (<a href='301array-equal.subx.html#L174'>parse-array-of-ints</a> <span class="SpecialChar"><a href='120allocate.subx.html#L27'>Heap</a></span> <span class="Constant">&quot;&quot;</span> %esi)
<span id="L319" class="LineNr">319 </span> (<a href='120allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L320" class="LineNr">320 </span> (<a href='102test.subx.html#L23'>check-ints-equal</a> *eax 0 <span class="Constant">&quot;F - test-parse-array-of-ints-empty&quot;</span>)
<span id="L321" class="LineNr">321 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L322" class="LineNr">322 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L323" class="LineNr">323 </span> 5d/pop-to-ebp
@ -393,9 +393,9 @@ if ('onhashchange' in window) {
<span id="L333" class="LineNr">333 </span> 68/push 0/imm32
<span id="L334" class="LineNr">334 </span> 89/&lt;- %esi 4/r32/esp
<span id="L335" class="LineNr">335 </span> <span class="subxComment">#</span>
<span id="L336" class="LineNr">336 </span> (<a href='100array-equal.subx.html#L174'>parse-array-of-ints</a> <span class="SpecialChar"><a href='069allocate.subx.html#L27'>Heap</a></span> <span class="SpecialChar"><a href='051test.subx.html#L93'>Space</a></span> %esi)
<span id="L337" class="LineNr">337 </span> (<a href='069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L338" class="LineNr">338 </span> (<a href='051test.subx.html#L23'>check-ints-equal</a> *eax 0 <span class="Constant">&quot;F - test-parse-array-of-ints-just-whitespace&quot;</span>)
<span id="L336" class="LineNr">336 </span> (<a href='301array-equal.subx.html#L174'>parse-array-of-ints</a> <span class="SpecialChar"><a href='120allocate.subx.html#L27'>Heap</a></span> <span class="SpecialChar"><a href='102test.subx.html#L93'>Space</a></span> %esi)
<span id="L337" class="LineNr">337 </span> (<a href='120allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L338" class="LineNr">338 </span> (<a href='102test.subx.html#L23'>check-ints-equal</a> *eax 0 <span class="Constant">&quot;F - test-parse-array-of-ints-just-whitespace&quot;</span>)
<span id="L339" class="LineNr">339 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L340" class="LineNr">340 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L341" class="LineNr">341 </span> 5d/pop-to-ebp
@ -416,10 +416,10 @@ if ('onhashchange' in window) {
<span id="L356" class="LineNr">356 </span> 68/push 0xc/imm32/size
<span id="L357" class="LineNr">357 </span> 89/&lt;- %ecx 4/r32/esp
<span id="L358" class="LineNr">358 </span> <span class="subxComment">#</span>
<span id="L359" class="LineNr">359 </span> (<a href='100array-equal.subx.html#L174'>parse-array-of-ints</a> <span class="SpecialChar"><a href='069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">&quot; 1 2 3 &quot;</span> %esi)
<span id="L360" class="LineNr">360 </span> (<a href='069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L361" class="LineNr">361 </span> (<a href='100array-equal.subx.html#L5'>array-equal?</a> %ecx %eax) <span class="subxComment"># =&gt; eax</span>
<span id="L362" class="LineNr">362 </span> (<a href='051test.subx.html#L23'>check-ints-equal</a> %eax 1 <span class="Constant">&quot;F - test-parse-array-of-ints-extra-whitespace&quot;</span>)
<span id="L359" class="LineNr">359 </span> (<a href='301array-equal.subx.html#L174'>parse-array-of-ints</a> <span class="SpecialChar"><a href='120allocate.subx.html#L27'>Heap</a></span> <span class="Constant">&quot; 1 2 3 &quot;</span> %esi)
<span id="L360" class="LineNr">360 </span> (<a href='120allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L361" class="LineNr">361 </span> (<a href='301array-equal.subx.html#L5'>array-equal?</a> %ecx %eax) <span class="subxComment"># =&gt; eax</span>
<span id="L362" class="LineNr">362 </span> (<a href='102test.subx.html#L23'>check-ints-equal</a> %eax 1 <span class="Constant">&quot;F - test-parse-array-of-ints-extra-whitespace&quot;</span>)
<span id="L363" class="LineNr">363 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L364" class="LineNr">364 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L365" class="LineNr">365 </span> 5d/pop-to-ebp
@ -439,11 +439,11 @@ if ('onhashchange' in window) {
<span id="L379" class="LineNr">379 </span> 68/push 0/imm32
<span id="L380" class="LineNr">380 </span> 89/&lt;- %esi 4/r32/esp
<span id="L381" class="LineNr">381 </span> <span class="subxComment"># var b/eax: (addr array int) = parse-array-of-ints(Heap, expected)</span>
<span id="L382" class="LineNr">382 </span> (<a href='100array-equal.subx.html#L174'>parse-array-of-ints</a> <span class="SpecialChar"><a href='069allocate.subx.html#L27'>Heap</a></span> *(ebp+0xc) %esi)
<span id="L383" class="LineNr">383 </span> (<a href='069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L382" class="LineNr">382 </span> (<a href='301array-equal.subx.html#L174'>parse-array-of-ints</a> <span class="SpecialChar"><a href='120allocate.subx.html#L27'>Heap</a></span> *(ebp+0xc) %esi)
<span id="L383" class="LineNr">383 </span> (<a href='120allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L384" class="LineNr">384 </span> <span class="subxComment">#</span>
<span id="L385" class="LineNr">385 </span> (<a href='100array-equal.subx.html#L5'>array-equal?</a> *(ebp+8) %eax)
<span id="L386" class="LineNr">386 </span> (<a href='051test.subx.html#L23'>check-ints-equal</a> %eax 1 *(ebp+0x10))
<span id="L385" class="LineNr">385 </span> (<a href='301array-equal.subx.html#L5'>array-equal?</a> *(ebp+8) %eax)
<span id="L386" class="LineNr">386 </span> (<a href='102test.subx.html#L23'>check-ints-equal</a> %eax 1 *(ebp+0x10))
<span id="L387" class="LineNr">387 </span><span class="Constant">$check-array-equal:end</span>:
<span id="L388" class="LineNr">388 </span> <span class="subxS1Comment"># . restore registers</span>
<span id="L389" class="LineNr">389 </span> 5e/pop-to-esi
@ -464,7 +464,7 @@ if ('onhashchange' in window) {
<span id="L404" class="LineNr">404 </span> 68/push 0xc/imm32/size
<span id="L405" class="LineNr">405 </span> 89/&lt;- %ecx 4/r32/esp
<span id="L406" class="LineNr">406 </span> <span class="subxComment">#</span>
<span id="L407" class="LineNr">407 </span> (<a href='100array-equal.subx.html#L370'>check-array-equal</a> %ecx <span class="Constant">&quot;1 2 3&quot;</span> <span class="Constant">&quot;F - test-check-array-equal&quot;</span>)
<span id="L407" class="LineNr">407 </span> (<a href='301array-equal.subx.html#L370'>check-array-equal</a> %ecx <span class="Constant">&quot;1 2 3&quot;</span> <span class="Constant">&quot;F - test-check-array-equal&quot;</span>)
<span id="L408" class="LineNr">408 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L409" class="LineNr">409 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L410" class="LineNr">410 </span> 5d/pop-to-ebp

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 101stack_allocate.subx</title>
<title>Mu - 302stack_allocate.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -53,7 +53,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/101stack_allocate.subx'>https://github.com/akkartik/mu/blob/master/101stack_allocate.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/302stack_allocate.subx'>https://github.com/akkartik/mu/blob/master/302stack_allocate.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># A function which pushes n zeros on the stack.</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># Not really useful to call manually.</span>
@ -90,7 +90,7 @@ if ('onhashchange' in window) {
<span id="L33" class="LineNr">33 </span><span class="subxComment"># n must be positive</span>
<span id="L34" class="LineNr">34 </span><span class="subxFunction">push-n-zero-bytes</span>: <span class="subxComment"># n: int</span>
<span id="L35" class="LineNr">35 </span><span class="Constant">$push-n-zero-bytes:prologue</span>:
<span id="L36" class="LineNr">36 </span> 89/&lt;- *<span class="SpecialChar"><a href='101stack_allocate.subx.html#L59'>Push-n-zero-bytes-ebp</a></span> 5/r32/ebp <span class="subxComment"># spill ebp without affecting stack</span>
<span id="L36" class="LineNr">36 </span> 89/&lt;- *<span class="SpecialChar"><a href='302stack_allocate.subx.html#L59'>Push-n-zero-bytes-ebp</a></span> 5/r32/ebp <span class="subxComment"># spill ebp without affecting stack</span>
<span id="L37" class="LineNr">37 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L38" class="LineNr">38 </span><span class="Constant">$push-n-zero-bytes:copy-ra</span>:
<span id="L39" class="LineNr">39 </span> <span class="subxComment"># -- esp = ebp</span>
@ -104,12 +104,12 @@ if ('onhashchange' in window) {
<span id="L47" class="LineNr">47 </span> 58/pop-to-eax
<span id="L48" class="LineNr">48 </span> <span class="subxComment"># -- esp+n = ebp</span>
<span id="L49" class="LineNr">49 </span><span class="Constant">$push-n-zero-bytes:bulk-cleaning</span>:
<span id="L50" class="LineNr">50 </span> 89/&lt;- *<span class="SpecialChar"><a href='101stack_allocate.subx.html#L61'>Push-n-zero-bytes-esp</a></span> 4/r32/esp
<span id="L51" class="LineNr">51 </span> 81 0/subop/add *<span class="SpecialChar"><a href='101stack_allocate.subx.html#L61'>Push-n-zero-bytes-esp</a></span> 4/imm32
<span id="L50" class="LineNr">50 </span> 89/&lt;- *<span class="SpecialChar"><a href='302stack_allocate.subx.html#L61'>Push-n-zero-bytes-esp</a></span> 4/r32/esp
<span id="L51" class="LineNr">51 </span> 81 0/subop/add *<span class="SpecialChar"><a href='302stack_allocate.subx.html#L61'>Push-n-zero-bytes-esp</a></span> 4/imm32
<span id="L52" class="LineNr">52 </span> 81 0/subop/add *(ebp+4) 4/imm32
<span id="L53" class="LineNr">53 </span> (<a href='069allocate.subx.html#L877'>zero-out</a> *<span class="SpecialChar"><a href='101stack_allocate.subx.html#L61'>Push-n-zero-bytes-esp</a></span> *(ebp+4)) <span class="subxComment"># n+4</span>
<span id="L53" class="LineNr">53 </span> (<a href='120allocate.subx.html#L877'>zero-out</a> *<span class="SpecialChar"><a href='302stack_allocate.subx.html#L61'>Push-n-zero-bytes-esp</a></span> *(ebp+4)) <span class="subxComment"># n+4</span>
<span id="L54" class="LineNr">54 </span><span class="Constant">$push-n-zero-bytes:epilogue</span>:
<span id="L55" class="LineNr">55 </span> 8b/-&gt; *<span class="SpecialChar"><a href='101stack_allocate.subx.html#L59'>Push-n-zero-bytes-ebp</a></span> 5/r32/ebp <span class="subxComment"># restore spill</span>
<span id="L55" class="LineNr">55 </span> 8b/-&gt; *<span class="SpecialChar"><a href='302stack_allocate.subx.html#L59'>Push-n-zero-bytes-ebp</a></span> 5/r32/ebp <span class="subxComment"># restore spill</span>
<span id="L56" class="LineNr">56 </span> c3/return
<span id="L57" class="LineNr">57 </span>
<span id="L58" class="LineNr">58 </span>== data

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 102kernel-string.subx</title>
<title>Mu - 303kernel-string.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -52,7 +52,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/102kernel-string.subx'>https://github.com/akkartik/mu/blob/master/102kernel-string.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/303kernel-string.subx'>https://github.com/akkartik/mu/blob/master/303kernel-string.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># We can't really do much with null-terminated kernel strings, and we don't</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># want to. Let's turn them into regular length-prefixed strings at the first</span>
@ -71,17 +71,17 @@ if ('onhashchange' in window) {
<span id="L15" class="LineNr">15 </span> 56/push-esi
<span id="L16" class="LineNr">16 </span> 57/push-edi
<span id="L17" class="LineNr">17 </span> <span class="subxComment"># var len/ecx: int = length(in)</span>
<span id="L18" class="LineNr">18 </span> (<a href='102kernel-string.subx.html#L57'>kernel-string-length</a> *(ebp+0xc))
<span id="L18" class="LineNr">18 </span> (<a href='303kernel-string.subx.html#L57'>kernel-string-length</a> *(ebp+0xc))
<span id="L19" class="LineNr">19 </span> 89/&lt;- %ecx 0/r32/eax
<span id="L20" class="LineNr">20 </span> <span class="subxComment"># result = allocate-array(ad, len)</span>
<span id="L21" class="LineNr">21 </span> (<a href='069allocate.subx.html#L576'>allocate-array</a> *(ebp+8) %ecx *(ebp+0x10))
<span id="L21" class="LineNr">21 </span> (<a href='120allocate.subx.html#L576'>allocate-array</a> *(ebp+8) %ecx *(ebp+0x10))
<span id="L22" class="LineNr">22 </span> <span class="subxComment"># var c/edx: byte = 0</span>
<span id="L23" class="LineNr">23 </span> ba/copy-to-edx 0/imm32
<span id="L24" class="LineNr">24 </span> <span class="subxComment"># var src/esi: (addr byte) = in</span>
<span id="L25" class="LineNr">25 </span> 8b/-&gt; *(ebp+0xc) 6/r32/esi
<span id="L26" class="LineNr">26 </span> <span class="subxComment"># var dest/edi: (addr byte) = result-&gt;data</span>
<span id="L27" class="LineNr">27 </span> 8b/-&gt; *(ebp+0x10) 7/r32/edi
<span id="L28" class="LineNr">28 </span> (<a href='069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L28" class="LineNr">28 </span> (<a href='120allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L29" class="LineNr">29 </span> 8d/copy-address *(eax+4) 7/r32/edi
<span id="L30" class="LineNr">30 </span> {
<span id="L31" class="LineNr">31 </span><span class="Constant">$kernel-string-to-string:loop</span>:

401
html/304screen.subx.html generated Normal file
View File

@ -0,0 +1,401 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 304screen.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
<meta name="settings" content="number_lines,use_css,pre_wrap,no_foldcolumn,expand_tabs,line_ids,prevent_copy=">
<meta name="colorscheme" content="minimal-light">
<style type="text/css">
<!--
pre { white-space: pre-wrap; font-family: monospace; color: #000000; background-color: #c6c6c6; }
body { font-size:12pt; font-family: monospace; color: #000000; background-color: #c6c6c6; }
a { color:inherit; }
* { font-size:12pt; font-size: 1em; }
.subxComment { color: #005faf; }
.subxFunction { color: #af5f00; text-decoration: underline; }
.LineNr { }
.subxS1Comment { color: #0000af; }
.SpecialChar { color: #d70000; }
.Constant { color: #008787; }
.subxMinorFunction { color: #875f5f; }
-->
</style>
<script type='text/javascript'>
<!--
/* function to open any folds containing a jumped-to line before jumping to it */
function JumpToLine()
{
var lineNum;
lineNum = window.location.hash;
lineNum = lineNum.substr(1); /* strip off '#' */
if (lineNum.indexOf('L') == -1) {
lineNum = 'L'+lineNum;
}
var lineElem = document.getElementById(lineNum);
/* Always jump to new location even if the line was hidden inside a fold, or
* we corrected the raw number to a line ID.
*/
if (lineElem) {
lineElem.scrollIntoView(true);
}
return true;
}
if ('onhashchange' in window) {
window.onhashchange = JumpToLine;
}
-->
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/304screen.subx'>https://github.com/akkartik/mu/blob/master/304screen.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Primitives for screen control.</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># Require Linux and a modern terminal.</span>
<span id="L3" class="LineNr"> 3 </span>
<span id="L4" class="LineNr"> 4 </span>== code
<span id="L5" class="LineNr"> 5 </span>
<span id="L6" class="LineNr"> 6 </span><span class="subxFunction">enable-screen-grid-mode</span>:
<span id="L7" class="LineNr"> 7 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L8" class="LineNr"> 8 </span> 55/push-ebp
<span id="L9" class="LineNr"> 9 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L10" class="LineNr"> 10 </span> <span class="subxComment">#</span>
<span id="L11" class="LineNr"> 11 </span> (<a href='115write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='115write-byte.subx.html#L10'>Stdout</a></span>)
<span id="L12" class="LineNr"> 12 </span> (<a href='115write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='116write-buffered.subx.html#L209'>Stderr</a></span>)
<span id="L13" class="LineNr"> 13 </span> <span class="subxComment"># switch to second screen buffer</span>
<span id="L14" class="LineNr"> 14 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L15" class="LineNr"> 15 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[?1049h&quot;</span>)
<span id="L16" class="LineNr"> 16 </span> <span class="subxComment">#</span>
<span id="L17" class="LineNr"> 17 </span> (<a href='304screen.subx.html#L75'>clear-screen</a>)
<span id="L18" class="LineNr"> 18 </span><span class="Constant">$enable-screen-grid-mode:end</span>:
<span id="L19" class="LineNr"> 19 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L20" class="LineNr"> 20 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L21" class="LineNr"> 21 </span> 5d/pop-to-ebp
<span id="L22" class="LineNr"> 22 </span> c3/return
<span id="L23" class="LineNr"> 23 </span>
<span id="L24" class="LineNr"> 24 </span><span class="subxFunction">enable-screen-type-mode</span>:
<span id="L25" class="LineNr"> 25 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L26" class="LineNr"> 26 </span> 55/push-ebp
<span id="L27" class="LineNr"> 27 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L28" class="LineNr"> 28 </span> <span class="subxComment"># switch to first screen buffer</span>
<span id="L29" class="LineNr"> 29 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L30" class="LineNr"> 30 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[?1049l&quot;</span>)
<span id="L31" class="LineNr"> 31 </span><span class="Constant">$enable-screen-type-mode:end</span>:
<span id="L32" class="LineNr"> 32 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L33" class="LineNr"> 33 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L34" class="LineNr"> 34 </span> 5d/pop-to-ebp
<span id="L35" class="LineNr"> 35 </span> c3/return
<span id="L36" class="LineNr"> 36 </span>
<span id="L37" class="LineNr"> 37 </span><span class="subxFunction">screen-size</span>: <span class="subxComment"># -&gt; nrows/eax: int, ncols/ecx: int</span>
<span id="L38" class="LineNr"> 38 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L39" class="LineNr"> 39 </span> 55/push-ebp
<span id="L40" class="LineNr"> 40 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L41" class="LineNr"> 41 </span> <span class="subxS1Comment"># . save registers</span>
<span id="L42" class="LineNr"> 42 </span> 52/push-edx
<span id="L43" class="LineNr"> 43 </span> 53/push-ebx
<span id="L44" class="LineNr"> 44 </span> 56/push-esi
<span id="L45" class="LineNr"> 45 </span> 57/push-edi
<span id="L46" class="LineNr"> 46 </span> <span class="subxComment">#</span>
<span id="L47" class="LineNr"> 47 </span> (<a href='304screen.subx.html#L306'>_maybe-open-terminal</a>)
<span id="L48" class="LineNr"> 48 </span> <span class="subxComment"># var window-size-info/esi: (addr winsize)</span>
<span id="L49" class="LineNr"> 49 </span> <span class="subxComment"># winsize is a type from the Linux kernel. We don't care how large it is.</span>
<span id="L50" class="LineNr"> 50 </span> 81 5/subop/subtract %esp 0x40/imm32
<span id="L51" class="LineNr"> 51 </span> 89/&lt;- %esi 4/r32/esp
<span id="L52" class="LineNr"> 52 </span> <span class="subxComment"># ioctl(*Terminal-file-descriptor, TIOCGWINSZ, window-size-info)</span>
<span id="L53" class="LineNr"> 53 </span> 89/&lt;- %edx 6/r32/esi
<span id="L54" class="LineNr"> 54 </span> b9/copy-to-ecx 0x5413/imm32/TIOCGWINSZ
<span id="L55" class="LineNr"> 55 </span> 8b/-&gt; *<span class="SpecialChar"><a href='304screen.subx.html#L328'>Terminal-file-descriptor</a></span> 3/r32/ebx
<span id="L56" class="LineNr"> 56 </span> e8/call syscall_ioctl/disp32
<span id="L57" class="LineNr"> 57 </span> <span class="subxComment"># some bitworking to extract 2 16-bit shorts</span>
<span id="L58" class="LineNr"> 58 </span> 8b/-&gt; *esi 0/r32/eax
<span id="L59" class="LineNr"> 59 </span> 81 4/subop/and %eax 0xffff/imm32
<span id="L60" class="LineNr"> 60 </span> 8b/-&gt; *esi 1/r32/ecx
<span id="L61" class="LineNr"> 61 </span> c1/shift 5/subop/logical-right %ecx 0x10/imm8
<span id="L62" class="LineNr"> 62 </span><span class="Constant">$screen-size:end</span>:
<span id="L63" class="LineNr"> 63 </span> <span class="subxS1Comment"># . reclaim locals</span>
<span id="L64" class="LineNr"> 64 </span> 81 0/subop/add %esp 0x40/imm32
<span id="L65" class="LineNr"> 65 </span> <span class="subxS1Comment"># . restore registers</span>
<span id="L66" class="LineNr"> 66 </span> 5f/pop-to-edi
<span id="L67" class="LineNr"> 67 </span> 5e/pop-to-esi
<span id="L68" class="LineNr"> 68 </span> 5b/pop-to-ebx
<span id="L69" class="LineNr"> 69 </span> 5a/pop-to-edx
<span id="L70" class="LineNr"> 70 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L71" class="LineNr"> 71 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L72" class="LineNr"> 72 </span> 5d/pop-to-ebp
<span id="L73" class="LineNr"> 73 </span> c3/return
<span id="L74" class="LineNr"> 74 </span>
<span id="L75" class="LineNr"> 75 </span><span class="subxFunction">clear-screen</span>:
<span id="L76" class="LineNr"> 76 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L77" class="LineNr"> 77 </span> 55/push-ebp
<span id="L78" class="LineNr"> 78 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L79" class="LineNr"> 79 </span> <span class="subxComment">#</span>
<span id="L80" class="LineNr"> 80 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L81" class="LineNr"> 81 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[H&quot;</span>)
<span id="L82" class="LineNr"> 82 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L83" class="LineNr"> 83 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[2J&quot;</span>)
<span id="L84" class="LineNr"> 84 </span><span class="Constant">$clear-screen:end</span>:
<span id="L85" class="LineNr"> 85 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L86" class="LineNr"> 86 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L87" class="LineNr"> 87 </span> 5d/pop-to-ebp
<span id="L88" class="LineNr"> 88 </span> c3/return
<span id="L89" class="LineNr"> 89 </span>
<span id="L90" class="LineNr"> 90 </span><span class="subxComment"># row and col count from the top-left as (1, 1)</span>
<span id="L91" class="LineNr"> 91 </span><span class="subxFunction">move-cursor-on-screen</span>: <span class="subxComment"># row: int, column: int</span>
<span id="L92" class="LineNr"> 92 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L93" class="LineNr"> 93 </span> 55/push-ebp
<span id="L94" class="LineNr"> 94 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L95" class="LineNr"> 95 </span> <span class="subxS1Comment"># . save registers</span>
<span id="L96" class="LineNr"> 96 </span> 51/push-ecx
<span id="L97" class="LineNr"> 97 </span> <span class="subxComment"># var buf/ecx: (stream byte 32)</span>
<span id="L98" class="LineNr"> 98 </span> 81 5/subop/subtract %esp 0x20/imm32
<span id="L99" class="LineNr"> 99 </span> 68/push 0x20/imm32/size
<span id="L100" class="LineNr">100 </span> 68/push 0/imm32/read
<span id="L101" class="LineNr">101 </span> 68/push 0/imm32/write
<span id="L102" class="LineNr">102 </span> 89/&lt;- %ecx 4/r32/esp
<span id="L103" class="LineNr">103 </span> <span class="subxComment"># construct directive in buf</span>
<span id="L104" class="LineNr">104 </span> (<a href='108write.subx.html#L24'>write</a> %ecx <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L105" class="LineNr">105 </span> (<a href='108write.subx.html#L24'>write</a> %ecx <span class="Constant">&quot;[&quot;</span>)
<span id="L106" class="LineNr">106 </span> (<a href='126write-int-decimal.subx.html#L8'>write-int32-decimal</a> %ecx *(ebp+8))
<span id="L107" class="LineNr">107 </span> (<a href='108write.subx.html#L24'>write</a> %ecx <span class="Constant">&quot;;&quot;</span>)
<span id="L108" class="LineNr">108 </span> (<a href='126write-int-decimal.subx.html#L8'>write-int32-decimal</a> %ecx *(ebp+0xc))
<span id="L109" class="LineNr">109 </span> (<a href='108write.subx.html#L24'>write</a> %ecx <span class="Constant">&quot;H&quot;</span>)
<span id="L110" class="LineNr">110 </span> <span class="subxComment"># flush</span>
<span id="L111" class="LineNr">111 </span> (<a href='113write-stream.subx.html#L17'>write-stream</a> 2 %ecx)
<span id="L112" class="LineNr">112 </span><span class="Constant">$move-cursor-on-screen:end</span>:
<span id="L113" class="LineNr">113 </span> <span class="subxS1Comment"># . reclaim locals</span>
<span id="L114" class="LineNr">114 </span> 81 0/subop/add %esp 0x2c/imm32
<span id="L115" class="LineNr">115 </span> <span class="subxS1Comment"># . restore registers</span>
<span id="L116" class="LineNr">116 </span> 59/pop-to-ecx
<span id="L117" class="LineNr">117 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L118" class="LineNr">118 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L119" class="LineNr">119 </span> 5d/pop-to-ebp
<span id="L120" class="LineNr">120 </span> c3/return
<span id="L121" class="LineNr">121 </span>
<span id="L122" class="LineNr">122 </span><span class="subxComment"># just because Mu has no support for global variables yet</span>
<span id="L123" class="LineNr">123 </span><span class="subxFunction">print-string-to-screen</span>: <span class="subxComment"># s: (addr array byte)</span>
<span id="L124" class="LineNr">124 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L125" class="LineNr">125 </span> 55/push-ebp
<span id="L126" class="LineNr">126 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L127" class="LineNr">127 </span> <span class="subxComment">#</span>
<span id="L128" class="LineNr">128 </span> (<a href='108write.subx.html#L24'>write</a> 2 *(ebp+8))
<span id="L129" class="LineNr">129 </span><span class="Constant">$print-string-to-screen:end</span>:
<span id="L130" class="LineNr">130 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L131" class="LineNr">131 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L132" class="LineNr">132 </span> 5d/pop-to-ebp
<span id="L133" class="LineNr">133 </span> c3/return
<span id="L134" class="LineNr">134 </span>
<span id="L135" class="LineNr">135 </span><span class="subxComment"># just because Mu has no support for global variables yet</span>
<span id="L136" class="LineNr">136 </span><span class="subxFunction">print-byte-to-screen</span>: <span class="subxComment"># c: byte</span>
<span id="L137" class="LineNr">137 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L138" class="LineNr">138 </span> 55/push-ebp
<span id="L139" class="LineNr">139 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L140" class="LineNr">140 </span> <span class="subxS1Comment"># . save registers</span>
<span id="L141" class="LineNr">141 </span> 51/push-ecx
<span id="L142" class="LineNr">142 </span> <span class="subxComment"># var s/ecx: (addr array byte)</span>
<span id="L143" class="LineNr">143 </span> ff 6/subop/push *(ebp+8)
<span id="L144" class="LineNr">144 </span> 68/push 4/imm32/size
<span id="L145" class="LineNr">145 </span> 89/&lt;- %ecx 4/r32/esp
<span id="L146" class="LineNr">146 </span> (<a href='108write.subx.html#L24'>write</a> 2 %ecx)
<span id="L147" class="LineNr">147 </span><span class="Constant">$print-byte-to-screen:end</span>:
<span id="L148" class="LineNr">148 </span> <span class="subxS1Comment"># . reclaim locals</span>
<span id="L149" class="LineNr">149 </span> 81 0/subop/add %esp 8/imm32
<span id="L150" class="LineNr">150 </span> <span class="subxS1Comment"># . restore registers</span>
<span id="L151" class="LineNr">151 </span> 59/pop-to-ecx
<span id="L152" class="LineNr">152 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L153" class="LineNr">153 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L154" class="LineNr">154 </span> 5d/pop-to-ebp
<span id="L155" class="LineNr">155 </span> c3/return
<span id="L156" class="LineNr">156 </span>
<span id="L157" class="LineNr">157 </span><span class="subxComment"># just because Mu has no support for global variables yet</span>
<span id="L158" class="LineNr">158 </span><span class="subxFunction">print-int32-hex-to-screen</span>: <span class="subxComment"># n: int</span>
<span id="L159" class="LineNr">159 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L160" class="LineNr">160 </span> 55/push-ebp
<span id="L161" class="LineNr">161 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L162" class="LineNr">162 </span> <span class="subxComment">#</span>
<span id="L163" class="LineNr">163 </span> (<a href='117write-int-hex.subx.html#L266'>write-int32-hex-buffered</a> <span class="SpecialChar"><a href='115write-byte.subx.html#L10'>Stdout</a></span> *(ebp+8))
<span id="L164" class="LineNr">164 </span> (<a href='115write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='115write-byte.subx.html#L10'>Stdout</a></span>)
<span id="L165" class="LineNr">165 </span><span class="Constant">$print-int32-hex-to-screen:end</span>:
<span id="L166" class="LineNr">166 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L167" class="LineNr">167 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L168" class="LineNr">168 </span> 5d/pop-to-ebp
<span id="L169" class="LineNr">169 </span> c3/return
<span id="L170" class="LineNr">170 </span>
<span id="L171" class="LineNr">171 </span><span class="subxFunction">reset-formatting-on-screen</span>:
<span id="L172" class="LineNr">172 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L173" class="LineNr">173 </span> 55/push-ebp
<span id="L174" class="LineNr">174 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L175" class="LineNr">175 </span> <span class="subxComment">#</span>
<span id="L176" class="LineNr">176 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L177" class="LineNr">177 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;(B&quot;</span>)
<span id="L178" class="LineNr">178 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L179" class="LineNr">179 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[m&quot;</span>)
<span id="L180" class="LineNr">180 </span><span class="Constant">$reset-formatting-on-screen:end</span>:
<span id="L181" class="LineNr">181 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L182" class="LineNr">182 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L183" class="LineNr">183 </span> 5d/pop-to-ebp
<span id="L184" class="LineNr">184 </span> c3/return
<span id="L185" class="LineNr">185 </span>
<span id="L186" class="LineNr">186 </span><span class="subxFunction">start-color-on-screen</span>: <span class="subxComment"># fg: int, bg: int</span>
<span id="L187" class="LineNr">187 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L188" class="LineNr">188 </span> 55/push-ebp
<span id="L189" class="LineNr">189 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L190" class="LineNr">190 </span> <span class="subxS1Comment"># . save registers</span>
<span id="L191" class="LineNr">191 </span> 51/push-ecx
<span id="L192" class="LineNr">192 </span> <span class="subxComment"># var buf/ecx: (stream byte 32)</span>
<span id="L193" class="LineNr">193 </span> 81 5/subop/subtract %esp 0x20/imm32
<span id="L194" class="LineNr">194 </span> 68/push 0x20/imm32/size
<span id="L195" class="LineNr">195 </span> 68/push 0/imm32/read
<span id="L196" class="LineNr">196 </span> 68/push 0/imm32/write
<span id="L197" class="LineNr">197 </span> 89/&lt;- %ecx 4/r32/esp
<span id="L198" class="LineNr">198 </span> <span class="subxComment"># construct directive in buf</span>
<span id="L199" class="LineNr">199 </span> <span class="subxS1Comment"># . set fg</span>
<span id="L200" class="LineNr">200 </span> (<a href='108write.subx.html#L24'>write</a> %ecx <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L201" class="LineNr">201 </span> (<a href='108write.subx.html#L24'>write</a> %ecx <span class="Constant">&quot;[38;5;&quot;</span>)
<span id="L202" class="LineNr">202 </span> (<a href='126write-int-decimal.subx.html#L8'>write-int32-decimal</a> %ecx *(ebp+8))
<span id="L203" class="LineNr">203 </span> (<a href='108write.subx.html#L24'>write</a> %ecx <span class="Constant">&quot;m&quot;</span>)
<span id="L204" class="LineNr">204 </span> <span class="subxS1Comment"># . set bg</span>
<span id="L205" class="LineNr">205 </span> (<a href='108write.subx.html#L24'>write</a> %ecx <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L206" class="LineNr">206 </span> (<a href='108write.subx.html#L24'>write</a> %ecx <span class="Constant">&quot;[48;5;&quot;</span>)
<span id="L207" class="LineNr">207 </span> (<a href='126write-int-decimal.subx.html#L8'>write-int32-decimal</a> %ecx *(ebp+0xc))
<span id="L208" class="LineNr">208 </span> (<a href='108write.subx.html#L24'>write</a> %ecx <span class="Constant">&quot;m&quot;</span>)
<span id="L209" class="LineNr">209 </span> <span class="subxComment"># flush</span>
<span id="L210" class="LineNr">210 </span> (<a href='113write-stream.subx.html#L17'>write-stream</a> 2 %ecx)
<span id="L211" class="LineNr">211 </span><span class="Constant">$start-color-on-screen:end</span>:
<span id="L212" class="LineNr">212 </span> <span class="subxS1Comment"># . reclaim locals</span>
<span id="L213" class="LineNr">213 </span> 81 0/subop/add %esp 0x2c/imm32
<span id="L214" class="LineNr">214 </span> <span class="subxS1Comment"># . restore registers</span>
<span id="L215" class="LineNr">215 </span> 59/pop-to-ecx
<span id="L216" class="LineNr">216 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L217" class="LineNr">217 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L218" class="LineNr">218 </span> 5d/pop-to-ebp
<span id="L219" class="LineNr">219 </span> c3/return
<span id="L220" class="LineNr">220 </span>
<span id="L221" class="LineNr">221 </span><span class="subxFunction">start-bold-on-screen</span>:
<span id="L222" class="LineNr">222 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L223" class="LineNr">223 </span> 55/push-ebp
<span id="L224" class="LineNr">224 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L225" class="LineNr">225 </span> <span class="subxComment">#</span>
<span id="L226" class="LineNr">226 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L227" class="LineNr">227 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[1m&quot;</span>)
<span id="L228" class="LineNr">228 </span><span class="Constant">$start-bold-on-screen:end</span>:
<span id="L229" class="LineNr">229 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L230" class="LineNr">230 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L231" class="LineNr">231 </span> 5d/pop-to-ebp
<span id="L232" class="LineNr">232 </span> c3/return
<span id="L233" class="LineNr">233 </span>
<span id="L234" class="LineNr">234 </span><span class="subxFunction">start-underline-on-screen</span>:
<span id="L235" class="LineNr">235 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L236" class="LineNr">236 </span> 55/push-ebp
<span id="L237" class="LineNr">237 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L238" class="LineNr">238 </span> <span class="subxComment">#</span>
<span id="L239" class="LineNr">239 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L240" class="LineNr">240 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[4m&quot;</span>)
<span id="L241" class="LineNr">241 </span><span class="Constant">$start-underline-on-screen:end</span>:
<span id="L242" class="LineNr">242 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L243" class="LineNr">243 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L244" class="LineNr">244 </span> 5d/pop-to-ebp
<span id="L245" class="LineNr">245 </span> c3/return
<span id="L246" class="LineNr">246 </span>
<span id="L247" class="LineNr">247 </span><span class="subxFunction">start-reverse-video-on-screen</span>:
<span id="L248" class="LineNr">248 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L249" class="LineNr">249 </span> 55/push-ebp
<span id="L250" class="LineNr">250 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L251" class="LineNr">251 </span> <span class="subxComment">#</span>
<span id="L252" class="LineNr">252 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L253" class="LineNr">253 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[7m&quot;</span>)
<span id="L254" class="LineNr">254 </span><span class="Constant">$start-reverse-video-on-screen:end</span>:
<span id="L255" class="LineNr">255 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L256" class="LineNr">256 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L257" class="LineNr">257 </span> 5d/pop-to-ebp
<span id="L258" class="LineNr">258 </span> c3/return
<span id="L259" class="LineNr">259 </span>
<span id="L260" class="LineNr">260 </span><span class="subxComment"># might require enabling blinking in your terminal program</span>
<span id="L261" class="LineNr">261 </span><span class="subxFunction">start-blinking-on-screen</span>:
<span id="L262" class="LineNr">262 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L263" class="LineNr">263 </span> 55/push-ebp
<span id="L264" class="LineNr">264 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L265" class="LineNr">265 </span> <span class="subxComment">#</span>
<span id="L266" class="LineNr">266 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L267" class="LineNr">267 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[5m&quot;</span>)
<span id="L268" class="LineNr">268 </span><span class="Constant">$start-blinking-on-screen:end</span>:
<span id="L269" class="LineNr">269 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L270" class="LineNr">270 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L271" class="LineNr">271 </span> 5d/pop-to-ebp
<span id="L272" class="LineNr">272 </span> c3/return
<span id="L273" class="LineNr">273 </span>
<span id="L274" class="LineNr">274 </span><span class="subxFunction">hide-cursor-on-screen</span>:
<span id="L275" class="LineNr">275 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L276" class="LineNr">276 </span> 55/push-ebp
<span id="L277" class="LineNr">277 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L278" class="LineNr">278 </span> <span class="subxComment">#</span>
<span id="L279" class="LineNr">279 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L280" class="LineNr">280 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[?25l&quot;</span>)
<span id="L281" class="LineNr">281 </span><span class="Constant">$hide-cursor-on-screen:end</span>:
<span id="L282" class="LineNr">282 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L283" class="LineNr">283 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L284" class="LineNr">284 </span> 5d/pop-to-ebp
<span id="L285" class="LineNr">285 </span> c3/return
<span id="L286" class="LineNr">286 </span>
<span id="L287" class="LineNr">287 </span><span class="subxFunction">show-cursor-on-screen</span>:
<span id="L288" class="LineNr">288 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L289" class="LineNr">289 </span> 55/push-ebp
<span id="L290" class="LineNr">290 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L291" class="LineNr">291 </span> <span class="subxComment">#</span>
<span id="L292" class="LineNr">292 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L293" class="LineNr">293 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[?12l&quot;</span>)
<span id="L294" class="LineNr">294 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="SpecialChar"><a href='304screen.subx.html#L331'>Esc</a></span>)
<span id="L295" class="LineNr">295 </span> (<a href='108write.subx.html#L24'>write</a> 2 <span class="Constant">&quot;[?25h&quot;</span>)
<span id="L296" class="LineNr">296 </span><span class="Constant">$show-cursor-on-screen:end</span>:
<span id="L297" class="LineNr">297 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L298" class="LineNr">298 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L299" class="LineNr">299 </span> 5d/pop-to-ebp
<span id="L300" class="LineNr">300 </span> c3/return
<span id="L301" class="LineNr">301 </span>
<span id="L302" class="LineNr">302 </span><span class="subxComment"># This is a low-level detail; I don't think everything should be a file.</span>
<span id="L303" class="LineNr">303 </span><span class="subxComment">#</span>
<span id="L304" class="LineNr">304 </span><span class="subxComment"># Open &quot;/dev/tty&quot; if necessary and cache its file descriptor in Terminal-file-descriptor</span>
<span id="L305" class="LineNr">305 </span><span class="subxComment"># where later primitives can use it.</span>
<span id="L306" class="LineNr">306 </span><span class="subxMinorFunction">_maybe-open-terminal</span>:
<span id="L307" class="LineNr">307 </span> 81 7/subop/compare *<span class="SpecialChar"><a href='304screen.subx.html#L328'>Terminal-file-descriptor</a></span> -1/imm32
<span id="L308" class="LineNr">308 </span> 75/jump-if-!= $_maybe-open-terminal:epilogue/disp8
<span id="L309" class="LineNr">309 </span> <span class="subxS1Comment"># . save registers</span>
<span id="L310" class="LineNr">310 </span> 50/push-eax
<span id="L311" class="LineNr">311 </span> 51/push-ecx
<span id="L312" class="LineNr">312 </span> 53/push-ebx
<span id="L313" class="LineNr">313 </span> <span class="subxComment"># open(&quot;/dev/tty&quot;, O_RDWR)</span>
<span id="L314" class="LineNr">314 </span> bb/copy-to-ebx <span class="SpecialChar"><a href='304screen.subx.html#L337'>Terminal-filename</a></span>/imm32
<span id="L315" class="LineNr">315 </span> b9/copy-to-ecx 2/imm32/O_RDWR
<span id="L316" class="LineNr">316 </span> e8/call syscall_open/disp32
<span id="L317" class="LineNr">317 </span> 89/&lt;- *<span class="SpecialChar"><a href='304screen.subx.html#L328'>Terminal-file-descriptor</a></span> 0/r32/eax
<span id="L318" class="LineNr">318 </span><span class="Constant">$_maybe-open-terminal:end</span>:
<span id="L319" class="LineNr">319 </span> <span class="subxS1Comment"># . restore registers</span>
<span id="L320" class="LineNr">320 </span> 5b/pop-to-ebx
<span id="L321" class="LineNr">321 </span> 59/pop-to-ecx
<span id="L322" class="LineNr">322 </span> 58/pop-to-eax
<span id="L323" class="LineNr">323 </span><span class="Constant">$_maybe-open-terminal:epilogue</span>:
<span id="L324" class="LineNr">324 </span> c3/return
<span id="L325" class="LineNr">325 </span>
<span id="L326" class="LineNr">326 </span>== data
<span id="L327" class="LineNr">327 </span>
<span id="L328" class="LineNr">328 </span><span class="SpecialChar">Terminal-file-descriptor</span>: <span class="subxComment"># (addr int)</span>
<span id="L329" class="LineNr">329 </span> -1/imm32
<span id="L330" class="LineNr">330 </span>
<span id="L331" class="LineNr">331 </span><span class="SpecialChar">Esc</span>: <span class="subxComment"># (addr array byte)</span>
<span id="L332" class="LineNr">332 </span> <span class="subxComment"># size</span>
<span id="L333" class="LineNr">333 </span> 1/imm32
<span id="L334" class="LineNr">334 </span> <span class="subxComment"># data</span>
<span id="L335" class="LineNr">335 </span> 0x1b
<span id="L336" class="LineNr">336 </span>
<span id="L337" class="LineNr">337 </span><span class="SpecialChar">Terminal-filename</span>: <span class="subxComment"># (addr kernel-string)</span>
<span id="L338" class="LineNr">338 </span> <span class="subxComment"># &quot;/dev/null&quot;</span>
<span id="L339" class="LineNr">339 </span> 2f/slash 64/d 65/e 76/v 2f/slash 74/t 74/t 79/y 0/nul
</pre>
</body>
</html>
<!-- vim: set foldmethod=manual : -->

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 104keyboard.subx</title>
<title>Mu - 305keyboard.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -54,7 +54,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/104keyboard.subx'>https://github.com/akkartik/mu/blob/master/104keyboard.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/305keyboard.subx'>https://github.com/akkartik/mu/blob/master/305keyboard.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Primitives for keyboard control.</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment"># Require Linux and a modern terminal.</span>
@ -73,7 +73,7 @@ if ('onhashchange' in window) {
<span id="L15" class="LineNr"> 15 </span> 56/push-esi
<span id="L16" class="LineNr"> 16 </span> 57/push-edi
<span id="L17" class="LineNr"> 17 </span> <span class="subxComment">#</span>
<span id="L18" class="LineNr"> 18 </span> (<a href='103screen.subx.html#L305'>_maybe-open-terminal</a>)
<span id="L18" class="LineNr"> 18 </span> (<a href='304screen.subx.html#L306'>_maybe-open-terminal</a>)
<span id="L19" class="LineNr"> 19 </span> <span class="subxComment"># var terminal-info/esi: (addr termios)</span>
<span id="L20" class="LineNr"> 20 </span> <span class="subxComment"># termios is a type from the Linux kernel. We don't care how large it is.</span>
<span id="L21" class="LineNr"> 21 </span> 81 5/subop/subtract %esp 0x100/imm32
@ -81,7 +81,7 @@ if ('onhashchange' in window) {
<span id="L23" class="LineNr"> 23 </span> <span class="subxComment"># ioctl(*Terminal-file-descriptor, TCGETS, terminal-info)</span>
<span id="L24" class="LineNr"> 24 </span> 89/&lt;- %edx 6/r32/esi
<span id="L25" class="LineNr"> 25 </span> b9/copy-to-ecx 0x5401/imm32/TCGETS
<span id="L26" class="LineNr"> 26 </span> 8b/-&gt; *<span class="SpecialChar"><a href='103screen.subx.html#L327'>Terminal-file-descriptor</a></span> 3/r32/ebx
<span id="L26" class="LineNr"> 26 </span> 8b/-&gt; *<span class="SpecialChar"><a href='304screen.subx.html#L328'>Terminal-file-descriptor</a></span> 3/r32/ebx
<span id="L27" class="LineNr"> 27 </span> e8/call syscall_ioctl/disp32
<span id="L28" class="LineNr"> 28 </span> <span class="subxComment"># terminal-info-&gt;c_iflags &amp;= Keyboard-immediate-mode-iflags</span>
<span id="L29" class="LineNr"> 29 </span><span class="CommentedCode">#? (write-buffered Stderr &quot;iflags before: &quot;)</span>
@ -89,7 +89,7 @@ if ('onhashchange' in window) {
<span id="L31" class="LineNr"> 31 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span>
<span id="L32" class="LineNr"> 32 </span><span class="CommentedCode">#? (flush Stderr)</span>
<span id="L33" class="LineNr"> 33 </span> 8b/-&gt; *esi 0/r32/eax <span class="subxComment"># Termios-c_iflag</span>
<span id="L34" class="LineNr"> 34 </span> 23/and *<span class="SpecialChar"><a href='104keyboard.subx.html#L184'>Keyboard-immediate-mode-iflags</a></span> 0/r32/eax
<span id="L34" class="LineNr"> 34 </span> 23/and *<span class="SpecialChar"><a href='305keyboard.subx.html#L184'>Keyboard-immediate-mode-iflags</a></span> 0/r32/eax
<span id="L35" class="LineNr"> 35 </span> 89/&lt;- *esi 0/r32/eax <span class="subxComment"># Termios-c_iflag</span>
<span id="L36" class="LineNr"> 36 </span><span class="CommentedCode">#? (write-buffered Stderr &quot;iflags after: &quot;)</span>
<span id="L37" class="LineNr"> 37 </span><span class="CommentedCode">#? (write-int32-hex-buffered Stderr *esi)</span>
@ -101,7 +101,7 @@ if ('onhashchange' in window) {
<span id="L43" class="LineNr"> 43 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span>
<span id="L44" class="LineNr"> 44 </span><span class="CommentedCode">#? (flush Stderr)</span>
<span id="L45" class="LineNr"> 45 </span> 8b/-&gt; *(esi+0xc) 0/r32/eax <span class="subxComment"># Termios-c_lflag</span>
<span id="L46" class="LineNr"> 46 </span> 23/and *<span class="SpecialChar"><a href='104keyboard.subx.html#L188'>Keyboard-immediate-mode-lflags</a></span> 0/r32/eax
<span id="L46" class="LineNr"> 46 </span> 23/and *<span class="SpecialChar"><a href='305keyboard.subx.html#L188'>Keyboard-immediate-mode-lflags</a></span> 0/r32/eax
<span id="L47" class="LineNr"> 47 </span> 89/&lt;- *(esi+0xc) 0/r32/eax <span class="subxComment"># Termios-c_lflag</span>
<span id="L48" class="LineNr"> 48 </span><span class="CommentedCode">#? (write-buffered Stderr &quot;lflags after: &quot;)</span>
<span id="L49" class="LineNr"> 49 </span><span class="CommentedCode">#? (write-int32-hex-buffered Stderr *(esi+0xc))</span>
@ -110,7 +110,7 @@ if ('onhashchange' in window) {
<span id="L52" class="LineNr"> 52 </span> <span class="subxComment"># ioctl(*Terminal-file-descriptor, TCSETS, terminal-info)</span>
<span id="L53" class="LineNr"> 53 </span> 89/&lt;- %edx 6/r32/esi
<span id="L54" class="LineNr"> 54 </span> b9/copy-to-ecx 0x5402/imm32/TCSETS
<span id="L55" class="LineNr"> 55 </span> 8b/-&gt; *<span class="SpecialChar"><a href='103screen.subx.html#L327'>Terminal-file-descriptor</a></span> 3/r32/ebx
<span id="L55" class="LineNr"> 55 </span> 8b/-&gt; *<span class="SpecialChar"><a href='304screen.subx.html#L328'>Terminal-file-descriptor</a></span> 3/r32/ebx
<span id="L56" class="LineNr"> 56 </span> e8/call syscall_ioctl/disp32
<span id="L57" class="LineNr"> 57 </span><span class="Constant">$enable-keyboard-immediate-mode:end</span>:
<span id="L58" class="LineNr"> 58 </span> <span class="subxS1Comment"># . reclaim locals</span>
@ -139,7 +139,7 @@ if ('onhashchange' in window) {
<span id="L81" class="LineNr"> 81 </span> 56/push-esi
<span id="L82" class="LineNr"> 82 </span> 57/push-edi
<span id="L83" class="LineNr"> 83 </span> <span class="subxComment">#</span>
<span id="L84" class="LineNr"> 84 </span> (<a href='103screen.subx.html#L305'>_maybe-open-terminal</a>)
<span id="L84" class="LineNr"> 84 </span> (<a href='304screen.subx.html#L306'>_maybe-open-terminal</a>)
<span id="L85" class="LineNr"> 85 </span> <span class="subxComment"># var terminal-info/esi: (addr termios)</span>
<span id="L86" class="LineNr"> 86 </span> <span class="subxComment"># termios is a type from the Linux kernel. We don't care how large it is.</span>
<span id="L87" class="LineNr"> 87 </span> 81 5/subop/subtract %esp 0x100/imm32
@ -147,20 +147,20 @@ if ('onhashchange' in window) {
<span id="L89" class="LineNr"> 89 </span> <span class="subxComment"># ioctl(*Terminal-file-descriptor, TCGETS, terminal-info)</span>
<span id="L90" class="LineNr"> 90 </span> 89/&lt;- %edx 6/r32/esi
<span id="L91" class="LineNr"> 91 </span> b9/copy-to-ecx 0x5401/imm32/TCGETS
<span id="L92" class="LineNr"> 92 </span> 8b/-&gt; *<span class="SpecialChar"><a href='103screen.subx.html#L327'>Terminal-file-descriptor</a></span> 3/r32/ebx
<span id="L92" class="LineNr"> 92 </span> 8b/-&gt; *<span class="SpecialChar"><a href='304screen.subx.html#L328'>Terminal-file-descriptor</a></span> 3/r32/ebx
<span id="L93" class="LineNr"> 93 </span> e8/call syscall_ioctl/disp32
<span id="L94" class="LineNr"> 94 </span> <span class="subxComment"># terminal-info-&gt;c_iflags |= Keyboard-type-mode-iflags</span>
<span id="L95" class="LineNr"> 95 </span> 8b/-&gt; *esi 0/r32/eax <span class="subxComment"># Termios-c_iflag</span>
<span id="L96" class="LineNr"> 96 </span> 0b/or *<span class="SpecialChar"><a href='104keyboard.subx.html#L192'>Keyboard-type-mode-iflags</a></span> 0/r32/eax
<span id="L96" class="LineNr"> 96 </span> 0b/or *<span class="SpecialChar"><a href='305keyboard.subx.html#L192'>Keyboard-type-mode-iflags</a></span> 0/r32/eax
<span id="L97" class="LineNr"> 97 </span> 89/&lt;- *esi 0/r32/eax <span class="subxComment"># Termios-c_iflag</span>
<span id="L98" class="LineNr"> 98 </span> <span class="subxComment"># terminal-info-&gt;c_lflags |= Keyboard-type-mode-lflags</span>
<span id="L99" class="LineNr"> 99 </span> 8b/-&gt; *(esi+0xc) 0/r32/eax <span class="subxComment"># Termios-c_lflag</span>
<span id="L100" class="LineNr">100 </span> 0b/or *<span class="SpecialChar"><a href='104keyboard.subx.html#L195'>Keyboard-type-mode-lflags</a></span> 0/r32/eax
<span id="L100" class="LineNr">100 </span> 0b/or *<span class="SpecialChar"><a href='305keyboard.subx.html#L195'>Keyboard-type-mode-lflags</a></span> 0/r32/eax
<span id="L101" class="LineNr">101 </span> 89/&lt;- *(esi+0xc) 0/r32/eax <span class="subxComment"># Termios-c_lflag</span>
<span id="L102" class="LineNr">102 </span> <span class="subxComment"># ioctl(*Terminal-file-descriptor, TCSETS, terminal-info)</span>
<span id="L103" class="LineNr">103 </span> 89/&lt;- %edx 6/r32/esi
<span id="L104" class="LineNr">104 </span> b9/copy-to-ecx 0x5402/imm32/TCSETS
<span id="L105" class="LineNr">105 </span> 8b/-&gt; *<span class="SpecialChar"><a href='103screen.subx.html#L327'>Terminal-file-descriptor</a></span> 3/r32/ebx
<span id="L105" class="LineNr">105 </span> 8b/-&gt; *<span class="SpecialChar"><a href='304screen.subx.html#L328'>Terminal-file-descriptor</a></span> 3/r32/ebx
<span id="L106" class="LineNr">106 </span> e8/call syscall_ioctl/disp32
<span id="L107" class="LineNr">107 </span><span class="Constant">$enable-keyboard-type-mode:end</span>:
<span id="L108" class="LineNr">108 </span> <span class="subxS1Comment"># . reclaim locals</span>
@ -177,7 +177,7 @@ if ('onhashchange' in window) {
<span id="L119" class="LineNr">119 </span> 5d/pop-to-ebp
<span id="L120" class="LineNr">120 </span> c3/return
<span id="L121" class="LineNr">121 </span>
<span id="L122" class="LineNr">122 </span><span class="subxFunction">read-key</span>: <span class="subxComment"># -&gt; eax: byte</span>
<span id="L122" class="LineNr">122 </span><span class="subxFunction">read-key</span>: <span class="subxComment"># -&gt; result/eax: byte</span>
<span id="L123" class="LineNr">123 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L124" class="LineNr">124 </span> 55/push-ebp
<span id="L125" class="LineNr">125 </span> 89/&lt;- %ebp 4/r32/esp
@ -190,7 +190,7 @@ if ('onhashchange' in window) {
<span id="L132" class="LineNr">132 </span> 68/push 0/imm32/write
<span id="L133" class="LineNr">133 </span> 89/&lt;- %ecx 4/r32/esp
<span id="L134" class="LineNr">134 </span> <span class="subxComment">#</span>
<span id="L135" class="LineNr">135 </span> (<a href='060read.subx.html#L48'>read</a> 2 %ecx) <span class="subxComment"># =&gt; eax</span>
<span id="L135" class="LineNr">135 </span> (<a href='111read.subx.html#L48'>read</a> 2 %ecx) <span class="subxComment"># =&gt; eax</span>
<span id="L136" class="LineNr">136 </span> 8b/-&gt; *(ecx+0xc) 0/r32/eax
<span id="L137" class="LineNr">137 </span><span class="Constant">$read-key:end</span>:
<span id="L138" class="LineNr">138 </span> <span class="subxS1Comment"># . reclaim locals</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 105files.subx</title>
<title>Mu - 306files.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -53,7 +53,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/105files.subx'>https://github.com/akkartik/mu/blob/master/105files.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/306files.subx'>https://github.com/akkartik/mu/blob/master/306files.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span>== code
<span id="L2" class="LineNr"> 2 </span>
@ -81,8 +81,8 @@ if ('onhashchange' in window) {
<span id="L24" class="LineNr">24 </span> 68/push 0/imm32/write
<span id="L25" class="LineNr">25 </span> 89/&lt;- %esi 4/r32/esp
<span id="L26" class="LineNr">26 </span> <span class="subxComment"># copy filename and a final null character</span>
<span id="L27" class="LineNr">27 </span> (<a href='055stream.subx.html#L17'>clear-stream</a> %esi)
<span id="L28" class="LineNr">28 </span> (<a href='057write.subx.html#L24'>write</a> %esi %ecx)
<span id="L27" class="LineNr">27 </span> (<a href='106stream.subx.html#L17'>clear-stream</a> %esi)
<span id="L28" class="LineNr">28 </span> (<a href='108write.subx.html#L24'>write</a> %esi %ecx)
<span id="L29" class="LineNr">29 </span> <span class="subxComment"># spill edx</span>
<span id="L30" class="LineNr">30 </span> 52/push-edx
<span id="L31" class="LineNr">31 </span> <span class="subxComment"># var fd/ecx: fd = open(filename)</span>
@ -94,10 +94,10 @@ if ('onhashchange' in window) {
<span id="L37" class="LineNr">37 </span> <span class="subxComment"># restore edx</span>
<span id="L38" class="LineNr">38 </span> 5a/pop-to-edx
<span id="L39" class="LineNr">39 </span> <span class="subxComment"># allocate a buffered-file</span>
<span id="L40" class="LineNr">40 </span> (<a href='069allocate.subx.html#L66'>allocate</a> <span class="SpecialChar"><a href='069allocate.subx.html#L27'>Heap</a></span> 0x1010 *(ebp+0x10)) <span class="subxComment"># file-buffer-size + 16 for other fields</span>
<span id="L40" class="LineNr">40 </span> (<a href='120allocate.subx.html#L66'>allocate</a> <span class="SpecialChar"><a href='120allocate.subx.html#L27'>Heap</a></span> 0x1010 *(ebp+0x10)) <span class="subxComment"># file-buffer-size + 16 for other fields</span>
<span id="L41" class="LineNr">41 </span> <span class="subxComment"># var out-addr/edi: (addr buffered-file)</span>
<span id="L42" class="LineNr">42 </span> 8b/-&gt; *(ebp+0x10) 7/r32/edi
<span id="L43" class="LineNr">43 </span> (<a href='069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L43" class="LineNr">43 </span> (<a href='120allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L44" class="LineNr">44 </span> 89/&lt;- %edi 0/r32/eax
<span id="L45" class="LineNr">45 </span> <span class="subxComment"># out-addr-&gt;size = 4KB</span>
<span id="L46" class="LineNr">46 </span> c7 0/subop/copy *(edi+0xc) 0x1000/imm32/file-buffer-size <span class="subxComment"># Stream-size + 4 for fd</span>

View File

@ -2,7 +2,7 @@
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 106size.subx</title>
<title>Mu - 307size.subx</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="none">
@ -52,7 +52,7 @@ if ('onhashchange' in window) {
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/106size.subx'>https://github.com/akkartik/mu/blob/master/106size.subx</a>
<a href='https://github.com/akkartik/mu/blob/master/307size.subx'>https://github.com/akkartik/mu/blob/master/307size.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Size of an array in bytes.</span>
<span id="L2" class="LineNr"> 2 </span>

View File

@ -94,41 +94,41 @@ if ('onhashchange' in window) {
<span id="L35" class="LineNr"> 35 </span><span class="PreProc">fn</span> <span class="muFunction">main</span><span class="PreProc"> -&gt; </span>exit-status/<span class="Constant">ebx</span>: int <span class="Delimiter">{</span>
<span id="L36" class="LineNr"> 36 </span> <span class="PreProc">var</span> look/<span class="Constant">esi</span>: byte <span class="SpecialChar">&lt;-</span> copy <span class="Constant">0</span> <span class="Comment"># lookahead</span>
<span id="L37" class="LineNr"> 37 </span> <span class="PreProc">var</span> n/<span class="Constant">eax</span>: int <span class="SpecialChar">&lt;-</span> copy <span class="Constant">0</span> <span class="Comment"># result of each expression</span>
<span id="L38" class="LineNr"> 38 </span> <a href='../103screen.subx.html#L122'>print-string-to-screen</a> <span class="Constant">&quot;press ctrl-c or ctrl-d to exit\n&quot;</span>
<span id="L38" class="LineNr"> 38 </span> <a href='../304screen.subx.html#L123'>print-string-to-screen</a> <span class="Constant">&quot;press ctrl-c or ctrl-d to exit\n&quot;</span>
<span id="L39" class="LineNr"> 39 </span> <span class="Comment"># read-eval-print loop</span>
<span id="L40" class="LineNr"> 40 </span> <span class="Delimiter">{</span>
<span id="L41" class="LineNr"> 41 </span> <span class="Comment"># print prompt</span>
<span id="L42" class="LineNr"> 42 </span> <a href='../103screen.subx.html#L122'>print-string-to-screen</a> <span class="Constant">&quot;&gt; &quot;</span>
<span id="L42" class="LineNr"> 42 </span> <a href='../304screen.subx.html#L123'>print-string-to-screen</a> <span class="Constant">&quot;&gt; &quot;</span>
<span id="L43" class="LineNr"> 43 </span> <span class="Comment"># read and eval</span>
<span id="L44" class="LineNr"> 44 </span> n, look <span class="SpecialChar">&lt;-</span> simplify <span class="Comment"># we explicitly thread 'look' everywhere</span>
<span id="L44" class="LineNr"> 44 </span> n, look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L57'>simplify</a> <span class="Comment"># we explicitly thread 'look' everywhere</span>
<span id="L45" class="LineNr"> 45 </span> <span class="Comment"># if (look == 0) break</span>
<span id="L46" class="LineNr"> 46 </span> compare look, <span class="Constant">0</span>
<span id="L47" class="LineNr"> 47 </span> <span class="PreProc">break-if-=</span>
<span id="L48" class="LineNr"> 48 </span> <span class="Comment"># print</span>
<span id="L49" class="LineNr"> 49 </span> <a href='../103screen.subx.html#L157'>print-int32-hex-to-screen</a> n
<span id="L50" class="LineNr"> 50 </span> <a href='../103screen.subx.html#L122'>print-string-to-screen</a> <span class="Constant">&quot;\n&quot;</span>
<span id="L49" class="LineNr"> 49 </span> <a href='../304screen.subx.html#L158'>print-int32-hex-to-screen</a> n
<span id="L50" class="LineNr"> 50 </span> <a href='../304screen.subx.html#L123'>print-string-to-screen</a> <span class="Constant">&quot;\n&quot;</span>
<span id="L51" class="LineNr"> 51 </span> <span class="Comment">#</span>
<span id="L52" class="LineNr"> 52 </span> <span class="PreProc">loop</span>
<span id="L53" class="LineNr"> 53 </span> <span class="Delimiter">}</span>
<span id="L54" class="LineNr"> 54 </span> exit-status <span class="SpecialChar">&lt;-</span> copy <span class="Constant">0</span>
<span id="L55" class="LineNr"> 55 </span><span class="Delimiter">}</span>
<span id="L56" class="LineNr"> 56 </span>
<span id="L57" class="LineNr"> 57 </span><span class="PreProc">fn</span> <span class="muFunction">simplify</span><span class="PreProc"> -&gt; </span>result/<span class="Constant">eax</span>: int, look/<span class="Constant">esi</span>: byte <span class="Delimiter">{</span>
<span id="L57" class="LineNr"> 57 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='arith.mu.html#L57'>simplify</a></span><span class="PreProc"> -&gt; </span>result/<span class="Constant">eax</span>: int, look/<span class="Constant">esi</span>: byte <span class="Delimiter">{</span>
<span id="L58" class="LineNr"> 58 </span> <span class="Comment"># prime the pump</span>
<span id="L59" class="LineNr"> 59 </span> look <span class="SpecialChar">&lt;-</span> get-char
<span id="L59" class="LineNr"> 59 </span> look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L246'>get-char</a>
<span id="L60" class="LineNr"> 60 </span> <span class="Comment"># do it</span>
<span id="L61" class="LineNr"> 61 </span> result, look <span class="SpecialChar">&lt;-</span> expression look
<span id="L61" class="LineNr"> 61 </span> result, look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L64'>expression</a> look
<span id="L62" class="LineNr"> 62 </span><span class="Delimiter">}</span>
<span id="L63" class="LineNr"> 63 </span>
<span id="L64" class="LineNr"> 64 </span><span class="PreProc">fn</span> <span class="muFunction">expression</span> _look: byte<span class="PreProc"> -&gt; </span>result/<span class="Constant">eax</span>: int, look/<span class="Constant">esi</span>: byte <span class="Delimiter">{</span>
<span id="L64" class="LineNr"> 64 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='arith.mu.html#L64'>expression</a></span> _look: byte<span class="PreProc"> -&gt; </span>result/<span class="Constant">eax</span>: int, look/<span class="Constant">esi</span>: byte <span class="Delimiter">{</span>
<span id="L65" class="LineNr"> 65 </span> look <span class="SpecialChar">&lt;-</span> copy _look <span class="Comment"># should be a no-op</span>
<span id="L66" class="LineNr"> 66 </span> <span class="Comment"># read arg</span>
<span id="L67" class="LineNr"> 67 </span> result, look <span class="SpecialChar">&lt;-</span> term look
<span id="L67" class="LineNr"> 67 </span> result, look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L107'>term</a> look
<span id="L68" class="LineNr"> 68 </span> $expression:<span class="PreProc">loop</span>: <span class="Delimiter">{</span>
<span id="L69" class="LineNr"> 69 </span> <span class="Comment"># while next non-space char in ['+', '-']</span>
<span id="L70" class="LineNr"> 70 </span> look <span class="SpecialChar">&lt;-</span> skip-spaces look
<span id="L70" class="LineNr"> 70 </span> look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L236'>skip-spaces</a> look
<span id="L71" class="LineNr"> 71 </span> <span class="Delimiter">{</span>
<span id="L72" class="LineNr"> 72 </span> <span class="PreProc">var</span> continue?/<span class="Constant">eax</span>: boolean <span class="SpecialChar">&lt;-</span> is-add-or-sub? look
<span id="L72" class="LineNr"> 72 </span> <span class="PreProc">var</span> continue?/<span class="Constant">eax</span>: boolean <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L187'>is-add-or-sub?</a> look
<span id="L73" class="LineNr"> 73 </span> compare continue?, <span class="Constant">0</span> <span class="Comment"># false</span>
<span id="L74" class="LineNr"> 74 </span> <span class="PreProc">break-if-=</span> $expression:<span class="PreProc">loop</span>
<span id="L75" class="LineNr"> 75 </span> <span class="Delimiter">}</span>
@ -137,10 +137,10 @@ if ('onhashchange' in window) {
<span id="L78" class="LineNr"> 78 </span> op, look <span class="SpecialChar">&lt;-</span> operator look
<span id="L79" class="LineNr"> 79 </span> <span class="Comment"># read next arg</span>
<span id="L80" class="LineNr"> 80 </span> <span class="PreProc">var</span> second/<span class="Constant">edx</span>: int <span class="SpecialChar">&lt;-</span> copy <span class="Constant">0</span>
<span id="L81" class="LineNr"> 81 </span> look <span class="SpecialChar">&lt;-</span> skip-spaces look
<span id="L81" class="LineNr"> 81 </span> look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L236'>skip-spaces</a> look
<span id="L82" class="LineNr"> 82 </span> <span class="Delimiter">{</span>
<span id="L83" class="LineNr"> 83 </span> <span class="PreProc">var</span> tmp/<span class="Constant">eax</span>: int <span class="SpecialChar">&lt;-</span> copy <span class="Constant">0</span>
<span id="L84" class="LineNr"> 84 </span> tmp, look <span class="SpecialChar">&lt;-</span> term look
<span id="L84" class="LineNr"> 84 </span> tmp, look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L107'>term</a> look
<span id="L85" class="LineNr"> 85 </span> second <span class="SpecialChar">&lt;-</span> copy tmp
<span id="L86" class="LineNr"> 86 </span> <span class="Delimiter">}</span>
<span id="L87" class="LineNr"> 87 </span> <span class="Comment"># reduce</span>
@ -160,19 +160,19 @@ if ('onhashchange' in window) {
<span id="L101" class="LineNr">101 </span> <span class="Delimiter">}</span>
<span id="L102" class="LineNr">102 </span> <span class="PreProc">loop</span>
<span id="L103" class="LineNr">103 </span> <span class="Delimiter">}</span>
<span id="L104" class="LineNr">104 </span> look <span class="SpecialChar">&lt;-</span> skip-spaces look
<span id="L104" class="LineNr">104 </span> look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L236'>skip-spaces</a> look
<span id="L105" class="LineNr">105 </span><span class="Delimiter">}</span>
<span id="L106" class="LineNr">106 </span>
<span id="L107" class="LineNr">107 </span><span class="PreProc">fn</span> <span class="muFunction">term</span> _look: byte<span class="PreProc"> -&gt; </span>result/<span class="Constant">eax</span>: int, look/<span class="Constant">esi</span>: byte <span class="Delimiter">{</span>
<span id="L107" class="LineNr">107 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='arith.mu.html#L107'>term</a></span> _look: byte<span class="PreProc"> -&gt; </span>result/<span class="Constant">eax</span>: int, look/<span class="Constant">esi</span>: byte <span class="Delimiter">{</span>
<span id="L108" class="LineNr">108 </span> look <span class="SpecialChar">&lt;-</span> copy _look <span class="Comment"># should be a no-op</span>
<span id="L109" class="LineNr">109 </span> <span class="Comment"># read arg</span>
<span id="L110" class="LineNr">110 </span> look <span class="SpecialChar">&lt;-</span> skip-spaces look
<span id="L111" class="LineNr">111 </span> result, look <span class="SpecialChar">&lt;-</span> factor look
<span id="L110" class="LineNr">110 </span> look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L236'>skip-spaces</a> look
<span id="L111" class="LineNr">111 </span> result, look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L150'>factor</a> look
<span id="L112" class="LineNr">112 </span> $term:<span class="PreProc">loop</span>: <span class="Delimiter">{</span>
<span id="L113" class="LineNr">113 </span> <span class="Comment"># while next non-space char in ['*', '/']</span>
<span id="L114" class="LineNr">114 </span> look <span class="SpecialChar">&lt;-</span> skip-spaces look
<span id="L114" class="LineNr">114 </span> look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L236'>skip-spaces</a> look
<span id="L115" class="LineNr">115 </span> <span class="Delimiter">{</span>
<span id="L116" class="LineNr">116 </span> <span class="PreProc">var</span> continue?/<span class="Constant">eax</span>: boolean <span class="SpecialChar">&lt;-</span> is-mul-or-div? look
<span id="L116" class="LineNr">116 </span> <span class="PreProc">var</span> continue?/<span class="Constant">eax</span>: boolean <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L169'>is-mul-or-div?</a> look
<span id="L117" class="LineNr">117 </span> compare continue?, <span class="Constant">0</span> <span class="Comment"># false</span>
<span id="L118" class="LineNr">118 </span> <span class="PreProc">break-if-=</span> $term:<span class="PreProc">loop</span>
<span id="L119" class="LineNr">119 </span> <span class="Delimiter">}</span>
@ -181,10 +181,10 @@ if ('onhashchange' in window) {
<span id="L122" class="LineNr">122 </span> op, look <span class="SpecialChar">&lt;-</span> operator look
<span id="L123" class="LineNr">123 </span> <span class="Comment"># read next arg</span>
<span id="L124" class="LineNr">124 </span> <span class="PreProc">var</span> second/<span class="Constant">edx</span>: int <span class="SpecialChar">&lt;-</span> copy <span class="Constant">0</span>
<span id="L125" class="LineNr">125 </span> look <span class="SpecialChar">&lt;-</span> skip-spaces look
<span id="L125" class="LineNr">125 </span> look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L236'>skip-spaces</a> look
<span id="L126" class="LineNr">126 </span> <span class="Delimiter">{</span>
<span id="L127" class="LineNr">127 </span> <span class="PreProc">var</span> tmp/<span class="Constant">eax</span>: int <span class="SpecialChar">&lt;-</span> copy <span class="Constant">0</span>
<span id="L128" class="LineNr">128 </span> tmp, look <span class="SpecialChar">&lt;-</span> factor look
<span id="L128" class="LineNr">128 </span> tmp, look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L150'>factor</a> look
<span id="L129" class="LineNr">129 </span> second <span class="SpecialChar">&lt;-</span> copy tmp
<span id="L130" class="LineNr">130 </span> <span class="Delimiter">}</span>
<span id="L131" class="LineNr">131 </span> <span class="Comment"># reduce</span>
@ -206,26 +206,26 @@ if ('onhashchange' in window) {
<span id="L147" class="LineNr">147 </span> <span class="Delimiter">}</span>
<span id="L148" class="LineNr">148 </span><span class="Delimiter">}</span>
<span id="L149" class="LineNr">149 </span>
<span id="L150" class="LineNr">150 </span><span class="PreProc">fn</span> <span class="muFunction">factor</span> _look: byte<span class="PreProc"> -&gt; </span>result/<span class="Constant">eax</span>: int, look/<span class="Constant">esi</span>: byte <span class="Delimiter">{</span>
<span id="L150" class="LineNr">150 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='arith.mu.html#L150'>factor</a></span> _look: byte<span class="PreProc"> -&gt; </span>result/<span class="Constant">eax</span>: int, look/<span class="Constant">esi</span>: byte <span class="Delimiter">{</span>
<span id="L151" class="LineNr">151 </span>$factor:body: <span class="Delimiter">{</span>
<span id="L152" class="LineNr">152 </span> look <span class="SpecialChar">&lt;-</span> copy _look <span class="Comment"># should be a no-op</span>
<span id="L153" class="LineNr">153 </span> look <span class="SpecialChar">&lt;-</span> skip-spaces look
<span id="L153" class="LineNr">153 </span> look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L236'>skip-spaces</a> look
<span id="L154" class="LineNr">154 </span> <span class="Comment"># if next char is not '(', parse a number</span>
<span id="L155" class="LineNr">155 </span> compare look, <span class="Constant">0x28</span> <span class="Comment"># '('</span>
<span id="L156" class="LineNr">156 </span> <span class="Delimiter">{</span>
<span id="L157" class="LineNr">157 </span> <span class="PreProc">break-if-=</span>
<span id="L158" class="LineNr">158 </span> result, look <span class="SpecialChar">&lt;-</span> num look
<span id="L158" class="LineNr">158 </span> result, look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L210'>num</a> look
<span id="L159" class="LineNr">159 </span> <span class="PreProc">break</span> $factor:body
<span id="L160" class="LineNr">160 </span> <span class="Delimiter">}</span>
<span id="L161" class="LineNr">161 </span> <span class="Comment"># otherwise recurse</span>
<span id="L162" class="LineNr">162 </span> look <span class="SpecialChar">&lt;-</span> get-char <span class="Comment"># '('</span>
<span id="L163" class="LineNr">163 </span> result, look <span class="SpecialChar">&lt;-</span> expression look
<span id="L164" class="LineNr">164 </span> look <span class="SpecialChar">&lt;-</span> skip-spaces look
<span id="L165" class="LineNr">165 </span> look <span class="SpecialChar">&lt;-</span> get-char <span class="Comment"># ')'</span>
<span id="L162" class="LineNr">162 </span> look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L246'>get-char</a> <span class="Comment"># '('</span>
<span id="L163" class="LineNr">163 </span> result, look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L64'>expression</a> look
<span id="L164" class="LineNr">164 </span> look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L236'>skip-spaces</a> look
<span id="L165" class="LineNr">165 </span> look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L246'>get-char</a> <span class="Comment"># ')'</span>
<span id="L166" class="LineNr">166 </span><span class="Delimiter">}</span> <span class="Comment"># $factor:body</span>
<span id="L167" class="LineNr">167 </span><span class="Delimiter">}</span>
<span id="L168" class="LineNr">168 </span>
<span id="L169" class="LineNr">169 </span><span class="PreProc">fn</span> <span class="muFunction">is-mul-or-div?</span> c: byte<span class="PreProc"> -&gt; </span>result/<span class="Constant">eax</span>: boolean <span class="Delimiter">{</span>
<span id="L169" class="LineNr">169 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='arith.mu.html#L169'>is-mul-or-div?</a></span> c: byte<span class="PreProc"> -&gt; </span>result/<span class="Constant">eax</span>: boolean <span class="Delimiter">{</span>
<span id="L170" class="LineNr">170 </span>$is-mul-or-div?:body: <span class="Delimiter">{</span>
<span id="L171" class="LineNr">171 </span> compare c, <span class="Constant">0x2a</span> <span class="Comment"># '*'</span>
<span id="L172" class="LineNr">172 </span> <span class="Delimiter">{</span>
@ -243,7 +243,7 @@ if ('onhashchange' in window) {
<span id="L184" class="LineNr">184 </span><span class="Delimiter">}</span> <span class="Comment"># $is-mul-or-div?:body</span>
<span id="L185" class="LineNr">185 </span><span class="Delimiter">}</span>
<span id="L186" class="LineNr">186 </span>
<span id="L187" class="LineNr">187 </span><span class="PreProc">fn</span> <span class="muFunction">is-add-or-sub?</span> c: byte<span class="PreProc"> -&gt; </span>result/<span class="Constant">eax</span>: boolean <span class="Delimiter">{</span>
<span id="L187" class="LineNr">187 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='arith.mu.html#L187'>is-add-or-sub?</a></span> c: byte<span class="PreProc"> -&gt; </span>result/<span class="Constant">eax</span>: boolean <span class="Delimiter">{</span>
<span id="L188" class="LineNr">188 </span>$is-add-or-sub?:body: <span class="Delimiter">{</span>
<span id="L189" class="LineNr">189 </span> compare c, <span class="Constant">0x2b</span> <span class="Comment"># '+'</span>
<span id="L190" class="LineNr">190 </span> <span class="Delimiter">{</span>
@ -263,20 +263,20 @@ if ('onhashchange' in window) {
<span id="L204" class="LineNr">204 </span>
<span id="L205" class="LineNr">205 </span><span class="PreProc">fn</span> <span class="muFunction">operator</span> _look: byte<span class="PreProc"> -&gt; </span>op/<span class="Constant">ecx</span>: byte, look/<span class="Constant">esi</span>: byte <span class="Delimiter">{</span>
<span id="L206" class="LineNr">206 </span> op <span class="SpecialChar">&lt;-</span> copy _look
<span id="L207" class="LineNr">207 </span> look <span class="SpecialChar">&lt;-</span> get-char
<span id="L207" class="LineNr">207 </span> look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L246'>get-char</a>
<span id="L208" class="LineNr">208 </span><span class="Delimiter">}</span>
<span id="L209" class="LineNr">209 </span>
<span id="L210" class="LineNr">210 </span><span class="PreProc">fn</span> <span class="muFunction">num</span> _look: byte<span class="PreProc"> -&gt; </span>result/<span class="Constant">eax</span>: int, look/<span class="Constant">esi</span>: byte <span class="Delimiter">{</span>
<span id="L210" class="LineNr">210 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='arith.mu.html#L210'>num</a></span> _look: byte<span class="PreProc"> -&gt; </span>result/<span class="Constant">eax</span>: int, look/<span class="Constant">esi</span>: byte <span class="Delimiter">{</span>
<span id="L211" class="LineNr">211 </span> look <span class="SpecialChar">&lt;-</span> copy _look <span class="Comment"># should be a no-op</span>
<span id="L212" class="LineNr">212 </span> <span class="PreProc">var</span> out/<span class="Constant">edi</span>: int <span class="SpecialChar">&lt;-</span> copy <span class="Constant">0</span>
<span id="L213" class="LineNr">213 </span> <span class="Delimiter">{</span>
<span id="L214" class="LineNr">214 </span> <span class="PreProc">var</span> first-digit/<span class="Constant">eax</span>: int <span class="SpecialChar">&lt;-</span> <a href='../075write-int-decimal.subx.html#L405'>to-decimal-digit</a> look
<span id="L214" class="LineNr">214 </span> <span class="PreProc">var</span> first-digit/<span class="Constant">eax</span>: int <span class="SpecialChar">&lt;-</span> <a href='../126write-int-decimal.subx.html#L405'>to-decimal-digit</a> look
<span id="L215" class="LineNr">215 </span> out <span class="SpecialChar">&lt;-</span> copy first-digit
<span id="L216" class="LineNr">216 </span> <span class="Delimiter">}</span>
<span id="L217" class="LineNr">217 </span> <span class="Delimiter">{</span>
<span id="L218" class="LineNr">218 </span> look <span class="SpecialChar">&lt;-</span> get-char
<span id="L218" class="LineNr">218 </span> look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L246'>get-char</a>
<span id="L219" class="LineNr">219 </span> <span class="Comment"># done?</span>
<span id="L220" class="LineNr">220 </span> <span class="PreProc">var</span> digit?/<span class="Constant">eax</span>: boolean <span class="SpecialChar">&lt;-</span> <a href='../075write-int-decimal.subx.html#L306'>is-decimal-digit?</a> look
<span id="L220" class="LineNr">220 </span> <span class="PreProc">var</span> digit?/<span class="Constant">eax</span>: boolean <span class="SpecialChar">&lt;-</span> <a href='../126write-int-decimal.subx.html#L306'>is-decimal-digit?</a> look
<span id="L221" class="LineNr">221 </span> compare digit?, <span class="Constant">0</span> <span class="Comment"># false</span>
<span id="L222" class="LineNr">222 </span> <span class="PreProc">break-if-=</span>
<span id="L223" class="LineNr">223 </span> <span class="Comment"># out *= 10</span>
@ -285,30 +285,30 @@ if ('onhashchange' in window) {
<span id="L226" class="LineNr">226 </span> out <span class="SpecialChar">&lt;-</span> multiply ten
<span id="L227" class="LineNr">227 </span> <span class="Delimiter">}</span>
<span id="L228" class="LineNr">228 </span> <span class="Comment"># out += digit(look)</span>
<span id="L229" class="LineNr">229 </span> <span class="PreProc">var</span> digit/<span class="Constant">eax</span>: int <span class="SpecialChar">&lt;-</span> <a href='../075write-int-decimal.subx.html#L405'>to-decimal-digit</a> look
<span id="L229" class="LineNr">229 </span> <span class="PreProc">var</span> digit/<span class="Constant">eax</span>: int <span class="SpecialChar">&lt;-</span> <a href='../126write-int-decimal.subx.html#L405'>to-decimal-digit</a> look
<span id="L230" class="LineNr">230 </span> out <span class="SpecialChar">&lt;-</span> add digit
<span id="L231" class="LineNr">231 </span> <span class="PreProc">loop</span>
<span id="L232" class="LineNr">232 </span> <span class="Delimiter">}</span>
<span id="L233" class="LineNr">233 </span> result <span class="SpecialChar">&lt;-</span> copy out
<span id="L234" class="LineNr">234 </span><span class="Delimiter">}</span>
<span id="L235" class="LineNr">235 </span>
<span id="L236" class="LineNr">236 </span><span class="PreProc">fn</span> <span class="muFunction">skip-spaces</span> _look: byte<span class="PreProc"> -&gt; </span>look/<span class="Constant">esi</span>: byte <span class="Delimiter">{</span>
<span id="L236" class="LineNr">236 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='arith.mu.html#L236'>skip-spaces</a></span> _look: byte<span class="PreProc"> -&gt; </span>look/<span class="Constant">esi</span>: byte <span class="Delimiter">{</span>
<span id="L237" class="LineNr">237 </span> look <span class="SpecialChar">&lt;-</span> copy _look <span class="Comment"># should be a no-op</span>
<span id="L238" class="LineNr">238 </span> <span class="Delimiter">{</span>
<span id="L239" class="LineNr">239 </span> compare look, <span class="Constant">0x20</span>
<span id="L240" class="LineNr">240 </span> <span class="PreProc">break-if-!=</span>
<span id="L241" class="LineNr">241 </span> look <span class="SpecialChar">&lt;-</span> get-char
<span id="L241" class="LineNr">241 </span> look <span class="SpecialChar">&lt;-</span> <a href='arith.mu.html#L246'>get-char</a>
<span id="L242" class="LineNr">242 </span> <span class="PreProc">loop</span>
<span id="L243" class="LineNr">243 </span> <span class="Delimiter">}</span>
<span id="L244" class="LineNr">244 </span><span class="Delimiter">}</span>
<span id="L245" class="LineNr">245 </span>
<span id="L246" class="LineNr">246 </span><span class="PreProc">fn</span> <span class="muFunction">get-char</span><span class="PreProc"> -&gt; </span>look/<span class="Constant">esi</span>: byte <span class="Delimiter">{</span>
<span id="L247" class="LineNr">247 </span> <span class="PreProc">var</span> tmp/<span class="Constant">eax</span>: byte <span class="SpecialChar">&lt;-</span> <a href='../104keyboard.subx.html#L122'>read-key</a>
<span id="L246" class="LineNr">246 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='arith.mu.html#L246'>get-char</a></span><span class="PreProc"> -&gt; </span>look/<span class="Constant">esi</span>: byte <span class="Delimiter">{</span>
<span id="L247" class="LineNr">247 </span> <span class="PreProc">var</span> tmp/<span class="Constant">eax</span>: byte <span class="SpecialChar">&lt;-</span> <a href='../305keyboard.subx.html#L122'>read-key</a>
<span id="L248" class="LineNr">248 </span> look <span class="SpecialChar">&lt;-</span> copy tmp
<span id="L249" class="LineNr">249 </span> compare look, <span class="Constant">0</span>
<span id="L250" class="LineNr">250 </span> <span class="Delimiter">{</span>
<span id="L251" class="LineNr">251 </span> <span class="PreProc">break-if-!=</span>
<span id="L252" class="LineNr">252 </span> <a href='../103screen.subx.html#L122'>print-string-to-screen</a> <span class="Constant">&quot;^D\n&quot;</span>
<span id="L252" class="LineNr">252 </span> <a href='../304screen.subx.html#L123'>print-string-to-screen</a> <span class="Constant">&quot;^D\n&quot;</span>
<span id="L253" class="LineNr">253 </span> syscall_exit
<span id="L254" class="LineNr">254 </span> <span class="Delimiter">}</span>
<span id="L255" class="LineNr">255 </span><span class="Delimiter">}</span>

View File

@ -92,10 +92,10 @@ if ('onhashchange' in window) {
<span id="L30" class="LineNr"> 30 </span> <span class="subxComment"># initialize heap</span>
<span id="L31" class="LineNr"> 31 </span> <span class="subxS1Comment"># . Heap = new-segment(Heap-size)</span>
<span id="L32" class="LineNr"> 32 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L33" class="LineNr"> 33 </span> 68/push <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L34" class="LineNr"> 34 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='../069allocate.subx.html#L34'>Heap-size</a></span>/disp32 <span class="subxComment"># push *Heap-size</span>
<span id="L33" class="LineNr"> 33 </span> 68/push <span class="SpecialChar"><a href='../120allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L34" class="LineNr"> 34 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='../120allocate.subx.html#L34'>Heap-size</a></span>/disp32 <span class="subxComment"># push *Heap-size</span>
<span id="L35" class="LineNr"> 35 </span> <span class="subxS2Comment"># . . call</span>
<span id="L36" class="LineNr"> 36 </span> e8/call <a href='../053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L36" class="LineNr"> 36 </span> e8/call <a href='../104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L37" class="LineNr"> 37 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L38" class="LineNr"> 38 </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="L39" class="LineNr"> 39 </span>
@ -109,7 +109,7 @@ if ('onhashchange' in window) {
<span id="L47" class="LineNr"> 47 </span> 68/push <span class="Constant">&quot;test&quot;</span>/imm32
<span id="L48" class="LineNr"> 48 </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="L49" class="LineNr"> 49 </span> <span class="subxS2Comment"># . . call</span>
<span id="L50" class="LineNr"> 50 </span> e8/call <a href='../052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L50" class="LineNr"> 50 </span> e8/call <a href='../103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L51" class="LineNr"> 51 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L52" class="LineNr"> 52 </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="L53" class="LineNr"> 53 </span> <span class="subxS1Comment"># . if (eax == false) goto interactive</span>
@ -118,7 +118,7 @@ if ('onhashchange' in window) {
<span id="L56" class="LineNr"> 56 </span> <span class="subxComment"># run-tests()</span>
<span id="L57" class="LineNr"> 57 </span> e8/call run-tests/disp32
<span id="L58" class="LineNr"> 58 </span> <span class="subxComment"># syscall(exit, *Num-test-failures)</span>
<span id="L59" class="LineNr"> 59 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='../051test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L59" class="LineNr"> 59 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='../102test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L60" class="LineNr"> 60 </span> eb/jump $subx-assort-main:end/disp8
<span id="L61" class="LineNr"> 61 </span><span class="Constant">$subx-assort-main:interactive</span>:
<span id="L62" class="LineNr"> 62 </span> <span class="subxH1Comment"># - otherwise convert stdin</span>
@ -131,9 +131,9 @@ if ('onhashchange' in window) {
<span id="L69" class="LineNr"> 69 </span> <span class="subxComment"># subx-assort(Stdin, Stdout, Stderr, ed)</span>
<span id="L70" class="LineNr"> 70 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L71" class="LineNr"> 71 </span> 50/push-eax/ed
<span id="L72" class="LineNr"> 72 </span> 68/push <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L73" class="LineNr"> 73 </span> 68/push <span class="SpecialChar"><a href='../064write-byte.subx.html#L10'>Stdout</a></span>/imm32
<span id="L74" class="LineNr"> 74 </span> 68/push <span class="SpecialChar"><a href='../061read-byte.subx.html#L14'>Stdin</a></span>/imm32
<span id="L72" class="LineNr"> 72 </span> 68/push <span class="SpecialChar"><a href='../116write-buffered.subx.html#L209'>Stderr</a></span>/imm32
<span id="L73" class="LineNr"> 73 </span> 68/push <span class="SpecialChar"><a href='../115write-byte.subx.html#L10'>Stdout</a></span>/imm32
<span id="L74" class="LineNr"> 74 </span> 68/push <span class="SpecialChar"><a href='../112read-byte.subx.html#L14'>Stdin</a></span>/imm32
<span id="L75" class="LineNr"> 75 </span> <span class="subxS2Comment"># . . call</span>
<span id="L76" class="LineNr"> 76 </span> e8/call <a href='assort.subx.html#L88'>subx-assort</a>/disp32
<span id="L77" class="LineNr"> 77 </span> <span class="subxS2Comment"># . . discard args</span>
@ -168,10 +168,10 @@ if ('onhashchange' in window) {
<span id="L106" class="LineNr"> 106 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L107" class="LineNr"> 107 </span> 51/push-ecx
<span id="L108" class="LineNr"> 108 </span> <span class="subxS2Comment"># . . call</span>
<span id="L109" class="LineNr"> 109 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L109" class="LineNr"> 109 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L110" class="LineNr"> 110 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L111" class="LineNr"> 111 </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="L112" class="LineNr"> 112 </span><span class="Constant">$subx-assort:<a href='../060read.subx.html#L48'>read</a></span>:
<span id="L112" class="LineNr"> 112 </span><span class="Constant">$subx-assort:<a href='../111read.subx.html#L48'>read</a></span>:
<span id="L113" class="Folded"> 113 </span><span class="Folded">+-- 9 lines: #? # print(&quot;read\n&quot;) --------------------------------------------------------------------------------------------------------------------------------------------------</span>
<span id="L122" class="LineNr"> 122 </span> <span class="subxComment"># read-segments(in, table)</span>
<span id="L123" class="LineNr"> 123 </span> <span class="subxS2Comment"># . . push args</span>
@ -181,7 +181,7 @@ if ('onhashchange' in window) {
<span id="L127" class="LineNr"> 127 </span> e8/call <a href='assort.subx.html#L452'>read-segments</a>/disp32
<span id="L128" class="LineNr"> 128 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L129" class="LineNr"> 129 </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="L130" class="LineNr"> 130 </span><span class="Constant">$subx-assort:<a href='../057write.subx.html#L24'>write</a></span>:
<span id="L130" class="LineNr"> 130 </span><span class="Constant">$subx-assort:<a href='../108write.subx.html#L24'>write</a></span>:
<span id="L131" class="Folded"> 131 </span><span class="Folded">+-- 9 lines: #? # print(&quot;write\n&quot;) -------------------------------------------------------------------------------------------------------------------------------------------------</span>
<span id="L140" class="LineNr"> 140 </span> <span class="subxComment"># write-segments(out, table)</span>
<span id="L141" class="LineNr"> 141 </span> <span class="subxS2Comment"># . . push args</span>
@ -208,30 +208,30 @@ if ('onhashchange' in window) {
<span id="L162" class="LineNr"> 162 </span> <span class="subxComment"># setup</span>
<span id="L163" class="LineNr"> 163 </span> <span class="subxS1Comment"># . clear-stream(_test-input-stream)</span>
<span id="L164" class="LineNr"> 164 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L165" class="LineNr"> 165 </span> 68/push <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L165" class="LineNr"> 165 </span> 68/push <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L166" class="LineNr"> 166 </span> <span class="subxS2Comment"># . . call</span>
<span id="L167" class="LineNr"> 167 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L167" class="LineNr"> 167 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L168" class="LineNr"> 168 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L169" class="LineNr"> 169 </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="L170" class="LineNr"> 170 </span> <span class="subxS1Comment"># . clear-stream($_test-input-buffered-file-&gt;buffer)</span>
<span id="L171" class="LineNr"> 171 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L172" class="LineNr"> 172 </span> 68/push $_test-input-buffered-file-&gt;buffer/imm32
<span id="L173" class="LineNr"> 173 </span> <span class="subxS2Comment"># . . call</span>
<span id="L174" class="LineNr"> 174 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L174" class="LineNr"> 174 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L175" class="LineNr"> 175 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L176" class="LineNr"> 176 </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="L177" class="LineNr"> 177 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L178" class="LineNr"> 178 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L179" class="LineNr"> 179 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L179" class="LineNr"> 179 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L180" class="LineNr"> 180 </span> <span class="subxS2Comment"># . . call</span>
<span id="L181" class="LineNr"> 181 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L181" class="LineNr"> 181 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L182" class="LineNr"> 182 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L183" class="LineNr"> 183 </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="L184" class="LineNr"> 184 </span> <span class="subxS1Comment"># . clear-stream($_test-output-buffered-file-&gt;buffer)</span>
<span id="L185" class="LineNr"> 185 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L186" class="LineNr"> 186 </span> 68/push $_test-output-buffered-file-&gt;buffer/imm32
<span id="L187" class="LineNr"> 187 </span> <span class="subxS2Comment"># . . call</span>
<span id="L188" class="LineNr"> 188 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L188" class="LineNr"> 188 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L189" class="LineNr"> 189 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L190" class="LineNr"> 190 </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="L191" class="LineNr"> 191 </span> <span class="subxComment"># initialize input (meta comments in parens)</span>
@ -252,128 +252,128 @@ if ('onhashchange' in window) {
<span id="L206" class="LineNr"> 206 </span> <span class="subxS1Comment"># . write(_test-input-stream, &quot;# comment 1\n&quot;)</span>
<span id="L207" class="LineNr"> 207 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L208" class="LineNr"> 208 </span> 68/push <span class="Constant">&quot;# comment 1\n&quot;</span>/imm32
<span id="L209" class="LineNr"> 209 </span> 68/push <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L209" class="LineNr"> 209 </span> 68/push <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L210" class="LineNr"> 210 </span> <span class="subxS2Comment"># . . call</span>
<span id="L211" class="LineNr"> 211 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L211" class="LineNr"> 211 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L212" class="LineNr"> 212 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L213" class="LineNr"> 213 </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="L214" class="LineNr"> 214 </span> <span class="subxS1Comment"># . write(_test-input-stream, &quot; # comment 2 indented\n&quot;)</span>
<span id="L215" class="LineNr"> 215 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L216" class="LineNr"> 216 </span> 68/push <span class="Constant">&quot; # comment 2 indented\n&quot;</span>/imm32
<span id="L217" class="LineNr"> 217 </span> 68/push <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L217" class="LineNr"> 217 </span> 68/push <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L218" class="LineNr"> 218 </span> <span class="subxS2Comment"># . . call</span>
<span id="L219" class="LineNr"> 219 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L219" class="LineNr"> 219 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L220" class="LineNr"> 220 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L221" class="LineNr"> 221 </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="L222" class="LineNr"> 222 </span> <span class="subxS1Comment"># . write(_test-input-stream, &quot;== code 0x09000000\n&quot;)</span>
<span id="L223" class="LineNr"> 223 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L224" class="LineNr"> 224 </span> 68/push <span class="Constant">&quot;== code 0x09000000\n&quot;</span>/imm32
<span id="L225" class="LineNr"> 225 </span> 68/push <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L225" class="LineNr"> 225 </span> 68/push <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L226" class="LineNr"> 226 </span> <span class="subxS2Comment"># . . call</span>
<span id="L227" class="LineNr"> 227 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L227" class="LineNr"> 227 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L228" class="LineNr"> 228 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L229" class="LineNr"> 229 </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="L230" class="LineNr"> 230 </span> <span class="subxS1Comment"># . write(_test-input-stream, &quot;# comment 3 inside a segment\n&quot;)</span>
<span id="L231" class="LineNr"> 231 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L232" class="LineNr"> 232 </span> 68/push <span class="Constant">&quot;# comment 3 inside a segment\n&quot;</span>/imm32
<span id="L233" class="LineNr"> 233 </span> 68/push <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L233" class="LineNr"> 233 </span> 68/push <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L234" class="LineNr"> 234 </span> <span class="subxS2Comment"># . . call</span>
<span id="L235" class="LineNr"> 235 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L235" class="LineNr"> 235 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L236" class="LineNr"> 236 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L237" class="LineNr"> 237 </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="L238" class="LineNr"> 238 </span> <span class="subxS1Comment"># . write(_test-input-stream, &quot;1\n&quot;)</span>
<span id="L239" class="LineNr"> 239 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L240" class="LineNr"> 240 </span> 68/push <span class="Constant">&quot;1\n&quot;</span>/imm32
<span id="L241" class="LineNr"> 241 </span> 68/push <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L241" class="LineNr"> 241 </span> 68/push <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L242" class="LineNr"> 242 </span> <span class="subxS2Comment"># . . call</span>
<span id="L243" class="LineNr"> 243 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L243" class="LineNr"> 243 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L244" class="LineNr"> 244 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L245" class="LineNr"> 245 </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="L246" class="LineNr"> 246 </span> <span class="subxS1Comment"># . write(_test-input-stream, &quot;\n&quot;) # empty line</span>
<span id="L247" class="LineNr"> 247 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L248" class="LineNr"> 248 </span> 68/push <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>/imm32
<span id="L249" class="LineNr"> 249 </span> 68/push <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L248" class="LineNr"> 248 </span> 68/push <span class="SpecialChar"><a href='../102test.subx.html#L82'>Newline</a></span>/imm32
<span id="L249" class="LineNr"> 249 </span> 68/push <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L250" class="LineNr"> 250 </span> <span class="subxS2Comment"># . . call</span>
<span id="L251" class="LineNr"> 251 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L251" class="LineNr"> 251 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L252" class="LineNr"> 252 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L253" class="LineNr"> 253 </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="L254" class="LineNr"> 254 </span> <span class="subxS1Comment"># . write(_test-input-stream, &quot;2 3 # comment 4 inline with other contents\n&quot;)</span>
<span id="L255" class="LineNr"> 255 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L256" class="LineNr"> 256 </span> 68/push <span class="Constant">&quot;2 3 # comment 4 inline with other contents\n&quot;</span>/imm32
<span id="L257" class="LineNr"> 257 </span> 68/push <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L257" class="LineNr"> 257 </span> 68/push <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L258" class="LineNr"> 258 </span> <span class="subxS2Comment"># . . call</span>
<span id="L259" class="LineNr"> 259 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L259" class="LineNr"> 259 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L260" class="LineNr"> 260 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L261" class="LineNr"> 261 </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="L262" class="LineNr"> 262 </span> <span class="subxS1Comment"># . write(_test-input-stream, &quot;== data 0x0a000000\n&quot;)</span>
<span id="L263" class="LineNr"> 263 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L264" class="LineNr"> 264 </span> 68/push <span class="Constant">&quot;== data 0x0a000000\n&quot;</span>/imm32
<span id="L265" class="LineNr"> 265 </span> 68/push <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L265" class="LineNr"> 265 </span> 68/push <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L266" class="LineNr"> 266 </span> <span class="subxS2Comment"># . . call</span>
<span id="L267" class="LineNr"> 267 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L267" class="LineNr"> 267 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L268" class="LineNr"> 268 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L269" class="LineNr"> 269 </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="L270" class="LineNr"> 270 </span> <span class="subxS1Comment"># . write(_test-input-stream, &quot;4 5/imm32\n&quot;)</span>
<span id="L271" class="LineNr"> 271 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L272" class="LineNr"> 272 </span> 68/push <span class="Constant">&quot;4 5/imm32\n&quot;</span>/imm32
<span id="L273" class="LineNr"> 273 </span> 68/push <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L273" class="LineNr"> 273 </span> 68/push <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L274" class="LineNr"> 274 </span> <span class="subxS2Comment"># . . call</span>
<span id="L275" class="LineNr"> 275 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L275" class="LineNr"> 275 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L276" class="LineNr"> 276 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L277" class="LineNr"> 277 </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="L278" class="LineNr"> 278 </span> <span class="subxS1Comment"># . write(_test-input-stream, &quot;== code\n&quot;)</span>
<span id="L279" class="LineNr"> 279 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L280" class="LineNr"> 280 </span> 68/push <span class="Constant">&quot;== code\n&quot;</span>/imm32
<span id="L281" class="LineNr"> 281 </span> 68/push <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L281" class="LineNr"> 281 </span> 68/push <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L282" class="LineNr"> 282 </span> <span class="subxS2Comment"># . . call</span>
<span id="L283" class="LineNr"> 283 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L283" class="LineNr"> 283 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L284" class="LineNr"> 284 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L285" class="LineNr"> 285 </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="L286" class="LineNr"> 286 </span> <span class="subxS1Comment"># . write(_test-input-stream, &quot;6 7\n&quot;)</span>
<span id="L287" class="LineNr"> 287 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L288" class="LineNr"> 288 </span> 68/push <span class="Constant">&quot;6 7\n&quot;</span>/imm32
<span id="L289" class="LineNr"> 289 </span> 68/push <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L289" class="LineNr"> 289 </span> 68/push <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L290" class="LineNr"> 290 </span> <span class="subxS2Comment"># . . call</span>
<span id="L291" class="LineNr"> 291 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L291" class="LineNr"> 291 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L292" class="LineNr"> 292 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L293" class="LineNr"> 293 </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="L294" class="LineNr"> 294 </span> <span class="subxS1Comment"># . write(_test-input-stream, &quot;8 9\n&quot;)</span>
<span id="L295" class="LineNr"> 295 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L296" class="LineNr"> 296 </span> 68/push <span class="Constant">&quot;8 9\n&quot;</span>/imm32
<span id="L297" class="LineNr"> 297 </span> 68/push <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L297" class="LineNr"> 297 </span> 68/push <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L298" class="LineNr"> 298 </span> <span class="subxS2Comment"># . . call</span>
<span id="L299" class="LineNr"> 299 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L299" class="LineNr"> 299 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L300" class="LineNr"> 300 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L301" class="LineNr"> 301 </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="L302" class="LineNr"> 302 </span> <span class="subxS1Comment"># . write(_test-input-stream, &quot;== code\n&quot;)</span>
<span id="L303" class="LineNr"> 303 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L304" class="LineNr"> 304 </span> 68/push <span class="Constant">&quot;== code\n&quot;</span>/imm32
<span id="L305" class="LineNr"> 305 </span> 68/push <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L305" class="LineNr"> 305 </span> 68/push <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L306" class="LineNr"> 306 </span> <span class="subxS2Comment"># . . call</span>
<span id="L307" class="LineNr"> 307 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L307" class="LineNr"> 307 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L308" class="LineNr"> 308 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L309" class="LineNr"> 309 </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="L310" class="LineNr"> 310 </span> <span class="subxS1Comment"># . write(_test-input-stream, &quot;10 11\n&quot;)</span>
<span id="L311" class="LineNr"> 311 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L312" class="LineNr"> 312 </span> 68/push <span class="Constant">&quot;10 11\n&quot;</span>/imm32
<span id="L313" class="LineNr"> 313 </span> 68/push <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L313" class="LineNr"> 313 </span> 68/push <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>/imm32
<span id="L314" class="LineNr"> 314 </span> <span class="subxS2Comment"># . . call</span>
<span id="L315" class="LineNr"> 315 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L315" class="LineNr"> 315 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L316" class="LineNr"> 316 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L317" class="LineNr"> 317 </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="L318" class="LineNr"> 318 </span> <span class="subxComment"># subx-assort(_test-input-buffered-file, _test-output-buffered-file)</span>
<span id="L319" class="LineNr"> 319 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L320" class="LineNr"> 320 </span> 68/push <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L321" class="LineNr"> 321 </span> 68/push <a href='../061read-byte.subx.html#L313'>_test-input-buffered-file</a>/imm32
<span id="L320" class="LineNr"> 320 </span> 68/push <a href='../115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L321" class="LineNr"> 321 </span> 68/push <a href='../112read-byte.subx.html#L313'>_test-input-buffered-file</a>/imm32
<span id="L322" class="LineNr"> 322 </span> <span class="subxS2Comment"># . . call</span>
<span id="L323" class="LineNr"> 323 </span> e8/call <a href='assort.subx.html#L88'>subx-assort</a>/disp32
<span id="L324" class="LineNr"> 324 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L325" class="LineNr"> 325 </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="L326" class="LineNr"> 326 </span> <span class="subxS1Comment"># . flush(_test-output-buffered-file)</span>
<span id="L327" class="LineNr"> 327 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L328" class="LineNr"> 328 </span> 68/push <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L328" class="LineNr"> 328 </span> 68/push <a href='../115write-byte.subx.html#L359'>_test-output-buffered-file</a>/imm32
<span id="L329" class="LineNr"> 329 </span> <span class="subxS2Comment"># . . call</span>
<span id="L330" class="LineNr"> 330 </span> e8/call <a href='../064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L330" class="LineNr"> 330 </span> e8/call <a href='../115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L331" class="LineNr"> 331 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L332" class="LineNr"> 332 </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="L333" class="LineNr"> 333 </span> <span class="subxComment"># check output</span>
@ -390,72 +390,72 @@ if ('onhashchange' in window) {
<span id="L376" class="LineNr"> 376 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L377" class="LineNr"> 377 </span> 68/push <span class="Constant">&quot;F - <a href='assort.subx.html#L158'>test-subx-assort</a>/0&quot;</span>/imm32
<span id="L378" class="LineNr"> 378 </span> 68/push <span class="Constant">&quot;== code 0x09000000&quot;</span>/imm32
<span id="L379" class="LineNr"> 379 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L379" class="LineNr"> 379 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L380" class="LineNr"> 380 </span> <span class="subxS2Comment"># . . call</span>
<span id="L381" class="LineNr"> 381 </span> e8/call <a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L381" class="LineNr"> 381 </span> e8/call <a href='../109stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L382" class="LineNr"> 382 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L383" class="LineNr"> 383 </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="L384" class="LineNr"> 384 </span> <span class="subxS1Comment"># . check-next-stream-line-equal(_test-output-stream, &quot;1&quot;, msg)</span>
<span id="L385" class="LineNr"> 385 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L386" class="LineNr"> 386 </span> 68/push <span class="Constant">&quot;F - <a href='assort.subx.html#L158'>test-subx-assort</a>/1&quot;</span>/imm32
<span id="L387" class="LineNr"> 387 </span> 68/push <span class="Constant">&quot;1&quot;</span>/imm32
<span id="L388" class="LineNr"> 388 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L388" class="LineNr"> 388 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L389" class="LineNr"> 389 </span> <span class="subxS2Comment"># . . call</span>
<span id="L390" class="LineNr"> 390 </span> e8/call <a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L390" class="LineNr"> 390 </span> e8/call <a href='../109stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L391" class="LineNr"> 391 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L392" class="LineNr"> 392 </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="L393" class="LineNr"> 393 </span> <span class="subxS1Comment"># . check-next-stream-line-equal(_test-output-stream, &quot;2 3 # comment 4 inline with other contents&quot;, msg)</span>
<span id="L394" class="LineNr"> 394 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L395" class="LineNr"> 395 </span> 68/push <span class="Constant">&quot;F - <a href='assort.subx.html#L158'>test-subx-assort</a>/2&quot;</span>/imm32
<span id="L396" class="LineNr"> 396 </span> 68/push <span class="Constant">&quot;2 3 # comment 4 inline with other contents&quot;</span>/imm32
<span id="L397" class="LineNr"> 397 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L397" class="LineNr"> 397 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L398" class="LineNr"> 398 </span> <span class="subxS2Comment"># . . call</span>
<span id="L399" class="LineNr"> 399 </span> e8/call <a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L399" class="LineNr"> 399 </span> e8/call <a href='../109stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L400" class="LineNr"> 400 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L401" class="LineNr"> 401 </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="L402" class="LineNr"> 402 </span> <span class="subxS1Comment"># . check-next-stream-line-equal(_test-output-stream, &quot;6 7&quot;, msg)</span>
<span id="L403" class="LineNr"> 403 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L404" class="LineNr"> 404 </span> 68/push <span class="Constant">&quot;F - <a href='assort.subx.html#L158'>test-subx-assort</a>/3&quot;</span>/imm32
<span id="L405" class="LineNr"> 405 </span> 68/push <span class="Constant">&quot;6 7&quot;</span>/imm32
<span id="L406" class="LineNr"> 406 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L406" class="LineNr"> 406 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L407" class="LineNr"> 407 </span> <span class="subxS2Comment"># . . call</span>
<span id="L408" class="LineNr"> 408 </span> e8/call <a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L408" class="LineNr"> 408 </span> e8/call <a href='../109stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L409" class="LineNr"> 409 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L410" class="LineNr"> 410 </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="L411" class="LineNr"> 411 </span> <span class="subxS1Comment"># . check-next-stream-line-equal(_test-output-stream, &quot;8 9&quot;, msg)</span>
<span id="L412" class="LineNr"> 412 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L413" class="LineNr"> 413 </span> 68/push <span class="Constant">&quot;F - <a href='assort.subx.html#L158'>test-subx-assort</a>/4&quot;</span>/imm32
<span id="L414" class="LineNr"> 414 </span> 68/push <span class="Constant">&quot;8 9&quot;</span>/imm32
<span id="L415" class="LineNr"> 415 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L415" class="LineNr"> 415 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L416" class="LineNr"> 416 </span> <span class="subxS2Comment"># . . call</span>
<span id="L417" class="LineNr"> 417 </span> e8/call <a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L417" class="LineNr"> 417 </span> e8/call <a href='../109stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L418" class="LineNr"> 418 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L419" class="LineNr"> 419 </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="L420" class="LineNr"> 420 </span> <span class="subxS1Comment"># . check-next-stream-line-equal(_test-output-stream, &quot;10 11&quot;, msg)</span>
<span id="L421" class="LineNr"> 421 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L422" class="LineNr"> 422 </span> 68/push <span class="Constant">&quot;F - <a href='assort.subx.html#L158'>test-subx-assort</a>/5&quot;</span>/imm32
<span id="L423" class="LineNr"> 423 </span> 68/push <span class="Constant">&quot;10 11&quot;</span>/imm32
<span id="L424" class="LineNr"> 424 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L424" class="LineNr"> 424 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L425" class="LineNr"> 425 </span> <span class="subxS2Comment"># . . call</span>
<span id="L426" class="LineNr"> 426 </span> e8/call <a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L426" class="LineNr"> 426 </span> e8/call <a href='../109stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L427" class="LineNr"> 427 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L428" class="LineNr"> 428 </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="L429" class="LineNr"> 429 </span> <span class="subxS1Comment"># . check-next-stream-line-equal(_test-output-stream, &quot;== data 0x0a000000&quot;, msg)</span>
<span id="L430" class="LineNr"> 430 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L431" class="LineNr"> 431 </span> 68/push <span class="Constant">&quot;F - <a href='assort.subx.html#L158'>test-subx-assort</a>/6&quot;</span>/imm32
<span id="L432" class="LineNr"> 432 </span> 68/push <span class="Constant">&quot;== data 0x0a000000&quot;</span>/imm32
<span id="L433" class="LineNr"> 433 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L433" class="LineNr"> 433 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L434" class="LineNr"> 434 </span> <span class="subxS2Comment"># . . call</span>
<span id="L435" class="LineNr"> 435 </span> e8/call <a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L435" class="LineNr"> 435 </span> e8/call <a href='../109stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L436" class="LineNr"> 436 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L437" class="LineNr"> 437 </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="L438" class="LineNr"> 438 </span> <span class="subxS1Comment"># . check-next-stream-line-equal(_test-output-stream, &quot;4 5/imm32&quot;, msg)</span>
<span id="L439" class="LineNr"> 439 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L440" class="LineNr"> 440 </span> 68/push <span class="Constant">&quot;F - <a href='assort.subx.html#L158'>test-subx-assort</a>/7&quot;</span>/imm32
<span id="L441" class="LineNr"> 441 </span> 68/push <span class="Constant">&quot;4 5/imm32&quot;</span>/imm32
<span id="L442" class="LineNr"> 442 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L442" class="LineNr"> 442 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L443" class="LineNr"> 443 </span> <span class="subxS2Comment"># . . call</span>
<span id="L444" class="LineNr"> 444 </span> e8/call <a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L444" class="LineNr"> 444 </span> e8/call <a href='../109stream-equal.subx.html#L565'>check-next-stream-line-equal</a>/disp32
<span id="L445" class="LineNr"> 445 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L446" class="LineNr"> 446 </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="L447" class="LineNr"> 447 </span> <span class="subxS1Comment"># . epilogue</span>
@ -522,7 +522,7 @@ if ('onhashchange' in window) {
<span id="L508" class="LineNr"> 508 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L509" class="LineNr"> 509 </span> 51/push-ecx
<span id="L510" class="LineNr"> 510 </span> <span class="subxS2Comment"># . . call</span>
<span id="L511" class="LineNr"> 511 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L511" class="LineNr"> 511 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L512" class="LineNr"> 512 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L513" class="LineNr"> 513 </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="L514" class="LineNr"> 514 </span> <span class="subxComment"># read-line-buffered(in, line)</span>
@ -530,7 +530,7 @@ if ('onhashchange' in window) {
<span id="L516" class="LineNr"> 516 </span> 51/push-ecx
<span id="L517" class="LineNr"> 517 </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="L518" class="LineNr"> 518 </span> <span class="subxS2Comment"># . . call</span>
<span id="L519" class="LineNr"> 519 </span> e8/call <a href='../071read-line.subx.html#L9'>read-line-buffered</a>/disp32
<span id="L519" class="LineNr"> 519 </span> e8/call <a href='../122read-line.subx.html#L9'>read-line-buffered</a>/disp32
<span id="L520" class="LineNr"> 520 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L521" class="LineNr"> 521 </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="L522" class="LineNr"> 522 </span><span class="Constant">$read-segments:check0</span>:
@ -543,7 +543,7 @@ if ('onhashchange' in window) {
<span id="L561" class="LineNr"> 561 </span> 52/push-edx
<span id="L562" class="LineNr"> 562 </span> 51/push-ecx
<span id="L563" class="LineNr"> 563 </span> <span class="subxS2Comment"># . . call</span>
<span id="L564" class="LineNr"> 564 </span> e8/call <a href='../085next-word-or-string.subx.html#L8'>next-word-or-string</a>/disp32
<span id="L564" class="LineNr"> 564 </span> e8/call <a href='../135next-word-or-string.subx.html#L8'>next-word-or-string</a>/disp32
<span id="L565" class="LineNr"> 565 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L566" class="LineNr"> 566 </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="L567" class="LineNr"> 567 </span><span class="Constant">$read-segments:check1</span>:
@ -553,7 +553,7 @@ if ('onhashchange' in window) {
<span id="L579" class="LineNr"> 579 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L580" class="LineNr"> 580 </span> 52/push-edx
<span id="L581" class="LineNr"> 581 </span> <span class="subxS2Comment"># . . call</span>
<span id="L582" class="LineNr"> 582 </span> e8/call <a href='../072slice.subx.html#L9'>slice-empty?</a>/disp32
<span id="L582" class="LineNr"> 582 </span> e8/call <a href='../123slice.subx.html#L9'>slice-empty?</a>/disp32
<span id="L583" class="LineNr"> 583 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L584" class="LineNr"> 584 </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="L585" class="LineNr"> 585 </span> <span class="subxS1Comment"># . if (eax != false) continue</span>
@ -579,7 +579,7 @@ if ('onhashchange' in window) {
<span id="L660" class="LineNr"> 660 </span> 68/push <span class="Constant">&quot;==&quot;</span>/imm32
<span id="L661" class="LineNr"> 661 </span> 52/push-edx
<span id="L662" class="LineNr"> 662 </span> <span class="subxS2Comment"># . . call</span>
<span id="L663" class="LineNr"> 663 </span> e8/call <a href='../072slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L663" class="LineNr"> 663 </span> e8/call <a href='../123slice.subx.html#L120'>slice-equal?</a>/disp32
<span id="L664" class="LineNr"> 664 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L665" class="LineNr"> 665 </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="L666" class="LineNr"> 666 </span> <span class="subxS1Comment"># . if (eax == false) goto next check</span>
@ -590,19 +590,19 @@ if ('onhashchange' in window) {
<span id="L671" class="LineNr"> 671 </span> 52/push-edx
<span id="L672" class="LineNr"> 672 </span> 51/push-ecx
<span id="L673" class="LineNr"> 673 </span> <span class="subxS2Comment"># . . call</span>
<span id="L674" class="LineNr"> 674 </span> e8/call <a href='../085next-word-or-string.subx.html#L8'>next-word-or-string</a>/disp32
<span id="L674" class="LineNr"> 674 </span> e8/call <a href='../135next-word-or-string.subx.html#L8'>next-word-or-string</a>/disp32
<span id="L675" class="LineNr"> 675 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L676" class="LineNr"> 676 </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="L677" class="Folded"> 677 </span><span class="Folded">+-- 40 lines: #? # dump segment name ------------------------------------------------------------------------------------------------------------------------------------------------</span>
<span id="L717" class="LineNr"> 717 </span> <span class="subxComment"># var segment-slot/edi: (addr handle stream byte) = get-or-insert-slice(table, segment-name, row-size=16, Heap)</span>
<span id="L718" class="LineNr"> 718 </span> <span class="subxS1Comment"># . eax = get-or-insert-slice(table, segment-name, row-size=16, Heap)</span>
<span id="L719" class="LineNr"> 719 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L720" class="LineNr"> 720 </span> 68/push <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L720" class="LineNr"> 720 </span> 68/push <span class="SpecialChar"><a href='../120allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L721" class="LineNr"> 721 </span> 68/push 0x10/imm32/row-size
<span id="L722" class="LineNr"> 722 </span> 52/push-edx
<span id="L723" class="LineNr"> 723 </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="L724" class="LineNr"> 724 </span> <span class="subxS2Comment"># . . call</span>
<span id="L725" class="LineNr"> 725 </span> e8/call <a href='../081table.subx.html#L1022'>get-or-insert-slice</a>/disp32
<span id="L725" class="LineNr"> 725 </span> e8/call <a href='../131table.subx.html#L1022'>get-or-insert-slice</a>/disp32
<span id="L726" class="LineNr"> 726 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L727" class="LineNr"> 727 </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> 0x10/imm32 <span class="subxComment"># add to esp</span>
<span id="L728" class="LineNr"> 728 </span> <span class="subxS1Comment"># . edi = eax</span>
@ -617,7 +617,7 @@ if ('onhashchange' in window) {
<span id="L769" class="LineNr"> 769 </span> ff 6/subop/push 1/mod/*+disp8 7/rm32/edi <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 *(edi+4)</span>
<span id="L770" class="LineNr"> 770 </span> ff 6/subop/push 0/mod/indirect 7/rm32/edi <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 *edi</span>
<span id="L771" class="LineNr"> 771 </span> <span class="subxS2Comment"># . . call</span>
<span id="L772" class="LineNr"> 772 </span> e8/call <a href='../069allocate.subx.html#L256'>lookup</a>/disp32
<span id="L772" class="LineNr"> 772 </span> e8/call <a href='../120allocate.subx.html#L256'>lookup</a>/disp32
<span id="L773" class="LineNr"> 773 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L774" class="LineNr"> 774 </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="L775" class="LineNr"> 775 </span> <span class="subxS1Comment"># . ebx = eax</span>
@ -630,9 +630,9 @@ if ('onhashchange' in window) {
<span id="L782" class="LineNr"> 782 </span> 57/push-edi
<span id="L783" class="LineNr"> 783 </span> 68/push 1/imm32
<span id="L784" class="LineNr"> 784 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar">Segment-size</span>/disp32 <span class="subxComment"># push *Segment-size</span>
<span id="L785" class="LineNr"> 785 </span> 68/push <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L785" class="LineNr"> 785 </span> 68/push <span class="SpecialChar"><a href='../120allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L786" class="LineNr"> 786 </span> <span class="subxS2Comment"># . . call</span>
<span id="L787" class="LineNr"> 787 </span> e8/call <a href='../070new-stream.subx.html#L8'>new-stream</a>/disp32
<span id="L787" class="LineNr"> 787 </span> e8/call <a href='../121new-stream.subx.html#L8'>new-stream</a>/disp32
<span id="L788" class="LineNr"> 788 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L789" class="LineNr"> 789 </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> 0x10/imm32 <span class="subxComment"># add to esp</span>
<span id="L790" class="LineNr"> 790 </span> <span class="subxComment"># var curr-segment/ebx: (addr stream byte) = lookup(*segment-slot)</span>
@ -641,7 +641,7 @@ if ('onhashchange' in window) {
<span id="L793" class="LineNr"> 793 </span> ff 6/subop/push 1/mod/*+disp8 7/rm32/edi <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 *(edi+4)</span>
<span id="L794" class="LineNr"> 794 </span> ff 6/subop/push 0/mod/indirect 7/rm32/edi <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 *edi</span>
<span id="L795" class="LineNr"> 795 </span> <span class="subxS2Comment"># . . call</span>
<span id="L796" class="LineNr"> 796 </span> e8/call <a href='../069allocate.subx.html#L256'>lookup</a>/disp32
<span id="L796" class="LineNr"> 796 </span> e8/call <a href='../120allocate.subx.html#L256'>lookup</a>/disp32
<span id="L797" class="LineNr"> 797 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L798" class="LineNr"> 798 </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="L799" class="LineNr"> 799 </span> <span class="subxS1Comment"># . ebx = eax</span>
@ -657,7 +657,7 @@ if ('onhashchange' in window) {
<span id="L945" class="LineNr"> 945 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L946" class="LineNr"> 946 </span> 51/push-ecx
<span id="L947" class="LineNr"> 947 </span> <span class="subxS2Comment"># . . call</span>
<span id="L948" class="LineNr"> 948 </span> e8/call <a href='../055stream.subx.html#L56'>rewind-stream</a>/disp32
<span id="L948" class="LineNr"> 948 </span> e8/call <a href='../106stream.subx.html#L56'>rewind-stream</a>/disp32
<span id="L949" class="LineNr"> 949 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L950" class="LineNr"> 950 </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="L951" class="Folded"> 951 </span><span class="Folded">+-- 9 lines: #? # print(&quot;write stream\n&quot;) ------------------------------------------------------------------------------------------------------------------------------------------</span>
@ -666,7 +666,7 @@ if ('onhashchange' in window) {
<span id="L962" class="LineNr"> 962 </span> 51/push-ecx
<span id="L963" class="LineNr"> 963 </span> 53/push-ebx
<span id="L964" class="LineNr"> 964 </span> <span class="subxS2Comment"># . . call</span>
<span id="L965" class="LineNr"> 965 </span> e8/call <a href='../062write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L965" class="LineNr"> 965 </span> e8/call <a href='../113write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L966" class="LineNr"> 966 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L967" class="LineNr"> 967 </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="L968" class="LineNr"> 968 </span> <span class="subxComment"># loop</span>
@ -722,7 +722,7 @@ if ('onhashchange' in window) {
<span id="L1026" class="LineNr">1026 </span> ff 6/subop/push 1/mod/*+disp8 6/rm32/esi <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 *(esi+12)</span>
<span id="L1027" class="LineNr">1027 </span> ff 6/subop/push 1/mod/*+disp8 6/rm32/esi <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 *(esi+8)</span>
<span id="L1028" class="LineNr">1028 </span> <span class="subxS2Comment"># . . call</span>
<span id="L1029" class="LineNr">1029 </span> e8/call <a href='../069allocate.subx.html#L256'>lookup</a>/disp32
<span id="L1029" class="LineNr">1029 </span> e8/call <a href='../120allocate.subx.html#L256'>lookup</a>/disp32
<span id="L1030" class="LineNr">1030 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L1031" class="LineNr">1031 </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="L1032" class="LineNr">1032 </span> <span class="subxComment"># write-stream-data(out, stream)</span>
@ -730,7 +730,7 @@ if ('onhashchange' in window) {
<span id="L1034" class="LineNr">1034 </span> 50/push-eax
<span id="L1035" class="LineNr">1035 </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="L1036" class="LineNr">1036 </span> <span class="subxS2Comment"># . . call</span>
<span id="L1037" class="LineNr">1037 </span> e8/call <a href='../074write-stream-data.subx.html#L11'>write-stream-data</a>/disp32
<span id="L1037" class="LineNr">1037 </span> e8/call <a href='../125write-stream-data.subx.html#L11'>write-stream-data</a>/disp32
<span id="L1038" class="LineNr">1038 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L1039" class="LineNr">1039 </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="L1040" class="LineNr">1040 </span><span class="Constant">$write-segments:continue</span>:
@ -742,7 +742,7 @@ if ('onhashchange' in window) {
<span id="L1046" class="LineNr">1046 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L1047" class="LineNr">1047 </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="L1048" class="LineNr">1048 </span> <span class="subxS2Comment"># . . call</span>
<span id="L1049" class="LineNr">1049 </span> e8/call <a href='../064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L1049" class="LineNr">1049 </span> e8/call <a href='../115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L1050" class="LineNr">1050 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L1051" class="LineNr">1051 </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="L1052" class="LineNr">1052 </span><span class="Constant">$write-segments:end</span>:

View File

@ -113,21 +113,21 @@ if ('onhashchange' in window) {
<span id="L54" class="LineNr"> 54 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L55" class="LineNr"> 55 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L56" class="LineNr"> 56 </span> <span class="subxComment"># initialize heap</span>
<span id="L57" class="LineNr"> 57 </span> (<a href='../053new-segment.subx.html#L40'>new-segment</a> *<span class="SpecialChar"><a href='../069allocate.subx.html#L34'>Heap-size</a></span> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span>)
<span id="L57" class="LineNr"> 57 </span> (<a href='../104new-segment.subx.html#L40'>new-segment</a> *<span class="SpecialChar"><a href='../120allocate.subx.html#L34'>Heap-size</a></span> <span class="SpecialChar"><a href='../120allocate.subx.html#L27'>Heap</a></span>)
<span id="L58" class="LineNr"> 58 </span> <span class="subxComment"># if (argc &lt;= 1) goto interactive</span>
<span id="L59" class="LineNr"> 59 </span> 81 7/subop/compare *ebp 1/imm32
<span id="L60" class="LineNr"> 60 </span> 7e/jump-if-&lt;= $subx-braces-main:interactive/disp8
<span id="L61" class="LineNr"> 61 </span> <span class="subxComment"># if (argv[1] != &quot;test&quot;)) goto interactive</span>
<span id="L62" class="LineNr"> 62 </span> (<a href='../052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a> *(ebp+8) <span class="Constant">&quot;test&quot;</span>) <span class="subxComment"># =&gt; eax</span>
<span id="L62" class="LineNr"> 62 </span> (<a href='../103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a> *(ebp+8) <span class="Constant">&quot;test&quot;</span>) <span class="subxComment"># =&gt; eax</span>
<span id="L63" class="LineNr"> 63 </span> 3d/compare-eax-and 0/imm32/false
<span id="L64" class="LineNr"> 64 </span> 74/jump-if-= $subx-braces-main:interactive/disp8
<span id="L65" class="LineNr"> 65 </span> <span class="subxComment">#</span>
<span id="L66" class="LineNr"> 66 </span> (run-tests)
<span id="L67" class="LineNr"> 67 </span> <span class="subxComment"># syscall(exit, *Num-test-failures)</span>
<span id="L68" class="LineNr"> 68 </span> 8b/-&gt; *<span class="SpecialChar"><a href='../051test.subx.html#L89'>Num-test-failures</a></span> 3/r32/ebx
<span id="L68" class="LineNr"> 68 </span> 8b/-&gt; *<span class="SpecialChar"><a href='../102test.subx.html#L89'>Num-test-failures</a></span> 3/r32/ebx
<span id="L69" class="LineNr"> 69 </span> eb/jump $subx-braces-main:end/disp8
<span id="L70" class="LineNr"> 70 </span><span class="Constant">$subx-braces-main:interactive</span>:
<span id="L71" class="LineNr"> 71 </span> (<a href='braces.subx.html#L77'>subx-braces</a> <span class="SpecialChar"><a href='../061read-byte.subx.html#L14'>Stdin</a></span> <span class="SpecialChar"><a href='../064write-byte.subx.html#L10'>Stdout</a></span>)
<span id="L71" class="LineNr"> 71 </span> (<a href='braces.subx.html#L77'>subx-braces</a> <span class="SpecialChar"><a href='../112read-byte.subx.html#L14'>Stdin</a></span> <span class="SpecialChar"><a href='../115write-byte.subx.html#L10'>Stdout</a></span>)
<span id="L72" class="LineNr"> 72 </span> <span class="subxComment"># syscall(exit, 0)</span>
<span id="L73" class="LineNr"> 73 </span> bb/copy-to-ebx 0/imm32
<span id="L74" class="LineNr"> 74 </span><span class="Constant">$subx-braces-main:end</span>:
@ -199,13 +199,13 @@ if ('onhashchange' in window) {
<span id="L140" class="LineNr">140 </span> 68/push 0/imm32/start
<span id="L141" class="LineNr">141 </span> 89/&lt;- %edi 4/r32/esp
<span id="L142" class="LineNr">142 </span><span class="Constant">$subx-braces:line-loop</span>:
<span id="L143" class="LineNr">143 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> %ecx)
<span id="L144" class="LineNr">144 </span> (<a href='../071read-line.subx.html#L9'>read-line-buffered</a> %esi %ecx)
<span id="L143" class="LineNr">143 </span> (<a href='../106stream.subx.html#L17'>clear-stream</a> %ecx)
<span id="L144" class="LineNr">144 </span> (<a href='../122read-line.subx.html#L9'>read-line-buffered</a> %esi %ecx)
<span id="L145" class="LineNr">145 </span><span class="Constant">$subx-braces:check0</span>:
<span id="L146" class="LineNr">146 </span> <span class="subxComment"># if (line-&gt;write == 0) break</span>
<span id="L147" class="LineNr">147 </span> 81 7/subop/compare *ecx 0/imm32
<span id="L148" class="LineNr">148 </span> 0f 84/jump-if-= $subx-braces:<span class="Constant">break</span>/disp32
<span id="L149" class="LineNr">149 </span> (<a href='../073next-token.subx.html#L464'>skip-chars-matching-whitespace</a> %ecx)
<span id="L149" class="LineNr">149 </span> (<a href='../124next-token.subx.html#L464'>skip-chars-matching-whitespace</a> %ecx)
<span id="L150" class="LineNr">150 </span><span class="Constant">$subx-braces:check-for-curly-open</span>:
<span id="L151" class="LineNr">151 </span> <span class="subxComment"># if (line-&gt;data[line-&gt;read] != '{') goto next check</span>
<span id="L152" class="LineNr">152 </span> <span class="subxS1Comment"># . eax = line-&gt;data[line-&gt;read]</span>
@ -217,11 +217,11 @@ if ('onhashchange' in window) {
<span id="L158" class="LineNr">158 </span> 0f 85/jump-if-!= $subx-braces:check-for-curly-closed/disp32
<span id="L159" class="LineNr">159 </span><span class="Constant">$subx-braces:emit-curly-open</span>:
<span id="L160" class="LineNr">160 </span> <span class="subxComment"># print(out, &quot;_loop&quot; next-label-id &quot;:&quot;)</span>
<span id="L161" class="LineNr">161 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">&quot;_loop&quot;</span>)
<span id="L162" class="LineNr">162 </span> (<a href='../066write-int-hex.subx.html#L266'>write-int32-hex-buffered</a> *(ebp+0xc) %ebx)
<span id="L163" class="LineNr">163 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">&quot;:&quot;</span>)
<span id="L161" class="LineNr">161 </span> (<a href='../116write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">&quot;_loop&quot;</span>)
<span id="L162" class="LineNr">162 </span> (<a href='../117write-int-hex.subx.html#L266'>write-int32-hex-buffered</a> *(ebp+0xc) %ebx)
<span id="L163" class="LineNr">163 </span> (<a href='../116write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">&quot;:&quot;</span>)
<span id="L164" class="LineNr">164 </span> <span class="subxComment"># push(label-stack, next-label-id)</span>
<span id="L165" class="LineNr">165 </span> (<a href='../092stack.subx.html#L114'>push</a> %edx %ebx)
<span id="L165" class="LineNr">165 </span> (<a href='../203stack.subx.html#L114'>push</a> %edx %ebx)
<span id="L166" class="LineNr">166 </span> <span class="subxComment"># ++next-label-id</span>
<span id="L167" class="LineNr">167 </span> ff 0/subop/increment %ebx
<span id="L168" class="LineNr">168 </span> <span class="subxComment"># continue</span>
@ -232,18 +232,18 @@ if ('onhashchange' in window) {
<span id="L173" class="LineNr">173 </span> 0f 85/jump-if-= $subx-braces:word-loop/disp32
<span id="L174" class="LineNr">174 </span><span class="Constant">$subx-braces:emit-curly-closed</span>:
<span id="L175" class="LineNr">175 </span> <span class="subxComment"># eax = pop(label-stack)</span>
<span id="L176" class="LineNr">176 </span> (<a href='../092stack.subx.html#L234'>pop</a> %edx)
<span id="L176" class="LineNr">176 </span> (<a href='../203stack.subx.html#L234'>pop</a> %edx)
<span id="L177" class="LineNr">177 </span> <span class="subxComment"># print(out, &quot;_break&quot; eax &quot;:&quot;)</span>
<span id="L178" class="LineNr">178 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">&quot;_break&quot;</span>)
<span id="L179" class="LineNr">179 </span> (<a href='../066write-int-hex.subx.html#L266'>write-int32-hex-buffered</a> *(ebp+0xc) %eax)
<span id="L180" class="LineNr">180 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">&quot;:&quot;</span>)
<span id="L178" class="LineNr">178 </span> (<a href='../116write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">&quot;_break&quot;</span>)
<span id="L179" class="LineNr">179 </span> (<a href='../117write-int-hex.subx.html#L266'>write-int32-hex-buffered</a> *(ebp+0xc) %eax)
<span id="L180" class="LineNr">180 </span> (<a href='../116write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">&quot;:&quot;</span>)
<span id="L181" class="LineNr">181 </span> <span class="subxComment"># continue</span>
<span id="L182" class="LineNr">182 </span> e9/jump $subx-braces:next-line/disp32
<span id="L183" class="LineNr">183 </span><span class="Constant">$subx-braces:word-loop</span>:
<span id="L184" class="LineNr">184 </span> (<a href='../085next-word-or-string.subx.html#L8'>next-word-or-string</a> %ecx %edi)
<span id="L184" class="LineNr">184 </span> (<a href='../135next-word-or-string.subx.html#L8'>next-word-or-string</a> %ecx %edi)
<span id="L185" class="LineNr">185 </span><span class="Constant">$subx-braces:check1</span>:
<span id="L186" class="LineNr">186 </span> <span class="subxComment"># if (slice-empty?(word-slice)) break</span>
<span id="L187" class="LineNr">187 </span> (<a href='../072slice.subx.html#L9'>slice-empty?</a> %edi)
<span id="L187" class="LineNr">187 </span> (<a href='../123slice.subx.html#L9'>slice-empty?</a> %edi)
<span id="L188" class="LineNr">188 </span> 3d/compare-eax-and 0/imm32/false
<span id="L189" class="LineNr">189 </span> 0f 85/jump-if-!= $subx-braces:next-line/disp32
<span id="L190" class="LineNr">190 </span><span class="Constant">$subx-braces:check-for-comment</span>:
@ -258,15 +258,15 @@ if ('onhashchange' in window) {
<span id="L199" class="LineNr">199 </span><span class="Constant">$subx-braces:check-for-break</span>:
<span id="L200" class="LineNr">200 </span> <span class="subxComment"># if (!slice-starts-with?(word-slice, &quot;break/&quot;)) goto next check</span>
<span id="L201" class="LineNr">201 </span> <span class="subxS1Comment"># . eax = slice-starts-with?(word-slice, &quot;break/&quot;)</span>
<span id="L202" class="LineNr">202 </span> (<a href='../072slice.subx.html#L487'>slice-starts-with?</a> %edi <span class="Constant">&quot;break/&quot;</span>)
<span id="L202" class="LineNr">202 </span> (<a href='../123slice.subx.html#L487'>slice-starts-with?</a> %edi <span class="Constant">&quot;break/&quot;</span>)
<span id="L203" class="LineNr">203 </span> <span class="subxS1Comment"># . if (eax == false) goto next check</span>
<span id="L204" class="LineNr">204 </span> 3d/compare-eax-and 0/imm32/false
<span id="L205" class="LineNr">205 </span> 74/jump-if-= $subx-braces:check-for-loop/disp8
<span id="L206" class="LineNr">206 </span><span class="Constant">$subx-braces:emit-break</span>:
<span id="L207" class="LineNr">207 </span> (<a href='../092stack.subx.html#L338'>top</a> %edx)
<span id="L207" class="LineNr">207 </span> (<a href='../203stack.subx.html#L338'>top</a> %edx)
<span id="L208" class="LineNr">208 </span> <span class="subxComment"># print(out, &quot;_break&quot; eax)</span>
<span id="L209" class="LineNr">209 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">&quot;_break&quot;</span>)
<span id="L210" class="LineNr">210 </span> (<a href='../066write-int-hex.subx.html#L266'>write-int32-hex-buffered</a> *(ebp+0xc) %eax)
<span id="L209" class="LineNr">209 </span> (<a href='../116write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">&quot;_break&quot;</span>)
<span id="L210" class="LineNr">210 </span> (<a href='../117write-int-hex.subx.html#L266'>write-int32-hex-buffered</a> *(ebp+0xc) %eax)
<span id="L211" class="LineNr">211 </span> <span class="subxComment"># word-slice-&gt;start += len(&quot;break&quot;)</span>
<span id="L212" class="LineNr">212 </span> 81 0/subop/add *edi 5/imm32/strlen
<span id="L213" class="LineNr">213 </span> <span class="subxComment"># emit rest of word as usual</span>
@ -274,31 +274,31 @@ if ('onhashchange' in window) {
<span id="L215" class="LineNr">215 </span><span class="Constant">$subx-braces:check-for-loop</span>:
<span id="L216" class="LineNr">216 </span> <span class="subxComment"># if (!slice-starts-with?(word-slice, &quot;loop/&quot;)) emit word</span>
<span id="L217" class="LineNr">217 </span> <span class="subxS1Comment"># . eax = slice-starts-with?(word-slice, &quot;loop/&quot;)</span>
<span id="L218" class="LineNr">218 </span> (<a href='../072slice.subx.html#L487'>slice-starts-with?</a> %edi <span class="Constant">&quot;loop/&quot;</span>)
<span id="L218" class="LineNr">218 </span> (<a href='../123slice.subx.html#L487'>slice-starts-with?</a> %edi <span class="Constant">&quot;loop/&quot;</span>)
<span id="L219" class="LineNr">219 </span> <span class="subxS1Comment"># . if (eax == false) goto next check</span>
<span id="L220" class="LineNr">220 </span> 3d/compare-eax-and 0/imm32/false
<span id="L221" class="LineNr">221 </span> 74/jump-if-= $subx-braces:emit-word-slice/disp8
<span id="L222" class="LineNr">222 </span><span class="Constant">$subx-braces:emit-loop</span>:
<span id="L223" class="LineNr">223 </span> (<a href='../092stack.subx.html#L338'>top</a> %edx)
<span id="L223" class="LineNr">223 </span> (<a href='../203stack.subx.html#L338'>top</a> %edx)
<span id="L224" class="LineNr">224 </span> <span class="subxComment"># print(out, &quot;_loop&quot; eax)</span>
<span id="L225" class="LineNr">225 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">&quot;_loop&quot;</span>)
<span id="L226" class="LineNr">226 </span> (<a href='../066write-int-hex.subx.html#L266'>write-int32-hex-buffered</a> *(ebp+0xc) %eax)
<span id="L225" class="LineNr">225 </span> (<a href='../116write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">&quot;_loop&quot;</span>)
<span id="L226" class="LineNr">226 </span> (<a href='../117write-int-hex.subx.html#L266'>write-int32-hex-buffered</a> *(ebp+0xc) %eax)
<span id="L227" class="LineNr">227 </span> <span class="subxComment"># word-slice-&gt;start += len(&quot;loop&quot;)</span>
<span id="L228" class="LineNr">228 </span> 81 0/subop/add *edi 4/imm32/strlen
<span id="L229" class="LineNr">229 </span> <span class="subxComment"># fall through</span>
<span id="L230" class="LineNr">230 </span><span class="Constant">$subx-braces:emit-word-slice</span>:
<span id="L231" class="LineNr">231 </span> <span class="subxComment"># print(out, word-slice &quot; &quot;)</span>
<span id="L232" class="LineNr">232 </span> (<a href='../072slice.subx.html#L908'>write-slice-buffered</a> *(ebp+0xc) %edi)
<span id="L233" class="LineNr">233 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>)
<span id="L232" class="LineNr">232 </span> (<a href='../123slice.subx.html#L908'>write-slice-buffered</a> *(ebp+0xc) %edi)
<span id="L233" class="LineNr">233 </span> (<a href='../116write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="SpecialChar"><a href='../102test.subx.html#L93'>Space</a></span>)
<span id="L234" class="LineNr">234 </span> <span class="subxComment"># loop to next word</span>
<span id="L235" class="LineNr">235 </span> e9/jump $subx-braces:word-loop/disp32
<span id="L236" class="LineNr">236 </span><span class="Constant">$subx-braces:next-line</span>:
<span id="L237" class="LineNr">237 </span> <span class="subxComment"># print(out, &quot;\n&quot;)</span>
<span id="L238" class="LineNr">238 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>)
<span id="L238" class="LineNr">238 </span> (<a href='../116write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="SpecialChar"><a href='../102test.subx.html#L82'>Newline</a></span>)
<span id="L239" class="LineNr">239 </span> <span class="subxComment"># loop to next line</span>
<span id="L240" class="LineNr">240 </span> e9/jump $subx-braces:line-loop/disp32
<span id="L241" class="LineNr">241 </span><span class="Constant">$subx-braces:break</span>:
<span id="L242" class="LineNr">242 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0xc))
<span id="L242" class="LineNr">242 </span> (<a href='../115write-byte.subx.html#L81'>flush</a> *(ebp+0xc))
<span id="L243" class="LineNr">243 </span><span class="Constant">$subx-braces:end</span>:
<span id="L244" class="LineNr">244 </span> <span class="subxS1Comment"># . reclaim locals</span>
<span id="L245" class="LineNr">245 </span> 81 0/subop/add %esp 0x29c/imm32
@ -319,17 +319,17 @@ if ('onhashchange' in window) {
<span id="L260" class="LineNr">260 </span> 55/push-ebp
<span id="L261" class="LineNr">261 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L262" class="LineNr">262 </span> <span class="subxComment"># setup</span>
<span id="L263" class="LineNr">263 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>)
<span id="L264" class="LineNr">264 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>)
<span id="L265" class="LineNr">265 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-input-buffered-file-&gt;buffer)
<span id="L266" class="LineNr">266 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file-&gt;buffer)
<span id="L263" class="LineNr">263 </span> (<a href='../106stream.subx.html#L17'>clear-stream</a> <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>)
<span id="L264" class="LineNr">264 </span> (<a href='../106stream.subx.html#L17'>clear-stream</a> <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>)
<span id="L265" class="LineNr">265 </span> (<a href='../106stream.subx.html#L17'>clear-stream</a> $_test-input-buffered-file-&gt;buffer)
<span id="L266" class="LineNr">266 </span> (<a href='../106stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file-&gt;buffer)
<span id="L267" class="LineNr">267 </span> <span class="subxComment"># test</span>
<span id="L268" class="LineNr">268 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">&quot;== abcd 0x1&quot;</span>)
<span id="L269" class="LineNr">269 </span> (<a href='braces.subx.html#L77'>subx-braces</a> <a href='../061read-byte.subx.html#L313'>_test-input-buffered-file</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>)
<span id="L268" class="LineNr">268 </span> (<a href='../108write.subx.html#L24'>write</a> <a href='../112read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">&quot;== abcd 0x1&quot;</span>)
<span id="L269" class="LineNr">269 </span> (<a href='braces.subx.html#L77'>subx-braces</a> <a href='../112read-byte.subx.html#L313'>_test-input-buffered-file</a> <a href='../115write-byte.subx.html#L359'>_test-output-buffered-file</a>)
<span id="L270" class="LineNr">270 </span> <span class="subxComment"># check that the line just passed through</span>
<span id="L271" class="LineNr">271 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>)
<span id="L271" class="LineNr">271 </span> (<a href='../115write-byte.subx.html#L81'>flush</a> <a href='../115write-byte.subx.html#L359'>_test-output-buffered-file</a>)
<span id="L272" class="Folded">272 </span><span class="Folded">+-- 5 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span>
<span id="L277" class="LineNr">277 </span> (<a href='../058stream-equal.subx.html#L194'>check-stream-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">&quot;== abcd 0x1 \n&quot;</span> <span class="Constant">&quot;F - test-subx-braces-passes-most-words-through&quot;</span>)
<span id="L277" class="LineNr">277 </span> (<a href='../109stream-equal.subx.html#L194'>check-stream-equal</a> <a href='../115write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">&quot;== abcd 0x1 \n&quot;</span> <span class="Constant">&quot;F - test-subx-braces-passes-most-words-through&quot;</span>)
<span id="L278" class="LineNr">278 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L279" class="LineNr">279 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L280" class="LineNr">280 </span> 5d/pop-to-ebp
@ -352,17 +352,17 @@ if ('onhashchange' in window) {
<span id="L297" class="LineNr">297 </span> 55/push-ebp
<span id="L298" class="LineNr">298 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L299" class="LineNr">299 </span> <span class="subxComment"># setup</span>
<span id="L300" class="LineNr">300 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>)
<span id="L301" class="LineNr">301 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>)
<span id="L302" class="LineNr">302 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-input-buffered-file-&gt;buffer)
<span id="L303" class="LineNr">303 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file-&gt;buffer)
<span id="L300" class="LineNr">300 </span> (<a href='../106stream.subx.html#L17'>clear-stream</a> <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>)
<span id="L301" class="LineNr">301 </span> (<a href='../106stream.subx.html#L17'>clear-stream</a> <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>)
<span id="L302" class="LineNr">302 </span> (<a href='../106stream.subx.html#L17'>clear-stream</a> $_test-input-buffered-file-&gt;buffer)
<span id="L303" class="LineNr">303 </span> (<a href='../106stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file-&gt;buffer)
<span id="L304" class="LineNr">304 </span> <span class="subxComment"># test</span>
<span id="L305" class="LineNr">305 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">&quot;{\nab break/imm32\ncd loop/imm32\n}&quot;</span>)
<span id="L306" class="LineNr">306 </span> (<a href='braces.subx.html#L77'>subx-braces</a> <a href='../061read-byte.subx.html#L313'>_test-input-buffered-file</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>)
<span id="L305" class="LineNr">305 </span> (<a href='../108write.subx.html#L24'>write</a> <a href='../112read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">&quot;{\nab break/imm32\ncd loop/imm32\n}&quot;</span>)
<span id="L306" class="LineNr">306 </span> (<a href='braces.subx.html#L77'>subx-braces</a> <a href='../112read-byte.subx.html#L313'>_test-input-buffered-file</a> <a href='../115write-byte.subx.html#L359'>_test-output-buffered-file</a>)
<span id="L307" class="LineNr">307 </span> <span class="subxComment"># check that the line just passed through</span>
<span id="L308" class="LineNr">308 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>)
<span id="L308" class="LineNr">308 </span> (<a href='../115write-byte.subx.html#L81'>flush</a> <a href='../115write-byte.subx.html#L359'>_test-output-buffered-file</a>)
<span id="L309" class="Folded">309 </span><span class="Folded">+-- 5 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span>
<span id="L314" class="LineNr">314 </span> (<a href='../058stream-equal.subx.html#L194'>check-stream-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">&quot;_loop0x00000001:\nab _break0x00000001/imm32 \ncd _loop0x00000001/imm32 \n_break0x00000001:\n&quot;</span> <span class="Constant">&quot;F - test-subx-braces-1&quot;</span>)
<span id="L314" class="LineNr">314 </span> (<a href='../109stream-equal.subx.html#L194'>check-stream-equal</a> <a href='../115write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">&quot;_loop0x00000001:\nab _break0x00000001/imm32 \ncd _loop0x00000001/imm32 \n_break0x00000001:\n&quot;</span> <span class="Constant">&quot;F - test-subx-braces-1&quot;</span>)
<span id="L315" class="LineNr">315 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L316" class="LineNr">316 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L317" class="LineNr">317 </span> 5d/pop-to-ebp
@ -389,17 +389,17 @@ if ('onhashchange' in window) {
<span id="L338" class="LineNr">338 </span> 55/push-ebp
<span id="L339" class="LineNr">339 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L340" class="LineNr">340 </span> <span class="subxComment"># setup</span>
<span id="L341" class="LineNr">341 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>)
<span id="L342" class="LineNr">342 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>)
<span id="L343" class="LineNr">343 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-input-buffered-file-&gt;buffer)
<span id="L344" class="LineNr">344 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file-&gt;buffer)
<span id="L341" class="LineNr">341 </span> (<a href='../106stream.subx.html#L17'>clear-stream</a> <a href='../112read-byte.subx.html#L287'>_test-input-stream</a>)
<span id="L342" class="LineNr">342 </span> (<a href='../106stream.subx.html#L17'>clear-stream</a> <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>)
<span id="L343" class="LineNr">343 </span> (<a href='../106stream.subx.html#L17'>clear-stream</a> $_test-input-buffered-file-&gt;buffer)
<span id="L344" class="LineNr">344 </span> (<a href='../106stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file-&gt;buffer)
<span id="L345" class="LineNr">345 </span> <span class="subxComment"># test</span>
<span id="L346" class="LineNr">346 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">&quot;{\n{\nab break/imm32\n}\ncd loop/imm32\n}&quot;</span>)
<span id="L347" class="LineNr">347 </span> (<a href='braces.subx.html#L77'>subx-braces</a> <a href='../061read-byte.subx.html#L313'>_test-input-buffered-file</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>)
<span id="L346" class="LineNr">346 </span> (<a href='../108write.subx.html#L24'>write</a> <a href='../112read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">&quot;{\n{\nab break/imm32\n}\ncd loop/imm32\n}&quot;</span>)
<span id="L347" class="LineNr">347 </span> (<a href='braces.subx.html#L77'>subx-braces</a> <a href='../112read-byte.subx.html#L313'>_test-input-buffered-file</a> <a href='../115write-byte.subx.html#L359'>_test-output-buffered-file</a>)
<span id="L348" class="LineNr">348 </span> <span class="subxComment"># check that the line just passed through</span>
<span id="L349" class="LineNr">349 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>)
<span id="L349" class="LineNr">349 </span> (<a href='../115write-byte.subx.html#L81'>flush</a> <a href='../115write-byte.subx.html#L359'>_test-output-buffered-file</a>)
<span id="L350" class="Folded">350 </span><span class="Folded">+-- 5 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span>
<span id="L355" class="LineNr">355 </span> (<a href='../058stream-equal.subx.html#L194'>check-stream-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">&quot;_loop0x00000001:\n_loop0x00000002:\nab _break0x00000002/imm32 \n_break0x00000002:\ncd _loop0x00000001/imm32 \n_break0x00000001:\n&quot;</span> <span class="Constant">&quot;F - test-subx-braces-2&quot;</span>)
<span id="L355" class="LineNr">355 </span> (<a href='../109stream-equal.subx.html#L194'>check-stream-equal</a> <a href='../115write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">&quot;_loop0x00000001:\n_loop0x00000002:\nab _break0x00000002/imm32 \n_break0x00000002:\ncd _loop0x00000001/imm32 \n_break0x00000001:\n&quot;</span> <span class="Constant">&quot;F - test-subx-braces-2&quot;</span>)
<span id="L356" class="LineNr">356 </span> <span class="subxS1Comment"># . epilogue</span>
<span id="L357" class="LineNr">357 </span> 89/&lt;- %esp 5/r32/ebp
<span id="L358" class="LineNr">358 </span> 5d/pop-to-ebp

View File

@ -67,19 +67,19 @@ if ('onhashchange' in window) {
<span id="L8" class="LineNr"> 8 </span>
<span id="L9" class="LineNr"> 9 </span><span class="PreProc">fn</span> <span class="muFunction">main</span> args-on-stack: (addr array (addr array byte))<span class="PreProc"> -&gt; </span>exit-status/<span class="Constant">ebx</span>: int <span class="Delimiter">{</span>
<span id="L10" class="Folded"> 10 </span><span class="Folded">+-- 20 lines: # var file/esi: (addr buffered-file) = open args-on-stack[1] for reading --------------------------------------------------------------------------------------------------</span>
<span id="L30" class="LineNr"> 30 </span> <a href='../103screen.subx.html#L6'>enable-screen-grid-mode</a>
<span id="L30" class="LineNr"> 30 </span> <a href='../304screen.subx.html#L6'>enable-screen-grid-mode</a>
<span id="L31" class="LineNr"> 31 </span> <span class="PreProc">var</span> nrows/<span class="Constant">eax</span>: int <span class="SpecialChar">&lt;-</span> copy <span class="Constant">0</span>
<span id="L32" class="LineNr"> 32 </span> <span class="PreProc">var</span> ncols/<span class="Constant">ecx</span>: int <span class="SpecialChar">&lt;-</span> copy <span class="Constant">0</span>
<span id="L33" class="LineNr"> 33 </span> nrows, ncols <span class="SpecialChar">&lt;-</span> <a href='../103screen.subx.html#L37'>screen-size</a>
<span id="L34" class="LineNr"> 34 </span> <a href='../104keyboard.subx.html#L6'>enable-keyboard-immediate-mode</a>
<span id="L33" class="LineNr"> 33 </span> nrows, ncols <span class="SpecialChar">&lt;-</span> <a href='../304screen.subx.html#L37'>screen-size</a>
<span id="L34" class="LineNr"> 34 </span> <a href='../305keyboard.subx.html#L6'>enable-keyboard-immediate-mode</a>
<span id="L35" class="LineNr"> 35 </span> <span class="Delimiter">{</span>
<span id="L36" class="LineNr"> 36 </span> <a href='browse.mu.html#L51'>render</a> file, nrows, ncols
<span id="L37" class="LineNr"> 37 </span> <span class="PreProc">var</span> key/<span class="Constant">eax</span>: byte <span class="SpecialChar">&lt;-</span> <a href='../104keyboard.subx.html#L122'>read-key</a>
<span id="L37" class="LineNr"> 37 </span> <span class="PreProc">var</span> key/<span class="Constant">eax</span>: byte <span class="SpecialChar">&lt;-</span> <a href='../305keyboard.subx.html#L122'>read-key</a>
<span id="L38" class="LineNr"> 38 </span> compare key, <span class="Constant">0x71</span> <span class="Comment"># 'q'</span>
<span id="L39" class="LineNr"> 39 </span> <span class="PreProc">loop-if-!=</span>
<span id="L40" class="LineNr"> 40 </span> <span class="Delimiter">}</span>
<span id="L41" class="LineNr"> 41 </span> <a href='../104keyboard.subx.html#L72'>enable-keyboard-type-mode</a>
<span id="L42" class="LineNr"> 42 </span> <a href='../103screen.subx.html#L24'>enable-screen-type-mode</a>
<span id="L41" class="LineNr"> 41 </span> <a href='../305keyboard.subx.html#L72'>enable-keyboard-type-mode</a>
<span id="L42" class="LineNr"> 42 </span> <a href='../304screen.subx.html#L24'>enable-screen-type-mode</a>
<span id="L43" class="LineNr"> 43 </span> exit-status <span class="SpecialChar">&lt;-</span> copy <span class="Constant">0</span>
<span id="L44" class="LineNr"> 44 </span><span class="Delimiter">}</span>
<span id="L45" class="LineNr"> 45 </span>
@ -105,7 +105,7 @@ if ('onhashchange' in window) {
<span id="L65" class="LineNr"> 65 </span> <span class="PreProc">var</span> leftcol/<span class="Constant">edx</span>: int <span class="SpecialChar">&lt;-</span> copy <span class="Constant">5</span> <span class="Comment"># page-margin</span>
<span id="L66" class="LineNr"> 66 </span> <span class="PreProc">var</span> rightcol/<span class="Constant">ebx</span>: int <span class="SpecialChar">&lt;-</span> copy leftcol
<span id="L67" class="LineNr"> 67 </span> rightcol <span class="SpecialChar">&lt;-</span> add <span class="Constant">0x40</span> <span class="Comment"># page-width = 64 characters</span>
<span id="L68" class="LineNr"> 68 </span> <a href='../103screen.subx.html#L185'>start-color-on-screen</a> <span class="Constant">0xec</span>, <span class="Constant">7</span> <span class="Comment"># 236 = darkish gray</span>
<span id="L68" class="LineNr"> 68 </span> <a href='../304screen.subx.html#L186'>start-color-on-screen</a> <span class="Constant">0xec</span>, <span class="Constant">7</span> <span class="Comment"># 236 = darkish gray</span>
<span id="L69" class="LineNr"> 69 </span> <span class="Delimiter">{</span>
<span id="L70" class="LineNr"> 70 </span> compare rightcol, ncols
<span id="L71" class="LineNr"> 71 </span> <span class="PreProc">break-if-&gt;=</span>
@ -126,17 +126,17 @@ if ('onhashchange' in window) {
<span id="L86" class="LineNr"> 86 </span> compare row, botrow
<span id="L87" class="LineNr"> 87 </span> <span class="PreProc">break-if-&gt;=</span>
<span id="L88" class="LineNr"> 88 </span> <span class="PreProc">var</span> col/<span class="Constant">edx</span>: int <span class="SpecialChar">&lt;-</span> copy leftcol
<span id="L89" class="LineNr"> 89 </span> <a href='../103screen.subx.html#L91'>move-cursor-on-screen</a> row, col
<span id="L89" class="LineNr"> 89 </span> <a href='../304screen.subx.html#L91'>move-cursor-on-screen</a> row, col
<span id="L90" class="LineNr"> 90 </span> <span class="Delimiter">{</span>
<span id="L91" class="LineNr"> 91 </span> compare col, rightcol
<span id="L92" class="LineNr"> 92 </span> <span class="PreProc">break-if-&gt;=</span>
<span id="L93" class="LineNr"> 93 </span> <span class="PreProc">var</span> c/<span class="Constant">eax</span>: byte <span class="SpecialChar">&lt;-</span> <a href='../061read-byte.subx.html#L38'>read-byte-buffered</a> in
<span id="L93" class="LineNr"> 93 </span> <span class="PreProc">var</span> c/<span class="Constant">eax</span>: byte <span class="SpecialChar">&lt;-</span> <a href='../112read-byte.subx.html#L38'>read-byte-buffered</a> in
<span id="L94" class="LineNr"> 94 </span> compare c, <span class="Constant">0xffffffff</span> <span class="Comment"># EOF marker</span>
<span id="L95" class="LineNr"> 95 </span> <span class="PreProc">break-if-=</span> $line-loop
<span id="L96" class="LineNr"> 96 </span> <a href='browse.mu.html#L108'>update-attributes</a> c, r
<span id="L97" class="LineNr"> 97 </span> compare c, <span class="Constant">0xa</span> <span class="Comment"># newline</span>
<span id="L98" class="LineNr"> 98 </span> <span class="PreProc">break-if-=</span> <span class="Comment"># no need to print newlines</span>
<span id="L99" class="LineNr"> 99 </span> <a href='../103screen.subx.html#L135'>print-byte-to-screen</a> c
<span id="L99" class="LineNr"> 99 </span> <a href='../304screen.subx.html#L136'>print-byte-to-screen</a> c
<span id="L100" class="LineNr">100 </span> col <span class="SpecialChar">&lt;-</span> increment
<span id="L101" class="LineNr">101 </span> <span class="PreProc">loop</span>
<span id="L102" class="LineNr">102 </span> <span class="Delimiter">}</span>
@ -147,7 +147,7 @@ if ('onhashchange' in window) {
<span id="L107" class="LineNr">107 </span>
<span id="L108" class="LineNr">108 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='browse.mu.html#L108'>update-attributes</a></span> c: byte, _r: (addr <a href='browse.mu.html#L46'>render-state</a>) <span class="Delimiter">{</span>
<span id="L109" class="LineNr">109 </span> <span class="PreProc">var</span> r/<span class="Constant">edi</span>: (addr <a href='browse.mu.html#L46'>render-state</a>) <span class="SpecialChar">&lt;-</span> copy _r
<span id="L110" class="LineNr">110 </span> <span class="PreProc">var</span> state/<span class="Constant">esi</span>: (addr int) <span class="SpecialChar">&lt;-</span> <a href='../081table.subx.html#L26'>get</a> r, current-state
<span id="L110" class="LineNr">110 </span> <span class="PreProc">var</span> state/<span class="Constant">esi</span>: (addr int) <span class="SpecialChar">&lt;-</span> <a href='../131table.subx.html#L26'>get</a> r, current-state
<span id="L111" class="LineNr">111 </span>$update-attributes:check-state: <span class="Delimiter">{</span>
<span id="L112" class="LineNr">112 </span> compare *state, <span class="Constant">0</span> <span class="Comment"># normal</span>
<span id="L113" class="LineNr">113 </span> <span class="Delimiter">{</span>
@ -156,7 +156,7 @@ if ('onhashchange' in window) {
<span id="L116" class="LineNr">116 </span> <span class="Delimiter">{</span>
<span id="L117" class="LineNr">117 </span> <span class="PreProc">break-if-!=</span>
<span id="L118" class="LineNr">118 </span> <span class="Comment"># r-&gt;current-state == 0 &amp;&amp; c == '*'</span>
<span id="L119" class="LineNr">119 </span> <a href='../103screen.subx.html#L220'>start-bold-on-screen</a>
<span id="L119" class="LineNr">119 </span> <a href='../304screen.subx.html#L221'>start-bold-on-screen</a>
<span id="L120" class="LineNr">120 </span> copy-to *state, <span class="Constant">1</span>
<span id="L121" class="LineNr">121 </span> <span class="PreProc">break</span> $update-attributes:check-state
<span id="L122" class="LineNr">122 </span> <span class="Delimiter">}</span>
@ -164,7 +164,7 @@ if ('onhashchange' in window) {
<span id="L124" class="LineNr">124 </span> <span class="Delimiter">{</span>
<span id="L125" class="LineNr">125 </span> <span class="PreProc">break-if-!=</span>
<span id="L126" class="LineNr">126 </span> <span class="Comment"># r-&gt;current-state == 0 &amp;&amp; c == '_'</span>
<span id="L127" class="LineNr">127 </span> <a href='../103screen.subx.html#L220'>start-bold-on-screen</a>
<span id="L127" class="LineNr">127 </span> <a href='../304screen.subx.html#L221'>start-bold-on-screen</a>
<span id="L128" class="LineNr">128 </span> copy-to *state, <span class="Constant">1</span>
<span id="L129" class="LineNr">129 </span> <span class="PreProc">break</span> $update-attributes:check-state
<span id="L130" class="LineNr">130 </span> <span class="Delimiter">}</span>
@ -176,7 +176,7 @@ if ('onhashchange' in window) {
<span id="L136" class="LineNr">136 </span> <span class="Delimiter">{</span>
<span id="L137" class="LineNr">137 </span> <span class="PreProc">break-if-!=</span>
<span id="L138" class="LineNr">138 </span> <span class="Comment"># r-&gt;current-state == 1 &amp;&amp; c == '*'</span>
<span id="L139" class="LineNr">139 </span> <a href='../103screen.subx.html#L170'>reset-formatting-on-screen</a>
<span id="L139" class="LineNr">139 </span> <a href='../304screen.subx.html#L171'>reset-formatting-on-screen</a>
<span id="L140" class="LineNr">140 </span> copy-to *state, <span class="Constant">0</span>
<span id="L141" class="LineNr">141 </span> <span class="PreProc">break</span> $update-attributes:check-state
<span id="L142" class="LineNr">142 </span> <span class="Delimiter">}</span>
@ -184,7 +184,7 @@ if ('onhashchange' in window) {
<span id="L144" class="LineNr">144 </span> <span class="Delimiter">{</span>
<span id="L145" class="LineNr">145 </span> <span class="PreProc">break-if-!=</span>
<span id="L146" class="LineNr">146 </span> <span class="Comment"># r-&gt;current-state == 1 &amp;&amp; c == '_'</span>
<span id="L147" class="LineNr">147 </span> <a href='../103screen.subx.html#L170'>reset-formatting-on-screen</a>
<span id="L147" class="LineNr">147 </span> <a href='../304screen.subx.html#L171'>reset-formatting-on-screen</a>
<span id="L148" class="LineNr">148 </span> copy-to *state, <span class="Constant">0</span>
<span id="L149" class="LineNr">149 </span> <span class="PreProc">break</span> $update-attributes:check-state
<span id="L150" class="LineNr">150 </span> <span class="Delimiter">}</span>
@ -199,11 +199,11 @@ if ('onhashchange' in window) {
<span id="L159" class="LineNr">159 </span> compare row, botrow
<span id="L160" class="LineNr">160 </span> <span class="PreProc">break-if-&gt;=</span>
<span id="L161" class="LineNr">161 </span> <span class="PreProc">var</span> col/<span class="Constant">edx</span>: int <span class="SpecialChar">&lt;-</span> copy leftcol
<span id="L162" class="LineNr">162 </span> <a href='../103screen.subx.html#L91'>move-cursor-on-screen</a> row, col
<span id="L162" class="LineNr">162 </span> <a href='../304screen.subx.html#L91'>move-cursor-on-screen</a> row, col
<span id="L163" class="LineNr">163 </span> <span class="Delimiter">{</span>
<span id="L164" class="LineNr">164 </span> compare col, rightcol
<span id="L165" class="LineNr">165 </span> <span class="PreProc">break-if-&gt;=</span>
<span id="L166" class="LineNr">166 </span> <a href='../103screen.subx.html#L122'>print-string-to-screen</a> <span class="Constant">&quot; &quot;</span>
<span id="L166" class="LineNr">166 </span> <a href='../304screen.subx.html#L123'>print-string-to-screen</a> <span class="Constant">&quot; &quot;</span>
<span id="L167" class="LineNr">167 </span> col <span class="SpecialChar">&lt;-</span> increment
<span id="L168" class="LineNr">168 </span> <span class="PreProc">loop</span>
<span id="L169" class="LineNr">169 </span> <span class="Delimiter">}</span>
@ -213,10 +213,10 @@ if ('onhashchange' in window) {
<span id="L173" class="LineNr">173 </span><span class="Delimiter">}</span>
<span id="L174" class="LineNr">174 </span>
<span id="L175" class="LineNr">175 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='browse.mu.html#L175'>dump</a></span> in: (addr buffered-file) <span class="Delimiter">{</span>
<span id="L176" class="LineNr">176 </span> <span class="PreProc">var</span> c/<span class="Constant">eax</span>: byte <span class="SpecialChar">&lt;-</span> <a href='../061read-byte.subx.html#L38'>read-byte-buffered</a> in
<span id="L176" class="LineNr">176 </span> <span class="PreProc">var</span> c/<span class="Constant">eax</span>: byte <span class="SpecialChar">&lt;-</span> <a href='../112read-byte.subx.html#L38'>read-byte-buffered</a> in
<span id="L177" class="LineNr">177 </span> compare c, <span class="Constant">0xffffffff</span> <span class="Comment"># EOF marker</span>
<span id="L178" class="LineNr">178 </span> <span class="PreProc">break-if-=</span>
<span id="L179" class="LineNr">179 </span> <a href='../103screen.subx.html#L135'>print-byte-to-screen</a> c
<span id="L179" class="LineNr">179 </span> <a href='../304screen.subx.html#L136'>print-byte-to-screen</a> c
<span id="L180" class="LineNr">180 </span> <span class="PreProc">loop</span>
<span id="L181" class="LineNr">181 </span><span class="Delimiter">}</span>
</pre>

File diff suppressed because it is too large Load Diff

View File

@ -98,10 +98,10 @@ if ('onhashchange' in window) {
<span id="L37" class="LineNr"> 37 </span> <span class="subxComment"># initialize heap</span>
<span id="L38" class="LineNr"> 38 </span> <span class="subxS1Comment"># . Heap = new-segment(Heap-size)</span>
<span id="L39" class="LineNr"> 39 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L40" class="LineNr"> 40 </span> 68/push <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L41" class="LineNr"> 41 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='../069allocate.subx.html#L34'>Heap-size</a></span>/disp32 <span class="subxComment"># push *Heap-size</span>
<span id="L40" class="LineNr"> 40 </span> 68/push <span class="SpecialChar"><a href='../120allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L41" class="LineNr"> 41 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='../120allocate.subx.html#L34'>Heap-size</a></span>/disp32 <span class="subxComment"># push *Heap-size</span>
<span id="L42" class="LineNr"> 42 </span> <span class="subxS2Comment"># . . call</span>
<span id="L43" class="LineNr"> 43 </span> e8/call <a href='../053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L43" class="LineNr"> 43 </span> e8/call <a href='../104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L44" class="LineNr"> 44 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L45" class="LineNr"> 45 </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="L46" class="LineNr"> 46 </span>
@ -115,7 +115,7 @@ if ('onhashchange' in window) {
<span id="L54" class="LineNr"> 54 </span> 68/push <span class="Constant">&quot;test&quot;</span>/imm32
<span id="L55" class="LineNr"> 55 </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="L56" class="LineNr"> 56 </span> <span class="subxS2Comment"># . . call</span>
<span id="L57" class="LineNr"> 57 </span> e8/call <a href='../052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L57" class="LineNr"> 57 </span> e8/call <a href='../103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L58" class="LineNr"> 58 </span> <span class="subxS2Comment"># . . discard args</span>
<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>
@ -124,7 +124,7 @@ if ('onhashchange' in window) {
<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>
<span id="L66" class="LineNr"> 66 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='../051test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L66" class="LineNr"> 66 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='../102test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L67" class="LineNr"> 67 </span> eb/jump $main:end/disp8
<span id="L68" class="LineNr"> 68 </span><span class="Constant">$run-main</span>:
<span id="L69" class="LineNr"> 69 </span> <span class="subxH1Comment"># - otherwise read a program from stdin and emit its translation to stdout</span>
@ -133,7 +133,7 @@ if ('onhashchange' in window) {
<span id="L72" class="LineNr"> 72 </span> 68/push 0/imm32/exit-descriptor
<span id="L73" class="LineNr"> 73 </span> 68/push 2/imm32/stderr
<span id="L74" class="LineNr"> 74 </span> 68/push 1/imm32/stdout
<span id="L75" class="LineNr"> 75 </span> 68/push <span class="SpecialChar"><a href='../061read-byte.subx.html#L14'>Stdin</a></span>/imm32
<span id="L75" class="LineNr"> 75 </span> 68/push <span class="SpecialChar"><a href='../112read-byte.subx.html#L14'>Stdin</a></span>/imm32
<span id="L76" class="LineNr"> 76 </span> <span class="subxS2Comment"># . . call</span>
<span id="L77" class="LineNr"> 77 </span> e8/call <a href='crenshaw2-1.subx.html#L86'>compile</a>/disp32
<span id="L78" class="LineNr"> 78 </span> <span class="subxS2Comment"># . . discard args</span>
@ -173,7 +173,7 @@ if ('onhashchange' in window) {
<span id="L112" class="LineNr">112 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L113" class="LineNr">113 </span> 51/push-ecx
<span id="L114" class="LineNr">114 </span> <span class="subxS2Comment"># . . call</span>
<span id="L115" class="LineNr">115 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L115" class="LineNr">115 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L116" class="LineNr">116 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L117" class="LineNr">117 </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="L118" class="LineNr">118 </span> <span class="subxComment"># read a digit from 'in' into 'num'</span>
@ -197,7 +197,7 @@ if ('onhashchange' in window) {
<span id="L136" class="LineNr">136 </span> 68/push <span class="Constant">&quot;bb/copy-to-ebx &quot;</span>/imm32
<span id="L137" class="LineNr">137 </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="L138" class="LineNr">138 </span> <span class="subxS2Comment"># . . call</span>
<span id="L139" class="LineNr">139 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L139" class="LineNr">139 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L140" class="LineNr">140 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L141" class="LineNr">141 </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="L142" class="LineNr">142 </span> <span class="subxS1Comment"># . write-stream(out, num)</span>
@ -205,15 +205,15 @@ if ('onhashchange' in window) {
<span id="L144" class="LineNr">144 </span> 51/push-ecx/num
<span id="L145" class="LineNr">145 </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="L146" class="LineNr">146 </span> <span class="subxS2Comment"># . . call</span>
<span id="L147" class="LineNr">147 </span> e8/call <a href='../062write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L147" class="LineNr">147 </span> e8/call <a href='../113write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L148" class="LineNr">148 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L149" class="LineNr">149 </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="L150" class="LineNr">150 </span> <span class="subxS1Comment"># . write(out, Newline)</span>
<span id="L151" class="LineNr">151 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L152" class="LineNr">152 </span> 68/push <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>/imm32
<span id="L152" class="LineNr">152 </span> 68/push <span class="SpecialChar"><a href='../102test.subx.html#L82'>Newline</a></span>/imm32
<span id="L153" class="LineNr">153 </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="L154" class="LineNr">154 </span> <span class="subxS2Comment"># . . call</span>
<span id="L155" class="LineNr">155 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L155" class="LineNr">155 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L156" class="LineNr">156 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L157" class="LineNr">157 </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="L158" class="LineNr">158 </span> <span class="subxS1Comment"># . write(out, &quot;b8/copy-to-eax 1/imm32/exit\n&quot;)</span>
@ -221,7 +221,7 @@ if ('onhashchange' in window) {
<span id="L160" class="LineNr">160 </span> 68/push <span class="Constant">&quot;b8/copy-to-eax 1/imm32/exit\n&quot;</span>/imm32
<span id="L161" class="LineNr">161 </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="L162" class="LineNr">162 </span> <span class="subxS2Comment"># . . call</span>
<span id="L163" class="LineNr">163 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L163" class="LineNr">163 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L164" class="LineNr">164 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L165" class="LineNr">165 </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="L166" class="LineNr">166 </span> <span class="subxS1Comment"># . write(out, &quot;cd/syscall 0x80/imm8\n&quot;)</span>
@ -229,7 +229,7 @@ if ('onhashchange' in window) {
<span id="L168" class="LineNr">168 </span> 68/push <span class="Constant">&quot;cd/syscall 0x80/imm8\n&quot;</span>/imm32
<span id="L169" class="LineNr">169 </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="L170" class="LineNr">170 </span> <span class="subxS2Comment"># . . call</span>
<span id="L171" class="LineNr">171 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L171" class="LineNr">171 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L172" class="LineNr">172 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L173" class="LineNr">173 </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="L174" class="LineNr">174 </span><span class="Constant">$compile:end</span>:
@ -316,7 +316,7 @@ if ('onhashchange' in window) {
<span id="L255" class="LineNr">255 </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> 0x10/disp8 <span class="Normal"> . </span> <span class="subxComment"># push *(ebp+16)</span>
<span id="L256" class="LineNr">256 </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> 0x14/disp8 <span class="Normal"> . </span> <span class="subxComment"># push *(ebp+20)</span>
<span id="L257" class="LineNr">257 </span> <span class="subxS2Comment"># . . call</span>
<span id="L258" class="LineNr">258 </span> e8/call <a href='../063error.subx.html#L9'>error</a>/disp32 <span class="subxComment"># never returns</span>
<span id="L258" class="LineNr">258 </span> e8/call <a href='../114error.subx.html#L9'>error</a>/disp32 <span class="subxComment"># never returns</span>
<span id="L259" class="LineNr">259 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L260" class="LineNr">260 </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="L261" class="LineNr">261 </span><span class="Constant">$get-num:stage2</span>:
@ -357,39 +357,39 @@ if ('onhashchange' in window) {
<span id="L296" class="LineNr">296 </span> <span class="subxComment"># clear all streams</span>
<span id="L297" class="LineNr">297 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L298" class="LineNr">298 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L299" class="LineNr">299 </span> 68/push <a href='../057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L299" class="LineNr">299 </span> 68/push <a href='../108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L300" class="LineNr">300 </span> <span class="subxS2Comment"># . . call</span>
<span id="L301" class="LineNr">301 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L301" class="LineNr">301 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L302" class="LineNr">302 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L303" class="LineNr">303 </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="L304" class="LineNr">304 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L305" class="LineNr">305 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L306" class="LineNr">306 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L307" class="LineNr">307 </span> <span class="subxS2Comment"># . . call</span>
<span id="L308" class="LineNr">308 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L308" class="LineNr">308 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L309" class="LineNr">309 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L310" class="LineNr">310 </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="L311" class="LineNr">311 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L312" class="LineNr">312 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L313" class="LineNr">313 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L313" class="LineNr">313 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L314" class="LineNr">314 </span> <span class="subxS2Comment"># . . call</span>
<span id="L315" class="LineNr">315 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L315" class="LineNr">315 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L316" class="LineNr">316 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L317" class="LineNr">317 </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="L318" class="LineNr">318 </span> <span class="subxS1Comment"># . clear-stream(_test-error-stream)</span>
<span id="L319" class="LineNr">319 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L320" class="LineNr">320 </span> 68/push <a href='../064write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L320" class="LineNr">320 </span> 68/push <a href='../115write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L321" class="LineNr">321 </span> <span class="subxS2Comment"># . . call</span>
<span id="L322" class="LineNr">322 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L322" class="LineNr">322 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L323" class="LineNr">323 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L324" class="LineNr">324 </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="L325" class="LineNr">325 </span> <span class="subxComment"># initialize 'in'</span>
<span id="L326" class="LineNr">326 </span> <span class="subxS1Comment"># . write(_test-stream, &quot;3&quot;)</span>
<span id="L327" class="LineNr">327 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L328" class="LineNr">328 </span> 68/push <span class="Constant">&quot;3&quot;</span>/imm32
<span id="L329" class="LineNr">329 </span> 68/push <a href='../057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L329" class="LineNr">329 </span> 68/push <a href='../108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L330" class="LineNr">330 </span> <span class="subxS2Comment"># . . call</span>
<span id="L331" class="LineNr">331 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L331" class="LineNr">331 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L332" class="LineNr">332 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L333" class="LineNr">333 </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="L334" class="LineNr">334 </span> <span class="subxComment"># initialize exit-descriptor 'ed' for the call to 'get-num' below</span>
@ -401,13 +401,13 @@ if ('onhashchange' in window) {
<span id="L340" class="LineNr">340 </span> 68/push 0x10/imm32/nbytes-of-args-for-get-num
<span id="L341" class="LineNr">341 </span> 50/push-eax/ed
<span id="L342" class="LineNr">342 </span> <span class="subxS2Comment"># . . call</span>
<span id="L343" class="LineNr">343 </span> e8/call <a href='../059stop.subx.html#L44'>tailor-exit-descriptor</a>/disp32
<span id="L343" class="LineNr">343 </span> e8/call <a href='../110stop.subx.html#L44'>tailor-exit-descriptor</a>/disp32
<span id="L344" class="LineNr">344 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L345" class="LineNr">345 </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="L346" class="LineNr">346 </span> <span class="subxComment"># prime the pump</span>
<span id="L347" class="LineNr">347 </span> <span class="subxS1Comment"># . get-char(_test-buffered-file)</span>
<span id="L348" class="LineNr">348 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L349" class="LineNr">349 </span> 68/push <a href='../061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L349" class="LineNr">349 </span> 68/push <a href='../112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L350" class="LineNr">350 </span> <span class="subxS2Comment"># . . call</span>
<span id="L351" class="LineNr">351 </span> e8/call <a href='crenshaw2-1.subx.html#L508'>get-char</a>/disp32
<span id="L352" class="LineNr">352 </span> <span class="subxS2Comment"># . . discard args</span>
@ -415,9 +415,9 @@ if ('onhashchange' in window) {
<span id="L354" class="LineNr">354 </span> <span class="subxComment"># get-num(in, out, err, ed)</span>
<span id="L355" class="LineNr">355 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L356" class="LineNr">356 </span> 50/push-eax/ed
<span id="L357" class="LineNr">357 </span> 68/push <a href='../064write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L358" class="LineNr">358 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L359" class="LineNr">359 </span> 68/push <a href='../061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L357" class="LineNr">357 </span> 68/push <a href='../115write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L358" class="LineNr">358 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L359" class="LineNr">359 </span> 68/push <a href='../112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L360" class="LineNr">360 </span> <span class="subxS2Comment"># . . call</span>
<span id="L361" class="LineNr">361 </span> e8/call <a href='crenshaw2-1.subx.html#L187'>get-num</a>/disp32
<span id="L362" class="LineNr">362 </span> <span class="subxComment"># registers except esp may be clobbered at this point</span>
@ -427,10 +427,10 @@ if ('onhashchange' in window) {
<span id="L366" class="LineNr">366 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L367" class="LineNr">367 </span> 68/push <span class="Constant">&quot;F - test-get-num-reads-single-digit&quot;</span>/imm32
<span id="L368" class="LineNr">368 </span> 68/push 0x33/imm32
<span id="L369" class="LineNr">369 </span> b8/copy-to-eax <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L369" class="LineNr">369 </span> b8/copy-to-eax <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L370" class="LineNr">370 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+12)</span>
<span id="L371" class="LineNr">371 </span> <span class="subxS2Comment"># . . call</span>
<span id="L372" class="LineNr">372 </span> e8/call <a href='../051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L372" class="LineNr">372 </span> e8/call <a href='../102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L373" class="LineNr">373 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L374" class="LineNr">374 </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="L375" class="LineNr">375 </span> <span class="subxS1Comment"># . reclaim locals</span>
@ -446,39 +446,39 @@ if ('onhashchange' in window) {
<span id="L385" class="LineNr">385 </span> <span class="subxComment"># clear all streams</span>
<span id="L386" class="LineNr">386 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L387" class="LineNr">387 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L388" class="LineNr">388 </span> 68/push <a href='../057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L388" class="LineNr">388 </span> 68/push <a href='../108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L389" class="LineNr">389 </span> <span class="subxS2Comment"># . . call</span>
<span id="L390" class="LineNr">390 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L390" class="LineNr">390 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L391" class="LineNr">391 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L392" class="LineNr">392 </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="L393" class="LineNr">393 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L394" class="LineNr">394 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L395" class="LineNr">395 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L396" class="LineNr">396 </span> <span class="subxS2Comment"># . . call</span>
<span id="L397" class="LineNr">397 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L397" class="LineNr">397 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L398" class="LineNr">398 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L399" class="LineNr">399 </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="L400" class="LineNr">400 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L401" class="LineNr">401 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L402" class="LineNr">402 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L402" class="LineNr">402 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L403" class="LineNr">403 </span> <span class="subxS2Comment"># . . call</span>
<span id="L404" class="LineNr">404 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L404" class="LineNr">404 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L405" class="LineNr">405 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L406" class="LineNr">406 </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="L407" class="LineNr">407 </span> <span class="subxS1Comment"># . clear-stream(_test-error-stream)</span>
<span id="L408" class="LineNr">408 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L409" class="LineNr">409 </span> 68/push <a href='../064write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L409" class="LineNr">409 </span> 68/push <a href='../115write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L410" class="LineNr">410 </span> <span class="subxS2Comment"># . . call</span>
<span id="L411" class="LineNr">411 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L411" class="LineNr">411 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L412" class="LineNr">412 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L413" class="LineNr">413 </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="L414" class="LineNr">414 </span> <span class="subxComment"># initialize 'in'</span>
<span id="L415" class="LineNr">415 </span> <span class="subxS1Comment"># . write(_test-stream, &quot;3&quot;)</span>
<span id="L416" class="LineNr">416 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L417" class="LineNr">417 </span> 68/push <span class="Constant">&quot;3&quot;</span>/imm32
<span id="L418" class="LineNr">418 </span> 68/push <a href='../057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L418" class="LineNr">418 </span> 68/push <a href='../108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L419" class="LineNr">419 </span> <span class="subxS2Comment"># . . call</span>
<span id="L420" class="LineNr">420 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L420" class="LineNr">420 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L421" class="LineNr">421 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L422" class="LineNr">422 </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="L423" class="LineNr">423 </span> <span class="subxComment"># initialize exit-descriptor 'ed' for the call to 'get-num' below</span>
@ -490,16 +490,16 @@ if ('onhashchange' in window) {
<span id="L429" class="LineNr">429 </span> 68/push 0x10/imm32/nbytes-of-args-for-get-num
<span id="L430" class="LineNr">430 </span> 50/push-eax/ed
<span id="L431" class="LineNr">431 </span> <span class="subxS2Comment"># . . call</span>
<span id="L432" class="LineNr">432 </span> e8/call <a href='../059stop.subx.html#L44'>tailor-exit-descriptor</a>/disp32
<span id="L432" class="LineNr">432 </span> e8/call <a href='../110stop.subx.html#L44'>tailor-exit-descriptor</a>/disp32
<span id="L433" class="LineNr">433 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L434" class="LineNr">434 </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="L435" class="LineNr">435 </span> <span class="subxComment"># *don't* prime the pump</span>
<span id="L436" class="LineNr">436 </span> <span class="subxComment"># get-num(in, out, err, ed)</span>
<span id="L437" class="LineNr">437 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L438" class="LineNr">438 </span> 50/push-eax/ed
<span id="L439" class="LineNr">439 </span> 68/push <a href='../064write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L440" class="LineNr">440 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L441" class="LineNr">441 </span> 68/push <a href='../061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L439" class="LineNr">439 </span> 68/push <a href='../115write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L440" class="LineNr">440 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L441" class="LineNr">441 </span> 68/push <a href='../112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L442" class="LineNr">442 </span> <span class="subxS2Comment"># . . call</span>
<span id="L443" class="LineNr">443 </span> e8/call <a href='crenshaw2-1.subx.html#L187'>get-num</a>/disp32
<span id="L444" class="LineNr">444 </span> <span class="subxComment"># registers except esp may be clobbered at this point</span>
@ -513,7 +513,7 @@ if ('onhashchange' in window) {
<span id="L452" class="LineNr">452 </span> <span class="subxS2Comment"># . . push ed-&gt;value</span>
<span id="L453" class="LineNr">453 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+4)</span>
<span id="L454" class="LineNr">454 </span> <span class="subxS2Comment"># . . call</span>
<span id="L455" class="LineNr">455 </span> e8/call <a href='../051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L455" class="LineNr">455 </span> e8/call <a href='../102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L456" class="LineNr">456 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L457" class="LineNr">457 </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="L458" class="LineNr">458 </span> <span class="subxS1Comment"># . reclaim locals</span>
@ -533,7 +533,7 @@ if ('onhashchange' in window) {
<span id="L472" class="LineNr">472 </span> 68/push <span class="Constant">&quot;Error: &quot;</span>/imm32
<span id="L473" class="LineNr">473 </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="L474" class="LineNr">474 </span> <span class="subxS2Comment"># . . call</span>
<span id="L475" class="LineNr">475 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L475" class="LineNr">475 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L476" class="LineNr">476 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L477" class="LineNr">477 </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="L478" class="LineNr">478 </span> <span class="subxComment"># write(f, s)</span>
@ -541,7 +541,7 @@ if ('onhashchange' in window) {
<span id="L480" class="LineNr">480 </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> 0x10/disp8 <span class="Normal"> . </span> <span class="subxComment"># push *(ebp+16)</span>
<span id="L481" class="LineNr">481 </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="L482" class="LineNr">482 </span> <span class="subxS2Comment"># . . call</span>
<span id="L483" class="LineNr">483 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L483" class="LineNr">483 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L484" class="LineNr">484 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L485" class="LineNr">485 </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="L486" class="LineNr">486 </span> <span class="subxComment"># write(f, &quot; expected\n&quot;)</span>
@ -549,7 +549,7 @@ if ('onhashchange' in window) {
<span id="L488" class="LineNr">488 </span> 68/push <span class="Constant">&quot; expected\n&quot;</span>/imm32
<span id="L489" class="LineNr">489 </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="L490" class="LineNr">490 </span> <span class="subxS2Comment"># . . call</span>
<span id="L491" class="LineNr">491 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L491" class="LineNr">491 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L492" class="LineNr">492 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L493" class="LineNr">493 </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="L494" class="LineNr">494 </span> <span class="subxComment"># stop(ed, 1)</span>
@ -557,7 +557,7 @@ if ('onhashchange' in window) {
<span id="L496" class="LineNr">496 </span> 68/push 1/imm32
<span id="L497" class="LineNr">497 </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="L498" class="LineNr">498 </span> <span class="subxS2Comment"># . . call</span>
<span id="L499" class="LineNr">499 </span> e8/call <a href='../059stop.subx.html#L92'>stop</a>/disp32
<span id="L499" class="LineNr">499 </span> e8/call <a href='../110stop.subx.html#L92'>stop</a>/disp32
<span id="L500" class="LineNr">500 </span> <span class="subxComment"># should never get past this point</span>
<span id="L501" class="LineNr">501 </span><span class="Constant">$expected:dead-end</span>:
<span id="L502" class="LineNr">502 </span> <span class="subxS1Comment"># . epilogue</span>
@ -576,7 +576,7 @@ if ('onhashchange' in window) {
<span id="L515" class="LineNr">515 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L516" class="LineNr">516 </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="L517" class="LineNr">517 </span> <span class="subxS2Comment"># . . call</span>
<span id="L518" class="LineNr">518 </span> e8/call <a href='../061read-byte.subx.html#L38'>read-byte-buffered</a>/disp32
<span id="L518" class="LineNr">518 </span> e8/call <a href='../112read-byte.subx.html#L38'>read-byte-buffered</a>/disp32
<span id="L519" class="LineNr">519 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L520" class="LineNr">520 </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="L521" class="LineNr">521 </span> <span class="subxComment"># save eax to Look</span>

View File

@ -98,10 +98,10 @@ if ('onhashchange' in window) {
<span id="L37" class="LineNr"> 37 </span> <span class="subxComment"># initialize heap</span>
<span id="L38" class="LineNr"> 38 </span> <span class="subxS1Comment"># . Heap = new-segment(Heap-size)</span>
<span id="L39" class="LineNr"> 39 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L40" class="LineNr"> 40 </span> 68/push <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L41" class="LineNr"> 41 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='../069allocate.subx.html#L34'>Heap-size</a></span>/disp32 <span class="subxComment"># push *Heap-size</span>
<span id="L40" class="LineNr"> 40 </span> 68/push <span class="SpecialChar"><a href='../120allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L41" class="LineNr"> 41 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='../120allocate.subx.html#L34'>Heap-size</a></span>/disp32 <span class="subxComment"># push *Heap-size</span>
<span id="L42" class="LineNr"> 42 </span> <span class="subxS2Comment"># . . call</span>
<span id="L43" class="LineNr"> 43 </span> e8/call <a href='../053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L43" class="LineNr"> 43 </span> e8/call <a href='../104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L44" class="LineNr"> 44 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L45" class="LineNr"> 45 </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="L46" class="LineNr"> 46 </span>
@ -115,7 +115,7 @@ if ('onhashchange' in window) {
<span id="L54" class="LineNr"> 54 </span> 68/push <span class="Constant">&quot;test&quot;</span>/imm32
<span id="L55" class="LineNr"> 55 </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="L56" class="LineNr"> 56 </span> <span class="subxS2Comment"># . . call</span>
<span id="L57" class="LineNr"> 57 </span> e8/call <a href='../052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L57" class="LineNr"> 57 </span> e8/call <a href='../103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L58" class="LineNr"> 58 </span> <span class="subxS2Comment"># . . discard args</span>
<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>
@ -124,7 +124,7 @@ if ('onhashchange' in window) {
<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>
<span id="L66" class="LineNr"> 66 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='../051test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L66" class="LineNr"> 66 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='../102test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L67" class="LineNr"> 67 </span> eb/jump $main:end/disp8
<span id="L68" class="LineNr"> 68 </span><span class="Constant">$run-main</span>:
<span id="L69" class="LineNr"> 69 </span> <span class="subxH1Comment"># - otherwise read a program from stdin and emit its translation to stdout</span>
@ -133,7 +133,7 @@ if ('onhashchange' in window) {
<span id="L72" class="LineNr"> 72 </span> 68/push 0/imm32/exit-descriptor
<span id="L73" class="LineNr"> 73 </span> 68/push 2/imm32/stderr
<span id="L74" class="LineNr"> 74 </span> 68/push 1/imm32/stdout
<span id="L75" class="LineNr"> 75 </span> 68/push <span class="SpecialChar"><a href='../061read-byte.subx.html#L14'>Stdin</a></span>/imm32
<span id="L75" class="LineNr"> 75 </span> 68/push <span class="SpecialChar"><a href='../112read-byte.subx.html#L14'>Stdin</a></span>/imm32
<span id="L76" class="LineNr"> 76 </span> <span class="subxS2Comment"># . . call</span>
<span id="L77" class="LineNr"> 77 </span> e8/call <a href='crenshaw2-1b.subx.html#L86'>compile</a>/disp32
<span id="L78" class="LineNr"> 78 </span> <span class="subxS2Comment"># . . discard args</span>
@ -173,7 +173,7 @@ if ('onhashchange' in window) {
<span id="L112" class="LineNr">112 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L113" class="LineNr">113 </span> 51/push-ecx
<span id="L114" class="LineNr">114 </span> <span class="subxS2Comment"># . . call</span>
<span id="L115" class="LineNr">115 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L115" class="LineNr">115 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L116" class="LineNr">116 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L117" class="LineNr">117 </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="L118" class="LineNr">118 </span> <span class="subxComment"># read a digit from 'in' into 'num'</span>
@ -197,7 +197,7 @@ if ('onhashchange' in window) {
<span id="L136" class="LineNr">136 </span> 68/push <span class="Constant">&quot;bb/copy-to-ebx &quot;</span>/imm32
<span id="L137" class="LineNr">137 </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="L138" class="LineNr">138 </span> <span class="subxS2Comment"># . . call</span>
<span id="L139" class="LineNr">139 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L139" class="LineNr">139 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L140" class="LineNr">140 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L141" class="LineNr">141 </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="L142" class="LineNr">142 </span> <span class="subxS1Comment"># . write-stream(out, num)</span>
@ -205,15 +205,15 @@ if ('onhashchange' in window) {
<span id="L144" class="LineNr">144 </span> 51/push-ecx/num
<span id="L145" class="LineNr">145 </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="L146" class="LineNr">146 </span> <span class="subxS2Comment"># . . call</span>
<span id="L147" class="LineNr">147 </span> e8/call <a href='../062write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L147" class="LineNr">147 </span> e8/call <a href='../113write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L148" class="LineNr">148 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L149" class="LineNr">149 </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="L150" class="LineNr">150 </span> <span class="subxS1Comment"># . write(out, Newline)</span>
<span id="L151" class="LineNr">151 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L152" class="LineNr">152 </span> 68/push <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>/imm32
<span id="L152" class="LineNr">152 </span> 68/push <span class="SpecialChar"><a href='../102test.subx.html#L82'>Newline</a></span>/imm32
<span id="L153" class="LineNr">153 </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="L154" class="LineNr">154 </span> <span class="subxS2Comment"># . . call</span>
<span id="L155" class="LineNr">155 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L155" class="LineNr">155 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L156" class="LineNr">156 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L157" class="LineNr">157 </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="L158" class="LineNr">158 </span> <span class="subxS1Comment"># . write(out, &quot;b8/copy-to-eax 1/imm32/exit\n&quot;)</span>
@ -221,7 +221,7 @@ if ('onhashchange' in window) {
<span id="L160" class="LineNr">160 </span> 68/push <span class="Constant">&quot;b8/copy-to-eax 1/imm32/exit\n&quot;</span>/imm32
<span id="L161" class="LineNr">161 </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="L162" class="LineNr">162 </span> <span class="subxS2Comment"># . . call</span>
<span id="L163" class="LineNr">163 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L163" class="LineNr">163 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L164" class="LineNr">164 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L165" class="LineNr">165 </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="L166" class="LineNr">166 </span> <span class="subxS1Comment"># . write(out, &quot;cd/syscall 0x80/imm8\n&quot;)</span>
@ -229,7 +229,7 @@ if ('onhashchange' in window) {
<span id="L168" class="LineNr">168 </span> 68/push <span class="Constant">&quot;cd/syscall 0x80/imm8\n&quot;</span>/imm32
<span id="L169" class="LineNr">169 </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="L170" class="LineNr">170 </span> <span class="subxS2Comment"># . . call</span>
<span id="L171" class="LineNr">171 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L171" class="LineNr">171 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L172" class="LineNr">172 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L173" class="LineNr">173 </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="L174" class="LineNr">174 </span><span class="Constant">$compile:end</span>:
@ -321,7 +321,7 @@ if ('onhashchange' in window) {
<span id="L260" class="LineNr">260 </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> 0x10/disp8 <span class="Normal"> . </span> <span class="subxComment"># push *(ebp+16)</span>
<span id="L261" class="LineNr">261 </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> 0x14/disp8 <span class="Normal"> . </span> <span class="subxComment"># push *(ebp+20)</span>
<span id="L262" class="LineNr">262 </span> <span class="subxS2Comment"># . . call</span>
<span id="L263" class="LineNr">263 </span> e8/call <a href='../063error.subx.html#L9'>error</a>/disp32 <span class="subxComment"># never returns</span>
<span id="L263" class="LineNr">263 </span> e8/call <a href='../114error.subx.html#L9'>error</a>/disp32 <span class="subxComment"># never returns</span>
<span id="L264" class="LineNr">264 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L265" class="LineNr">265 </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="L266" class="LineNr">266 </span><span class="Constant">$get-num:loop-stage2</span>:
@ -373,39 +373,39 @@ if ('onhashchange' in window) {
<span id="L312" class="LineNr">312 </span> <span class="subxComment"># clear all streams</span>
<span id="L313" class="LineNr">313 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L314" class="LineNr">314 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L315" class="LineNr">315 </span> 68/push <a href='../057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L315" class="LineNr">315 </span> 68/push <a href='../108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L316" class="LineNr">316 </span> <span class="subxS2Comment"># . . call</span>
<span id="L317" class="LineNr">317 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L317" class="LineNr">317 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L318" class="LineNr">318 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L319" class="LineNr">319 </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="L320" class="LineNr">320 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L321" class="LineNr">321 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L322" class="LineNr">322 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L323" class="LineNr">323 </span> <span class="subxS2Comment"># . . call</span>
<span id="L324" class="LineNr">324 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L324" class="LineNr">324 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L325" class="LineNr">325 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L326" class="LineNr">326 </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="L327" class="LineNr">327 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L328" class="LineNr">328 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L329" class="LineNr">329 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L329" class="LineNr">329 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L330" class="LineNr">330 </span> <span class="subxS2Comment"># . . call</span>
<span id="L331" class="LineNr">331 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L331" class="LineNr">331 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L332" class="LineNr">332 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L333" class="LineNr">333 </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="L334" class="LineNr">334 </span> <span class="subxS1Comment"># . clear-stream(_test-error-stream)</span>
<span id="L335" class="LineNr">335 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L336" class="LineNr">336 </span> 68/push <a href='../064write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L336" class="LineNr">336 </span> 68/push <a href='../115write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L337" class="LineNr">337 </span> <span class="subxS2Comment"># . . call</span>
<span id="L338" class="LineNr">338 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L338" class="LineNr">338 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L339" class="LineNr">339 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L340" class="LineNr">340 </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="L341" class="LineNr">341 </span> <span class="subxComment"># initialize 'in'</span>
<span id="L342" class="LineNr">342 </span> <span class="subxS1Comment"># . write(_test-stream, &quot;3&quot;)</span>
<span id="L343" class="LineNr">343 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L344" class="LineNr">344 </span> 68/push <span class="Constant">&quot;3&quot;</span>/imm32
<span id="L345" class="LineNr">345 </span> 68/push <a href='../057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L345" class="LineNr">345 </span> 68/push <a href='../108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L346" class="LineNr">346 </span> <span class="subxS2Comment"># . . call</span>
<span id="L347" class="LineNr">347 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L347" class="LineNr">347 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L348" class="LineNr">348 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L349" class="LineNr">349 </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="L350" class="LineNr">350 </span> <span class="subxComment"># initialize exit-descriptor 'ed' for the call to 'get-num' below</span>
@ -417,13 +417,13 @@ if ('onhashchange' in window) {
<span id="L356" class="LineNr">356 </span> 68/push 0x10/imm32/nbytes-of-args-for-get-num
<span id="L357" class="LineNr">357 </span> 50/push-eax/ed
<span id="L358" class="LineNr">358 </span> <span class="subxS2Comment"># . . call</span>
<span id="L359" class="LineNr">359 </span> e8/call <a href='../059stop.subx.html#L44'>tailor-exit-descriptor</a>/disp32
<span id="L359" class="LineNr">359 </span> e8/call <a href='../110stop.subx.html#L44'>tailor-exit-descriptor</a>/disp32
<span id="L360" class="LineNr">360 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L361" class="LineNr">361 </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="L362" class="LineNr">362 </span> <span class="subxComment"># prime the pump</span>
<span id="L363" class="LineNr">363 </span> <span class="subxS1Comment"># . get-char(_test-buffered-file)</span>
<span id="L364" class="LineNr">364 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L365" class="LineNr">365 </span> 68/push <a href='../061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L365" class="LineNr">365 </span> 68/push <a href='../112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L366" class="LineNr">366 </span> <span class="subxS2Comment"># . . call</span>
<span id="L367" class="LineNr">367 </span> e8/call <a href='crenshaw2-1b.subx.html#L702'>get-char</a>/disp32
<span id="L368" class="LineNr">368 </span> <span class="subxS2Comment"># . . discard args</span>
@ -431,9 +431,9 @@ if ('onhashchange' in window) {
<span id="L370" class="LineNr">370 </span> <span class="subxComment"># get-num(in, out, err, ed)</span>
<span id="L371" class="LineNr">371 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L372" class="LineNr">372 </span> 50/push-eax/ed
<span id="L373" class="LineNr">373 </span> 68/push <a href='../064write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L374" class="LineNr">374 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L375" class="LineNr">375 </span> 68/push <a href='../061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L373" class="LineNr">373 </span> 68/push <a href='../115write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L374" class="LineNr">374 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L375" class="LineNr">375 </span> 68/push <a href='../112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L376" class="LineNr">376 </span> <span class="subxS2Comment"># . . call</span>
<span id="L377" class="LineNr">377 </span> e8/call <a href='crenshaw2-1b.subx.html#L187'>get-num</a>/disp32
<span id="L378" class="LineNr">378 </span> <span class="subxComment"># registers except esp may be clobbered at this point</span>
@ -443,10 +443,10 @@ if ('onhashchange' in window) {
<span id="L382" class="LineNr">382 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L383" class="LineNr">383 </span> 68/push <span class="Constant">&quot;F - test-get-num-reads-single-digit&quot;</span>/imm32
<span id="L384" class="LineNr">384 </span> 68/push 0x33/imm32
<span id="L385" class="LineNr">385 </span> b8/copy-to-eax <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L385" class="LineNr">385 </span> b8/copy-to-eax <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L386" class="LineNr">386 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+12)</span>
<span id="L387" class="LineNr">387 </span> <span class="subxS2Comment"># . . call</span>
<span id="L388" class="LineNr">388 </span> e8/call <a href='../051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L388" class="LineNr">388 </span> e8/call <a href='../102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L389" class="LineNr">389 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L390" class="LineNr">390 </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="L391" class="LineNr">391 </span> <span class="subxS1Comment"># . reclaim locals</span>
@ -462,39 +462,39 @@ if ('onhashchange' in window) {
<span id="L401" class="LineNr">401 </span> <span class="subxComment"># clear all streams</span>
<span id="L402" class="LineNr">402 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L403" class="LineNr">403 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L404" class="LineNr">404 </span> 68/push <a href='../057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L404" class="LineNr">404 </span> 68/push <a href='../108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L405" class="LineNr">405 </span> <span class="subxS2Comment"># . . call</span>
<span id="L406" class="LineNr">406 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L406" class="LineNr">406 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L407" class="LineNr">407 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L408" class="LineNr">408 </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="L409" class="LineNr">409 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L410" class="LineNr">410 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L411" class="LineNr">411 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L412" class="LineNr">412 </span> <span class="subxS2Comment"># . . call</span>
<span id="L413" class="LineNr">413 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L413" class="LineNr">413 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L414" class="LineNr">414 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L415" class="LineNr">415 </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="L416" class="LineNr">416 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L417" class="LineNr">417 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L418" class="LineNr">418 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L418" class="LineNr">418 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L419" class="LineNr">419 </span> <span class="subxS2Comment"># . . call</span>
<span id="L420" class="LineNr">420 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L420" class="LineNr">420 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L421" class="LineNr">421 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L422" class="LineNr">422 </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="L423" class="LineNr">423 </span> <span class="subxS1Comment"># . clear-stream(_test-error-stream)</span>
<span id="L424" class="LineNr">424 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L425" class="LineNr">425 </span> 68/push <a href='../064write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L425" class="LineNr">425 </span> 68/push <a href='../115write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L426" class="LineNr">426 </span> <span class="subxS2Comment"># . . call</span>
<span id="L427" class="LineNr">427 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L427" class="LineNr">427 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L428" class="LineNr">428 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L429" class="LineNr">429 </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="L430" class="LineNr">430 </span> <span class="subxComment"># initialize 'in'</span>
<span id="L431" class="LineNr">431 </span> <span class="subxS1Comment"># . write(_test-stream, &quot;3&quot;)</span>
<span id="L432" class="LineNr">432 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L433" class="LineNr">433 </span> 68/push <span class="Constant">&quot;3&quot;</span>/imm32
<span id="L434" class="LineNr">434 </span> 68/push <a href='../057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L434" class="LineNr">434 </span> 68/push <a href='../108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L435" class="LineNr">435 </span> <span class="subxS2Comment"># . . call</span>
<span id="L436" class="LineNr">436 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L436" class="LineNr">436 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L437" class="LineNr">437 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L438" class="LineNr">438 </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="L439" class="LineNr">439 </span> <span class="subxComment"># initialize exit-descriptor 'ed' for the call to 'get-num' below</span>
@ -506,16 +506,16 @@ if ('onhashchange' in window) {
<span id="L445" class="LineNr">445 </span> 68/push 0x10/imm32/nbytes-of-args-for-get-num
<span id="L446" class="LineNr">446 </span> 50/push-eax/ed
<span id="L447" class="LineNr">447 </span> <span class="subxS2Comment"># . . call</span>
<span id="L448" class="LineNr">448 </span> e8/call <a href='../059stop.subx.html#L44'>tailor-exit-descriptor</a>/disp32
<span id="L448" class="LineNr">448 </span> e8/call <a href='../110stop.subx.html#L44'>tailor-exit-descriptor</a>/disp32
<span id="L449" class="LineNr">449 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L450" class="LineNr">450 </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="L451" class="LineNr">451 </span> <span class="subxComment"># *don't* prime the pump</span>
<span id="L452" class="LineNr">452 </span> <span class="subxComment"># get-num(in, out, err, ed)</span>
<span id="L453" class="LineNr">453 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L454" class="LineNr">454 </span> 50/push-eax/ed
<span id="L455" class="LineNr">455 </span> 68/push <a href='../064write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L456" class="LineNr">456 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L457" class="LineNr">457 </span> 68/push <a href='../061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L455" class="LineNr">455 </span> 68/push <a href='../115write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L456" class="LineNr">456 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L457" class="LineNr">457 </span> 68/push <a href='../112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L458" class="LineNr">458 </span> <span class="subxS2Comment"># . . call</span>
<span id="L459" class="LineNr">459 </span> e8/call <a href='crenshaw2-1b.subx.html#L187'>get-num</a>/disp32
<span id="L460" class="LineNr">460 </span> <span class="subxComment"># registers except esp may be clobbered at this point</span>
@ -529,7 +529,7 @@ if ('onhashchange' in window) {
<span id="L468" class="LineNr">468 </span> <span class="subxS2Comment"># . . push ed-&gt;value</span>
<span id="L469" class="LineNr">469 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+4)</span>
<span id="L470" class="LineNr">470 </span> <span class="subxS2Comment"># . . call</span>
<span id="L471" class="LineNr">471 </span> e8/call <a href='../051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L471" class="LineNr">471 </span> e8/call <a href='../102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L472" class="LineNr">472 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L473" class="LineNr">473 </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="L474" class="LineNr">474 </span> <span class="subxS1Comment"># . reclaim locals</span>
@ -545,39 +545,39 @@ if ('onhashchange' in window) {
<span id="L484" class="LineNr">484 </span> <span class="subxComment"># clear all streams</span>
<span id="L485" class="LineNr">485 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L486" class="LineNr">486 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L487" class="LineNr">487 </span> 68/push <a href='../057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L487" class="LineNr">487 </span> 68/push <a href='../108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L488" class="LineNr">488 </span> <span class="subxS2Comment"># . . call</span>
<span id="L489" class="LineNr">489 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L489" class="LineNr">489 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L490" class="LineNr">490 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L491" class="LineNr">491 </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="L492" class="LineNr">492 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L493" class="LineNr">493 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L494" class="LineNr">494 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L495" class="LineNr">495 </span> <span class="subxS2Comment"># . . call</span>
<span id="L496" class="LineNr">496 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L496" class="LineNr">496 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L497" class="LineNr">497 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L498" class="LineNr">498 </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="L499" class="LineNr">499 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L500" class="LineNr">500 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L501" class="LineNr">501 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L501" class="LineNr">501 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L502" class="LineNr">502 </span> <span class="subxS2Comment"># . . call</span>
<span id="L503" class="LineNr">503 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L503" class="LineNr">503 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L504" class="LineNr">504 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L505" class="LineNr">505 </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="L506" class="LineNr">506 </span> <span class="subxS1Comment"># . clear-stream(_test-error-stream)</span>
<span id="L507" class="LineNr">507 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L508" class="LineNr">508 </span> 68/push <a href='../064write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L508" class="LineNr">508 </span> 68/push <a href='../115write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L509" class="LineNr">509 </span> <span class="subxS2Comment"># . . call</span>
<span id="L510" class="LineNr">510 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L510" class="LineNr">510 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L511" class="LineNr">511 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L512" class="LineNr">512 </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="L513" class="LineNr">513 </span> <span class="subxComment"># initialize 'in'</span>
<span id="L514" class="LineNr">514 </span> <span class="subxS1Comment"># . write(_test-stream, &quot;3456 x&quot;)</span>
<span id="L515" class="LineNr">515 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L516" class="LineNr">516 </span> 68/push <span class="Constant">&quot;3456&quot;</span>/imm32
<span id="L517" class="LineNr">517 </span> 68/push <a href='../057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L517" class="LineNr">517 </span> 68/push <a href='../108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L518" class="LineNr">518 </span> <span class="subxS2Comment"># . . call</span>
<span id="L519" class="LineNr">519 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L519" class="LineNr">519 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L520" class="LineNr">520 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L521" class="LineNr">521 </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="L522" class="LineNr">522 </span> <span class="subxComment"># initialize exit-descriptor 'ed' for the call to 'get-num' below</span>
@ -589,13 +589,13 @@ if ('onhashchange' in window) {
<span id="L528" class="LineNr">528 </span> 68/push 0x10/imm32/nbytes-of-args-for-get-num
<span id="L529" class="LineNr">529 </span> 50/push-eax/ed
<span id="L530" class="LineNr">530 </span> <span class="subxS2Comment"># . . call</span>
<span id="L531" class="LineNr">531 </span> e8/call <a href='../059stop.subx.html#L44'>tailor-exit-descriptor</a>/disp32
<span id="L531" class="LineNr">531 </span> e8/call <a href='../110stop.subx.html#L44'>tailor-exit-descriptor</a>/disp32
<span id="L532" class="LineNr">532 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L533" class="LineNr">533 </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="L534" class="LineNr">534 </span> <span class="subxComment"># prime the pump</span>
<span id="L535" class="LineNr">535 </span> <span class="subxS1Comment"># . get-char(_test-buffered-file)</span>
<span id="L536" class="LineNr">536 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L537" class="LineNr">537 </span> 68/push <a href='../061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L537" class="LineNr">537 </span> 68/push <a href='../112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L538" class="LineNr">538 </span> <span class="subxS2Comment"># . . call</span>
<span id="L539" class="LineNr">539 </span> e8/call <a href='crenshaw2-1b.subx.html#L702'>get-char</a>/disp32
<span id="L540" class="LineNr">540 </span> <span class="subxS2Comment"># . . discard args</span>
@ -603,9 +603,9 @@ if ('onhashchange' in window) {
<span id="L542" class="LineNr">542 </span> <span class="subxComment"># get-num(in, out, err, ed)</span>
<span id="L543" class="LineNr">543 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L544" class="LineNr">544 </span> 50/push-eax/ed
<span id="L545" class="LineNr">545 </span> 68/push <a href='../064write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L546" class="LineNr">546 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L547" class="LineNr">547 </span> 68/push <a href='../061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L545" class="LineNr">545 </span> 68/push <a href='../115write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L546" class="LineNr">546 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L547" class="LineNr">547 </span> 68/push <a href='../112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L548" class="LineNr">548 </span> <span class="subxS2Comment"># . . call</span>
<span id="L549" class="LineNr">549 </span> e8/call <a href='crenshaw2-1b.subx.html#L187'>get-num</a>/disp32
<span id="L550" class="LineNr">550 </span> <span class="subxComment"># registers except esp may be clobbered at this point</span>
@ -615,10 +615,10 @@ if ('onhashchange' in window) {
<span id="L554" class="LineNr">554 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L555" class="LineNr">555 </span> 68/push <span class="Constant">&quot;F - test-get-num-reads-multiple-digits&quot;</span>/imm32
<span id="L556" class="LineNr">556 </span> 68/push 0x36353433/imm32
<span id="L557" class="LineNr">557 </span> b8/copy-to-eax <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L557" class="LineNr">557 </span> b8/copy-to-eax <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L558" class="LineNr">558 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+12)</span>
<span id="L559" class="LineNr">559 </span> <span class="subxS2Comment"># . . call</span>
<span id="L560" class="LineNr">560 </span> e8/call <a href='../051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L560" class="LineNr">560 </span> e8/call <a href='../102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L561" class="LineNr">561 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L562" class="LineNr">562 </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="L563" class="LineNr">563 </span> <span class="subxS1Comment"># . reclaim locals</span>
@ -634,39 +634,39 @@ if ('onhashchange' in window) {
<span id="L573" class="LineNr">573 </span> <span class="subxComment"># clear all streams</span>
<span id="L574" class="LineNr">574 </span> <span class="subxS1Comment"># . clear-stream(_test-stream)</span>
<span id="L575" class="LineNr">575 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L576" class="LineNr">576 </span> 68/push <a href='../057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L576" class="LineNr">576 </span> 68/push <a href='../108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L577" class="LineNr">577 </span> <span class="subxS2Comment"># . . call</span>
<span id="L578" class="LineNr">578 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L578" class="LineNr">578 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L579" class="LineNr">579 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L580" class="LineNr">580 </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="L581" class="LineNr">581 </span> <span class="subxS1Comment"># . clear-stream($_test-buffered-file-&gt;buffer)</span>
<span id="L582" class="LineNr">582 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L583" class="LineNr">583 </span> 68/push $_test-buffered-file-&gt;buffer/imm32
<span id="L584" class="LineNr">584 </span> <span class="subxS2Comment"># . . call</span>
<span id="L585" class="LineNr">585 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L585" class="LineNr">585 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L586" class="LineNr">586 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L587" class="LineNr">587 </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="L588" class="LineNr">588 </span> <span class="subxS1Comment"># . clear-stream(_test-output-stream)</span>
<span id="L589" class="LineNr">589 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L590" class="LineNr">590 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L590" class="LineNr">590 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L591" class="LineNr">591 </span> <span class="subxS2Comment"># . . call</span>
<span id="L592" class="LineNr">592 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L592" class="LineNr">592 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L593" class="LineNr">593 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L594" class="LineNr">594 </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="L595" class="LineNr">595 </span> <span class="subxS1Comment"># . clear-stream(_test-error-stream)</span>
<span id="L596" class="LineNr">596 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L597" class="LineNr">597 </span> 68/push <a href='../064write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L597" class="LineNr">597 </span> 68/push <a href='../115write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L598" class="LineNr">598 </span> <span class="subxS2Comment"># . . call</span>
<span id="L599" class="LineNr">599 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L599" class="LineNr">599 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L600" class="LineNr">600 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L601" class="LineNr">601 </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="L602" class="LineNr">602 </span> <span class="subxComment"># initialize 'in'</span>
<span id="L603" class="LineNr">603 </span> <span class="subxS1Comment"># . write(_test-stream, &quot;3456 x&quot;)</span>
<span id="L604" class="LineNr">604 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L605" class="LineNr">605 </span> 68/push <span class="Constant">&quot;3456 x&quot;</span>/imm32
<span id="L606" class="LineNr">606 </span> 68/push <a href='../057write.subx.html#L148'>_test-stream</a>/imm32
<span id="L606" class="LineNr">606 </span> 68/push <a href='../108write.subx.html#L148'>_test-stream</a>/imm32
<span id="L607" class="LineNr">607 </span> <span class="subxS2Comment"># . . call</span>
<span id="L608" class="LineNr">608 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L608" class="LineNr">608 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L609" class="LineNr">609 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L610" class="LineNr">610 </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="L611" class="LineNr">611 </span> <span class="subxComment"># initialize exit-descriptor 'ed' for the call to 'get-num' below</span>
@ -678,13 +678,13 @@ if ('onhashchange' in window) {
<span id="L617" class="LineNr">617 </span> 68/push 0x10/imm32/nbytes-of-args-for-get-num
<span id="L618" class="LineNr">618 </span> 50/push-eax/ed
<span id="L619" class="LineNr">619 </span> <span class="subxS2Comment"># . . call</span>
<span id="L620" class="LineNr">620 </span> e8/call <a href='../059stop.subx.html#L44'>tailor-exit-descriptor</a>/disp32
<span id="L620" class="LineNr">620 </span> e8/call <a href='../110stop.subx.html#L44'>tailor-exit-descriptor</a>/disp32
<span id="L621" class="LineNr">621 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L622" class="LineNr">622 </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="L623" class="LineNr">623 </span> <span class="subxComment"># prime the pump</span>
<span id="L624" class="LineNr">624 </span> <span class="subxS1Comment"># . get-char(_test-buffered-file)</span>
<span id="L625" class="LineNr">625 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L626" class="LineNr">626 </span> 68/push <a href='../061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L626" class="LineNr">626 </span> 68/push <a href='../112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L627" class="LineNr">627 </span> <span class="subxS2Comment"># . . call</span>
<span id="L628" class="LineNr">628 </span> e8/call <a href='crenshaw2-1b.subx.html#L702'>get-char</a>/disp32
<span id="L629" class="LineNr">629 </span> <span class="subxS2Comment"># . . discard args</span>
@ -692,9 +692,9 @@ if ('onhashchange' in window) {
<span id="L631" class="LineNr">631 </span> <span class="subxComment"># get-num(in, out, err, ed)</span>
<span id="L632" class="LineNr">632 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L633" class="LineNr">633 </span> 50/push-eax/ed
<span id="L634" class="LineNr">634 </span> 68/push <a href='../064write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L635" class="LineNr">635 </span> 68/push <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L636" class="LineNr">636 </span> 68/push <a href='../061read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L634" class="LineNr">634 </span> 68/push <a href='../115write-byte.subx.html#L372'>_test-error-stream</a>/imm32
<span id="L635" class="LineNr">635 </span> 68/push <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L636" class="LineNr">636 </span> 68/push <a href='../112read-byte.subx.html#L274'>_test-buffered-file</a>/imm32
<span id="L637" class="LineNr">637 </span> <span class="subxS2Comment"># . . call</span>
<span id="L638" class="LineNr">638 </span> e8/call <a href='crenshaw2-1b.subx.html#L187'>get-num</a>/disp32
<span id="L639" class="LineNr">639 </span> <span class="subxComment"># registers except esp may be clobbered at this point</span>
@ -704,10 +704,10 @@ if ('onhashchange' in window) {
<span id="L643" class="LineNr">643 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L644" class="LineNr">644 </span> 68/push <span class="Constant">&quot;F - test-get-num-reads-multiple-digits-followed-by-nondigit&quot;</span>/imm32
<span id="L645" class="LineNr">645 </span> 68/push 0x36353433/imm32
<span id="L646" class="LineNr">646 </span> b8/copy-to-eax <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L646" class="LineNr">646 </span> b8/copy-to-eax <a href='../115write-byte.subx.html#L285'>_test-output-stream</a>/imm32
<span id="L647" class="LineNr">647 </span> ff 6/subop/push 1/mod/*+disp8 0/rm32/eax <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 *(eax+12)</span>
<span id="L648" class="LineNr">648 </span> <span class="subxS2Comment"># . . call</span>
<span id="L649" class="LineNr">649 </span> e8/call <a href='../051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L649" class="LineNr">649 </span> e8/call <a href='../102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L650" class="LineNr">650 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L651" class="LineNr">651 </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="L652" class="LineNr">652 </span> <span class="subxS1Comment"># . reclaim locals</span>
@ -727,7 +727,7 @@ if ('onhashchange' in window) {
<span id="L666" class="LineNr">666 </span> 68/push <span class="Constant">&quot;Error: &quot;</span>/imm32
<span id="L667" class="LineNr">667 </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="L668" class="LineNr">668 </span> <span class="subxS2Comment"># . . call</span>
<span id="L669" class="LineNr">669 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L669" class="LineNr">669 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L670" class="LineNr">670 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L671" class="LineNr">671 </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="L672" class="LineNr">672 </span> <span class="subxComment"># write(f, s)</span>
@ -735,7 +735,7 @@ if ('onhashchange' in window) {
<span id="L674" class="LineNr">674 </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> 0x10/disp8 <span class="Normal"> . </span> <span class="subxComment"># push *(ebp+16)</span>
<span id="L675" class="LineNr">675 </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="L676" class="LineNr">676 </span> <span class="subxS2Comment"># . . call</span>
<span id="L677" class="LineNr">677 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L677" class="LineNr">677 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L678" class="LineNr">678 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L679" class="LineNr">679 </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="L680" class="LineNr">680 </span> <span class="subxComment"># write(f, &quot; expected\n&quot;)</span>
@ -743,7 +743,7 @@ if ('onhashchange' in window) {
<span id="L682" class="LineNr">682 </span> 68/push <span class="Constant">&quot; expected\n&quot;</span>/imm32
<span id="L683" class="LineNr">683 </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="L684" class="LineNr">684 </span> <span class="subxS2Comment"># . . call</span>
<span id="L685" class="LineNr">685 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L685" class="LineNr">685 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L686" class="LineNr">686 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L687" class="LineNr">687 </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="L688" class="LineNr">688 </span> <span class="subxComment"># stop(ed, 1)</span>
@ -751,7 +751,7 @@ if ('onhashchange' in window) {
<span id="L690" class="LineNr">690 </span> 68/push 1/imm32
<span id="L691" class="LineNr">691 </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="L692" class="LineNr">692 </span> <span class="subxS2Comment"># . . call</span>
<span id="L693" class="LineNr">693 </span> e8/call <a href='../059stop.subx.html#L92'>stop</a>/disp32
<span id="L693" class="LineNr">693 </span> e8/call <a href='../110stop.subx.html#L92'>stop</a>/disp32
<span id="L694" class="LineNr">694 </span> <span class="subxComment"># should never get past this point</span>
<span id="L695" class="LineNr">695 </span><span class="Constant">$expected:dead-end</span>:
<span id="L696" class="LineNr">696 </span> <span class="subxS1Comment"># . epilogue</span>
@ -770,7 +770,7 @@ if ('onhashchange' in window) {
<span id="L709" class="LineNr">709 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L710" class="LineNr">710 </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="L711" class="LineNr">711 </span> <span class="subxS2Comment"># . . call</span>
<span id="L712" class="LineNr">712 </span> e8/call <a href='../061read-byte.subx.html#L38'>read-byte-buffered</a>/disp32
<span id="L712" class="LineNr">712 </span> e8/call <a href='../112read-byte.subx.html#L38'>read-byte-buffered</a>/disp32
<span id="L713" class="LineNr">713 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L714" class="LineNr">714 </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="L715" class="LineNr">715 </span> <span class="subxComment"># save eax to Look</span>

File diff suppressed because it is too large Load Diff

2
html/apps/ex2.mu.html generated
View File

@ -56,7 +56,7 @@ if ('onhashchange' in window) {
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/apps/ex2.mu'>https://github.com/akkartik/mu/blob/master/apps/ex2.mu</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="Comment"># Add two numbers, and return the result in the exit code.</span>
<span id="L1" class="LineNr"> 1 </span><span class="Comment"># Add 3 and 4, and return the result in the exit code.</span>
<span id="L2" class="LineNr"> 2 </span><span class="Comment">#</span>
<span id="L3" class="LineNr"> 3 </span><span class="Comment"># To run:</span>
<span id="L4" class="LineNr"> 4 </span><span class="Comment"># $ ./translate_mu apps/ex2.mu</span>

View File

@ -53,7 +53,7 @@ if ('onhashchange' in window) {
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/apps/ex2.subx'>https://github.com/akkartik/mu/blob/master/apps/ex2.subx</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Add 1 and 1, and return the result in the exit code.</span>
<span id="L1" class="LineNr"> 1 </span><span class="subxComment"># Add 3 and 4, and return the result in the exit code.</span>
<span id="L2" class="LineNr"> 2 </span><span class="subxComment">#</span>
<span id="L3" class="LineNr"> 3 </span><span class="subxComment"># To run:</span>
<span id="L4" class="LineNr"> 4 </span><span class="subxComment"># $ ./bootstrap translate init.linux apps/ex2.subx -o apps/ex2</span>
@ -65,10 +65,10 @@ if ('onhashchange' in window) {
<span id="L10" class="LineNr">10 </span>== code
<span id="L11" class="LineNr">11 </span>
<span id="L12" class="LineNr">12 </span><span class="SpecialChar">Entry</span>:
<span id="L13" class="LineNr">13 </span><span class="subxComment"># ebx = 1</span>
<span id="L14" class="LineNr">14 </span>bb/copy-to-ebx 1/imm32
<span id="L15" class="LineNr">15 </span><span class="subxComment"># increment ebx</span>
<span id="L16" class="LineNr">16 </span>43/increment-ebx
<span id="L13" class="LineNr">13 </span><span class="subxComment"># ebx = 3</span>
<span id="L14" class="LineNr">14 </span>bb/copy-to-ebx 3/imm32
<span id="L15" class="LineNr">15 </span><span class="subxComment"># add 4 to ebx</span>
<span id="L16" class="LineNr">16 </span>81 0/subop/add 3/mod/direct 3/rm32/ebx 4/imm32
<span id="L17" class="LineNr">17 </span><span class="subxComment"># exit(ebx)</span>
<span id="L18" class="LineNr">18 </span>e8/call syscall_exit/disp32
<span id="L19" class="LineNr">19 </span>

View File

@ -87,7 +87,7 @@ if ('onhashchange' in window) {
<span id="L28" class="LineNr">28 </span>
<span id="L29" class="LineNr">29 </span><span class="PreProc">fn</span> <span class="muTest"><a href='factorial.mu.html#L29'>test-factorial</a></span> <span class="Delimiter">{</span>
<span id="L30" class="LineNr">30 </span> <span class="PreProc">var</span> result/<span class="Constant">eax</span>: int <span class="SpecialChar">&lt;-</span> <a href='factorial.mu.html#L14'>factorial</a> <span class="Constant">5</span>
<span id="L31" class="LineNr">31 </span> <a href='../051test.subx.html#L23'>check-ints-equal</a> result <span class="Constant">0x78</span> <span class="Constant">&quot;F - test-factorial&quot;</span>
<span id="L31" class="LineNr">31 </span> <a href='../102test.subx.html#L23'>check-ints-equal</a> result <span class="Constant">0x78</span> <span class="Constant">&quot;F - test-factorial&quot;</span>
<span id="L32" class="LineNr">32 </span><span class="Delimiter">}</span>
<span id="L33" class="LineNr">33 </span>
<span id="L34" class="LineNr">34 </span><span class="PreProc">fn</span> <span class="muFunction">main</span> args-on-stack: (addr array (addr array byte))<span class="PreProc"> -&gt; </span>exit-status/<span class="Constant">ebx</span>: int <span class="Delimiter">{</span>
@ -104,7 +104,7 @@ if ('onhashchange' in window) {
<span id="L45" class="LineNr">45 </span> <span class="Delimiter">}</span>
<span id="L46" class="LineNr">46 </span> <span class="Comment"># if (args[1] == &quot;test&quot;) run-tests()</span>
<span id="L47" class="LineNr">47 </span> <span class="PreProc">var</span> tmp2/<span class="Constant">ecx</span>: (addr addr array byte) <span class="SpecialChar">&lt;-</span> index args, <span class="Constant">1</span>
<span id="L48" class="LineNr">48 </span> <span class="PreProc">var</span> tmp3/<span class="Constant">eax</span>: boolean <span class="SpecialChar">&lt;-</span> <a href='../054string-equal.subx.html#L15'>string-equal?</a> *tmp2, <span class="Constant">&quot;test&quot;</span>
<span id="L48" class="LineNr">48 </span> <span class="PreProc">var</span> tmp3/<span class="Constant">eax</span>: boolean <span class="SpecialChar">&lt;-</span> <a href='../105string-equal.subx.html#L15'>string-equal?</a> *tmp2, <span class="Constant">&quot;test&quot;</span>
<span id="L49" class="LineNr">49 </span> compare tmp3, <span class="Constant">0</span>
<span id="L50" class="LineNr">50 </span> <span class="Delimiter">{</span>
<span id="L51" class="LineNr">51 </span> <span class="PreProc">break-if-=</span>

View File

@ -86,10 +86,10 @@ if ('onhashchange' in window) {
<span id="L25" class="LineNr"> 25 </span> <span class="subxComment"># initialize heap</span>
<span id="L26" class="LineNr"> 26 </span> <span class="subxS1Comment"># . Heap = new-segment(Heap-size)</span>
<span id="L27" class="LineNr"> 27 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L28" class="LineNr"> 28 </span> 68/push <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L29" class="LineNr"> 29 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='../069allocate.subx.html#L34'>Heap-size</a></span>/disp32 <span class="subxComment"># push *Heap-size</span>
<span id="L28" class="LineNr"> 28 </span> 68/push <span class="SpecialChar"><a href='../120allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L29" class="LineNr"> 29 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='../120allocate.subx.html#L34'>Heap-size</a></span>/disp32 <span class="subxComment"># push *Heap-size</span>
<span id="L30" class="LineNr"> 30 </span> <span class="subxS2Comment"># . . call</span>
<span id="L31" class="LineNr"> 31 </span> e8/call <a href='../053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L31" class="LineNr"> 31 </span> e8/call <a href='../104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L32" class="LineNr"> 32 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L33" class="LineNr"> 33 </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="L34" class="LineNr"> 34 </span>
@ -103,7 +103,7 @@ if ('onhashchange' in window) {
<span id="L42" class="LineNr"> 42 </span> 68/push <span class="Constant">&quot;test&quot;</span>/imm32
<span id="L43" class="LineNr"> 43 </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="L44" class="LineNr"> 44 </span> <span class="subxS2Comment"># . . call</span>
<span id="L45" class="LineNr"> 45 </span> e8/call <a href='../052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L45" class="LineNr"> 45 </span> e8/call <a href='../103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L46" class="LineNr"> 46 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L47" class="LineNr"> 47 </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="L48" class="LineNr"> 48 </span> <span class="subxS1Comment"># . if (eax == false) goto run-main</span>
@ -112,7 +112,7 @@ if ('onhashchange' in window) {
<span id="L51" class="LineNr"> 51 </span> <span class="subxComment"># run-tests()</span>
<span id="L52" class="LineNr"> 52 </span> e8/call run-tests/disp32
<span id="L53" class="LineNr"> 53 </span> <span class="subxComment"># syscall(exit, *Num-test-failures)</span>
<span id="L54" class="LineNr"> 54 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='../051test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L54" class="LineNr"> 54 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='../102test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L55" class="LineNr"> 55 </span> eb/jump $main:end/disp8
<span id="L56" class="LineNr"> 56 </span><span class="Constant">$run-main</span>:
<span id="L57" class="LineNr"> 57 </span> <span class="subxH1Comment"># - otherwise print factorial(5)</span>
@ -134,7 +134,7 @@ if ('onhashchange' in window) {
<span id="L73" class="LineNr"> 73 </span> 50/push-eax
<span id="L74" class="LineNr"> 74 </span> 51/push-ecx
<span id="L75" class="LineNr"> 75 </span> <span class="subxS2Comment"># . . call</span>
<span id="L76" class="LineNr"> 76 </span> e8/call <a href='../075write-int-decimal.subx.html#L8'>write-int32-decimal</a>/disp32
<span id="L76" class="LineNr"> 76 </span> e8/call <a href='../126write-int-decimal.subx.html#L8'>write-int32-decimal</a>/disp32
<span id="L77" class="LineNr"> 77 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L78" class="LineNr"> 78 </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="L79" class="LineNr"> 79 </span> <span class="subxComment"># write-stream(stderr, buffer)</span>
@ -142,15 +142,15 @@ if ('onhashchange' in window) {
<span id="L81" class="LineNr"> 81 </span> 51/push-ecx
<span id="L82" class="LineNr"> 82 </span> 68/push 2/imm32/stderr
<span id="L83" class="LineNr"> 83 </span> <span class="subxS2Comment"># . . call</span>
<span id="L84" class="LineNr"> 84 </span> e8/call <a href='../062write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L84" class="LineNr"> 84 </span> e8/call <a href='../113write-stream.subx.html#L17'>write-stream</a>/disp32
<span id="L85" class="LineNr"> 85 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L86" class="LineNr"> 86 </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="L87" class="LineNr"> 87 </span> <span class="subxComment"># write(stderr, Newline)</span>
<span id="L88" class="LineNr"> 88 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L89" class="LineNr"> 89 </span> 68/push <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>/imm32
<span id="L89" class="LineNr"> 89 </span> 68/push <span class="SpecialChar"><a href='../102test.subx.html#L82'>Newline</a></span>/imm32
<span id="L90" class="LineNr"> 90 </span> 68/push 2/imm32/stderr
<span id="L91" class="LineNr"> 91 </span> <span class="subxS2Comment"># . . call</span>
<span id="L92" class="LineNr"> 92 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L92" class="LineNr"> 92 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L93" class="LineNr"> 93 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L94" class="LineNr"> 94 </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="L95" class="LineNr"> 95 </span> <span class="subxComment"># syscall(exit, eax)</span>
@ -201,7 +201,7 @@ if ('onhashchange' in window) {
<span id="L140" class="LineNr">140 </span> 68/push 0x78/imm32/expected-120
<span id="L141" class="LineNr">141 </span> 50/push-eax
<span id="L142" class="LineNr">142 </span> <span class="subxS2Comment"># . . call</span>
<span id="L143" class="LineNr">143 </span> e8/call <a href='../051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L143" class="LineNr">143 </span> e8/call <a href='../102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L144" class="LineNr">144 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L145" class="LineNr">145 </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="L146" class="LineNr">146 </span> <span class="subxComment"># end</span>

View File

@ -85,10 +85,10 @@ if ('onhashchange' in window) {
<span id="L25" class="LineNr"> 25 </span> <span class="subxComment"># initialize heap</span>
<span id="L26" class="LineNr"> 26 </span> <span class="subxS1Comment"># . Heap = new-segment(Heap-size)</span>
<span id="L27" class="LineNr"> 27 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L28" class="LineNr"> 28 </span> 68/push <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L29" class="LineNr"> 29 </span> ff 6/subop/push *<span class="SpecialChar"><a href='../069allocate.subx.html#L34'>Heap-size</a></span>
<span id="L28" class="LineNr"> 28 </span> 68/push <span class="SpecialChar"><a href='../120allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L29" class="LineNr"> 29 </span> ff 6/subop/push *<span class="SpecialChar"><a href='../120allocate.subx.html#L34'>Heap-size</a></span>
<span id="L30" class="LineNr"> 30 </span> <span class="subxS2Comment"># . . call</span>
<span id="L31" class="LineNr"> 31 </span> e8/call <a href='../053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L31" class="LineNr"> 31 </span> e8/call <a href='../104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L32" class="LineNr"> 32 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L33" class="LineNr"> 33 </span> 81 0/subop/add %esp 8/imm32
<span id="L34" class="LineNr"> 34 </span>
@ -102,7 +102,7 @@ if ('onhashchange' in window) {
<span id="L42" class="LineNr"> 42 </span> 68/push <span class="Constant">&quot;test&quot;</span>/imm32
<span id="L43" class="LineNr"> 43 </span> ff 6/subop/push *(ebp+8)
<span id="L44" class="LineNr"> 44 </span> <span class="subxS2Comment"># . . call</span>
<span id="L45" class="LineNr"> 45 </span> e8/call <a href='../052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L45" class="LineNr"> 45 </span> e8/call <a href='../103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L46" class="LineNr"> 46 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L47" class="LineNr"> 47 </span> 81 0/subop/add %esp 8/imm32
<span id="L48" class="LineNr"> 48 </span> <span class="subxS1Comment"># . if (eax == false) goto run-main</span>
@ -111,7 +111,7 @@ if ('onhashchange' in window) {
<span id="L51" class="LineNr"> 51 </span> <span class="subxComment"># run-tests()</span>
<span id="L52" class="LineNr"> 52 </span> e8/call run-tests/disp32
<span id="L53" class="LineNr"> 53 </span> <span class="subxComment"># syscall(exit, *Num-test-failures)</span>
<span id="L54" class="LineNr"> 54 </span> 8b/-&gt; *<span class="SpecialChar"><a href='../051test.subx.html#L89'>Num-test-failures</a></span> 3/r32/ebx
<span id="L54" class="LineNr"> 54 </span> 8b/-&gt; *<span class="SpecialChar"><a href='../102test.subx.html#L89'>Num-test-failures</a></span> 3/r32/ebx
<span id="L55" class="LineNr"> 55 </span> eb/jump $main:end/disp8
<span id="L56" class="LineNr"> 56 </span><span class="Constant">$run-main</span>:
<span id="L57" class="LineNr"> 57 </span> <span class="subxH1Comment"># - otherwise return factorial(5)</span>
@ -170,7 +170,7 @@ if ('onhashchange' in window) {
<span id="L110" class="LineNr">110 </span> 68/push 0x78/imm32/expected-120
<span id="L111" class="LineNr">111 </span> 50/push-eax
<span id="L112" class="LineNr">112 </span> <span class="subxS2Comment"># . . call</span>
<span id="L113" class="LineNr">113 </span> e8/call <a href='../051test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L113" class="LineNr">113 </span> e8/call <a href='../102test.subx.html#L23'>check-ints-equal</a>/disp32
<span id="L114" class="LineNr">114 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L115" class="LineNr">115 </span> 81 0/subop/add %esp 0xc/imm32
<span id="L116" class="LineNr">116 </span> <span class="subxComment"># end</span>

View File

@ -83,21 +83,21 @@ if ('onhashchange' in window) {
<span id="L24" class="LineNr">24 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L25" class="LineNr">25 </span>
<span id="L26" class="LineNr">26 </span> <span class="subxComment"># initialize heap</span>
<span id="L27" class="LineNr">27 </span> (<a href='../053new-segment.subx.html#L40'>new-segment</a> *<span class="SpecialChar"><a href='../069allocate.subx.html#L34'>Heap-size</a></span> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span>)
<span id="L27" class="LineNr">27 </span> (<a href='../104new-segment.subx.html#L40'>new-segment</a> *<span class="SpecialChar"><a href='../120allocate.subx.html#L34'>Heap-size</a></span> <span class="SpecialChar"><a href='../120allocate.subx.html#L27'>Heap</a></span>)
<span id="L28" class="LineNr">28 </span>
<span id="L29" class="LineNr">29 </span> <span class="subxH1Comment"># - if argc &gt; 1 and argv[1] == &quot;test&quot;, then return run_tests()</span>
<span id="L30" class="LineNr">30 </span> <span class="subxComment"># if (argc &lt;= 1) goto run-main</span>
<span id="L31" class="LineNr">31 </span> 81 7/subop/compare *ebp 1/imm32
<span id="L32" class="LineNr">32 </span> 7e/jump-if-&lt;= $run-main/disp8
<span id="L33" class="LineNr">33 </span> <span class="subxComment"># if (!kernel-string-equal?(argv[1], &quot;test&quot;)) goto run-main</span>
<span id="L34" class="LineNr">34 </span> (<a href='../052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a> *(ebp+8) <span class="Constant">&quot;test&quot;</span>) <span class="subxComment"># =&gt; eax</span>
<span id="L34" class="LineNr">34 </span> (<a href='../103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a> *(ebp+8) <span class="Constant">&quot;test&quot;</span>) <span class="subxComment"># =&gt; eax</span>
<span id="L35" class="LineNr">35 </span> <span class="subxS1Comment"># . if (eax == false) goto run-main</span>
<span id="L36" class="LineNr">36 </span> 3d/compare-eax-and 0/imm32/false
<span id="L37" class="LineNr">37 </span> 74/jump-if-= $run-main/disp8
<span id="L38" class="LineNr">38 </span> <span class="subxComment">#</span>
<span id="L39" class="LineNr">39 </span> (run-tests)
<span id="L40" class="LineNr">40 </span> <span class="subxComment"># syscall(exit, *Num-test-failures)</span>
<span id="L41" class="LineNr">41 </span> 8b/-&gt; *<span class="SpecialChar"><a href='../051test.subx.html#L89'>Num-test-failures</a></span> 3/r32/ebx
<span id="L41" class="LineNr">41 </span> 8b/-&gt; *<span class="SpecialChar"><a href='../102test.subx.html#L89'>Num-test-failures</a></span> 3/r32/ebx
<span id="L42" class="LineNr">42 </span> eb/jump $main:end/disp8
<span id="L43" class="LineNr">43 </span><span class="Constant">$run-main</span>:
<span id="L44" class="LineNr">44 </span> <span class="subxH1Comment"># - otherwise</span>
@ -135,7 +135,7 @@ if ('onhashchange' in window) {
<span id="L76" class="LineNr">76 </span>
<span id="L77" class="LineNr">77 </span><span class="subxTest">test-factorial</span>:
<span id="L78" class="LineNr">78 </span> (<a href='factorial3.subx.html#L51'>factorial</a> 5)
<span id="L79" class="LineNr">79 </span> (<a href='../051test.subx.html#L23'>check-ints-equal</a> %eax 0x78 <span class="Constant">&quot;F - test-factorial&quot;</span>)
<span id="L79" class="LineNr">79 </span> (<a href='../102test.subx.html#L23'>check-ints-equal</a> %eax 0x78 <span class="Constant">&quot;F - test-factorial&quot;</span>)
<span id="L80" class="LineNr">80 </span> c3/return
</pre>
</body>

View File

@ -84,7 +84,7 @@ if ('onhashchange' in window) {
<span id="L25" class="LineNr">25 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L26" class="LineNr">26 </span>
<span id="L27" class="LineNr">27 </span> <span class="subxComment"># initialize heap</span>
<span id="L28" class="LineNr">28 </span> (<a href='../053new-segment.subx.html#L40'>new-segment</a> *<span class="SpecialChar"><a href='../069allocate.subx.html#L34'>Heap-size</a></span> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span>)
<span id="L28" class="LineNr">28 </span> (<a href='../104new-segment.subx.html#L40'>new-segment</a> *<span class="SpecialChar"><a href='../120allocate.subx.html#L34'>Heap-size</a></span> <span class="SpecialChar"><a href='../120allocate.subx.html#L27'>Heap</a></span>)
<span id="L29" class="LineNr">29 </span>
<span id="L30" class="LineNr">30 </span> <span class="subxH1Comment"># - if argc &gt; 1, then return run_tests()</span>
<span id="L31" class="LineNr">31 </span> {
@ -92,13 +92,13 @@ if ('onhashchange' in window) {
<span id="L33" class="LineNr">33 </span> 81 7/subop/compare *ebp 1/imm32
<span id="L34" class="LineNr">34 </span> 7e/jump-if-&lt;= <span class="Constant">break</span>/disp8
<span id="L35" class="LineNr">35 </span> <span class="subxComment"># if (!kernel-string-equal?(argv[1], &quot;test&quot;)) break</span>
<span id="L36" class="LineNr">36 </span> (<a href='../052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a> *(ebp+8) <span class="Constant">&quot;test&quot;</span>) <span class="subxComment"># =&gt; eax</span>
<span id="L36" class="LineNr">36 </span> (<a href='../103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a> *(ebp+8) <span class="Constant">&quot;test&quot;</span>) <span class="subxComment"># =&gt; eax</span>
<span id="L37" class="LineNr">37 </span> 3d/compare-eax-and 0/imm32/false
<span id="L38" class="LineNr">38 </span> 74/jump-if-= <span class="Constant">break</span>/disp8
<span id="L39" class="LineNr">39 </span> <span class="subxComment">#</span>
<span id="L40" class="LineNr">40 </span> (run-tests)
<span id="L41" class="LineNr">41 </span> <span class="subxComment"># eax = *Num-test-failures</span>
<span id="L42" class="LineNr">42 </span> 8b/-&gt; *<span class="SpecialChar"><a href='../051test.subx.html#L89'>Num-test-failures</a></span> 3/r32/ebx
<span id="L42" class="LineNr">42 </span> 8b/-&gt; *<span class="SpecialChar"><a href='../102test.subx.html#L89'>Num-test-failures</a></span> 3/r32/ebx
<span id="L43" class="LineNr">43 </span> }
<span id="L44" class="LineNr">44 </span> <span class="subxComment"># if (argc &lt;= 1) factorial(5)</span>
<span id="L45" class="LineNr">45 </span> {
@ -143,7 +143,7 @@ if ('onhashchange' in window) {
<span id="L84" class="LineNr">84 </span>
<span id="L85" class="LineNr">85 </span><span class="subxTest">test-factorial</span>:
<span id="L86" class="LineNr">86 </span> (<a href='factorial4.subx.html#L57'>factorial</a> 5)
<span id="L87" class="LineNr">87 </span> (<a href='../051test.subx.html#L23'>check-ints-equal</a> %eax 0x78 <span class="Constant">&quot;F - test-factorial&quot;</span>)
<span id="L87" class="LineNr">87 </span> (<a href='../102test.subx.html#L23'>check-ints-equal</a> %eax 0x78 <span class="Constant">&quot;F - test-factorial&quot;</span>)
<span id="L88" class="LineNr">88 </span> c3/return
</pre>
</body>

342
html/apps/hex.subx.html generated

File diff suppressed because it is too large Load Diff

38129
html/apps/mu.subx.html generated

File diff suppressed because it is too large Load Diff

View File

@ -72,22 +72,22 @@ if ('onhashchange' in window) {
<span id="L14" class="LineNr"> 14 </span> <span class="subxS1Comment"># . prologue</span>
<span id="L15" class="LineNr"> 15 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L16" class="LineNr"> 16 </span> <span class="subxComment"># initialize heap</span>
<span id="L17" class="LineNr"> 17 </span> (<a href='../053new-segment.subx.html#L40'>new-segment</a> *<span class="SpecialChar"><a href='../069allocate.subx.html#L34'>Heap-size</a></span> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span>)
<span id="L17" class="LineNr"> 17 </span> (<a href='../104new-segment.subx.html#L40'>new-segment</a> *<span class="SpecialChar"><a href='../120allocate.subx.html#L34'>Heap-size</a></span> <span class="SpecialChar"><a href='../120allocate.subx.html#L27'>Heap</a></span>)
<span id="L18" class="LineNr"> 18 </span> {
<span id="L19" class="LineNr"> 19 </span> <span class="subxComment"># if (argc &lt;= 1) break</span>
<span id="L20" class="LineNr"> 20 </span> 81 7/subop/compare *ebp 1/imm32
<span id="L21" class="LineNr"> 21 </span> 7e/jump-if-&lt;= <span class="Constant">break</span>/disp8
<span id="L22" class="LineNr"> 22 </span> <span class="subxComment"># if (argv[1] != &quot;test&quot;)) break</span>
<span id="L23" class="LineNr"> 23 </span> (<a href='../052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a> *(ebp+8) <span class="Constant">&quot;test&quot;</span>) <span class="subxComment"># =&gt; eax</span>
<span id="L23" class="LineNr"> 23 </span> (<a href='../103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a> *(ebp+8) <span class="Constant">&quot;test&quot;</span>) <span class="subxComment"># =&gt; eax</span>
<span id="L24" class="LineNr"> 24 </span> 3d/compare-eax-and 0/imm32/false
<span id="L25" class="LineNr"> 25 </span> 74/jump-if-= <span class="Constant">break</span>/disp8
<span id="L26" class="LineNr"> 26 </span> <span class="subxComment">#</span>
<span id="L27" class="LineNr"> 27 </span> (run-tests)
<span id="L28" class="LineNr"> 28 </span> <span class="subxComment"># syscall(exit, *Num-test-failures)</span>
<span id="L29" class="LineNr"> 29 </span> 8b/-&gt; *<span class="SpecialChar"><a href='../051test.subx.html#L89'>Num-test-failures</a></span> 3/r32/ebx
<span id="L29" class="LineNr"> 29 </span> 8b/-&gt; *<span class="SpecialChar"><a href='../102test.subx.html#L89'>Num-test-failures</a></span> 3/r32/ebx
<span id="L30" class="LineNr"> 30 </span> eb/jump $main:end/disp8
<span id="L31" class="LineNr"> 31 </span> }
<span id="L32" class="LineNr"> 32 </span> (<a href='mulisp.subx.html#L76'>repl</a> <span class="SpecialChar"><a href='../061read-byte.subx.html#L14'>Stdin</a></span> <span class="SpecialChar"><a href='../064write-byte.subx.html#L10'>Stdout</a></span>)
<span id="L32" class="LineNr"> 32 </span> (<a href='mulisp.subx.html#L76'>repl</a> <span class="SpecialChar"><a href='../112read-byte.subx.html#L14'>Stdin</a></span> <span class="SpecialChar"><a href='../115write-byte.subx.html#L10'>Stdout</a></span>)
<span id="L33" class="LineNr"> 33 </span> <span class="subxComment"># syscall(exit, 0)</span>
<span id="L34" class="LineNr"> 34 </span> bb/copy-to-ebx 0/imm32
<span id="L35" class="LineNr"> 35 </span><span class="Constant">$main:end</span>:
@ -138,13 +138,13 @@ if ('onhashchange' in window) {
<span id="L80" class="LineNr"> 80 </span> <span class="subxS1Comment"># . save registers</span>
<span id="L81" class="LineNr"> 81 </span> 50/push-eax
<span id="L82" class="LineNr"> 82 </span> {
<span id="L83" class="LineNr"> 83 </span> (<a href='mulisp.subx.html#L106'>lisp-read</a> <span class="SpecialChar"><a href='../061read-byte.subx.html#L14'>Stdin</a></span>) <span class="subxComment"># =&gt; eax: (handle cell)</span>
<span id="L83" class="LineNr"> 83 </span> (<a href='mulisp.subx.html#L106'>lisp-read</a> <span class="SpecialChar"><a href='../112read-byte.subx.html#L14'>Stdin</a></span>) <span class="subxComment"># =&gt; eax: (handle cell)</span>
<span id="L84" class="LineNr"> 84 </span> <span class="subxComment"># if (eax == 0) break</span>
<span id="L85" class="LineNr"> 85 </span> 3d/compare-eax-and 0/imm32
<span id="L86" class="LineNr"> 86 </span> 74/jump-if-= <span class="Constant">break</span>/disp8
<span id="L87" class="LineNr"> 87 </span> <span class="subxComment">#</span>
<span id="L88" class="LineNr"> 88 </span> (<a href='mulisp.subx.html#L200'>lisp-eval</a> %eax) <span class="subxComment"># =&gt; eax: (handle cell)</span>
<span id="L89" class="LineNr"> 89 </span> (<a href='mulisp.subx.html#L213'>lisp-print</a> <span class="SpecialChar"><a href='../064write-byte.subx.html#L10'>Stdout</a></span> %eax)
<span id="L89" class="LineNr"> 89 </span> (<a href='mulisp.subx.html#L213'>lisp-print</a> <span class="SpecialChar"><a href='../115write-byte.subx.html#L10'>Stdout</a></span> %eax)
<span id="L90" class="LineNr"> 90 </span> eb/jump <span class="Constant">loop</span>/disp8
<span id="L91" class="LineNr"> 91 </span> }
<span id="L92" class="LineNr"> 92 </span><span class="Constant">$repl:end</span>:
@ -175,8 +175,8 @@ if ('onhashchange' in window) {
<span id="L117" class="LineNr">117 </span> 89/&lt;- %ecx 4/r32/esp
<span id="L118" class="LineNr">118 </span> {
<span id="L119" class="LineNr">119 </span> <span class="subxComment"># read line into s</span>
<span id="L120" class="LineNr">120 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> %ecx)
<span id="L121" class="LineNr">121 </span> (<a href='../071read-line.subx.html#L9'>read-line-buffered</a> *(ebp+8) %ecx)
<span id="L120" class="LineNr">120 </span> (<a href='../106stream.subx.html#L17'>clear-stream</a> %ecx)
<span id="L121" class="LineNr">121 </span> (<a href='../122read-line.subx.html#L9'>read-line-buffered</a> *(ebp+8) %ecx)
<span id="L122" class="LineNr">122 </span> <span class="subxComment"># if (s-&gt;write == 0) return null</span>
<span id="L123" class="LineNr">123 </span> {
<span id="L124" class="LineNr">124 </span> 81 7/subop/compare *ecx 0/imm32
@ -274,9 +274,9 @@ if ('onhashchange' in window) {
<span id="L216" class="LineNr">216 </span> 89/&lt;- %ebp 4/r32/esp
<span id="L217" class="LineNr">217 </span> <span class="subxS1Comment"># . save registers</span>
<span id="L218" class="LineNr">218 </span> <span class="subxComment"># write(x)</span>
<span id="L219" class="LineNr">219 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../064write-byte.subx.html#L10'>Stdout</a></span> <span class="Constant">&quot;=&gt; &quot;</span>)
<span id="L220" class="LineNr">220 </span> (<a href='../074write-stream-data.subx.html#L11'>write-stream-data</a> <span class="SpecialChar"><a href='../064write-byte.subx.html#L10'>Stdout</a></span> *(ebp+0xc))
<span id="L221" class="LineNr">221 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../064write-byte.subx.html#L10'>Stdout</a></span>)
<span id="L219" class="LineNr">219 </span> (<a href='../116write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../115write-byte.subx.html#L10'>Stdout</a></span> <span class="Constant">&quot;=&gt; &quot;</span>)
<span id="L220" class="LineNr">220 </span> (<a href='../125write-stream-data.subx.html#L11'>write-stream-data</a> <span class="SpecialChar"><a href='../115write-byte.subx.html#L10'>Stdout</a></span> *(ebp+0xc))
<span id="L221" class="LineNr">221 </span> (<a href='../115write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../115write-byte.subx.html#L10'>Stdout</a></span>)
<span id="L222" class="LineNr">222 </span><span class="Constant">$lisp-print:end</span>:
<span id="L223" class="LineNr">223 </span> <span class="subxS1Comment"># . restore registers</span>
<span id="L224" class="LineNr">224 </span> <span class="subxS1Comment"># . epilogue</span>

1356
html/apps/pack.subx.html generated

File diff suppressed because it is too large Load Diff

View File

@ -72,7 +72,7 @@ if ('onhashchange' in window) {
<span id="L14" class="LineNr">14 </span> compare n, <span class="Constant">1</span>
<span id="L15" class="LineNr">15 </span> <span class="Delimiter">{</span>
<span id="L16" class="LineNr">16 </span> <span class="PreProc">break-if-&gt;</span>
<span id="L17" class="LineNr">17 </span> <a href='../103screen.subx.html#L122'>print-string-to-screen</a> <span class="Constant">&quot;usage: <a href='parse-int.mu.html#L28'>parse-int</a> &lt;integer&gt;\n&quot;</span>
<span id="L17" class="LineNr">17 </span> <a href='../304screen.subx.html#L123'>print-string-to-screen</a> <span class="Constant">&quot;usage: <a href='parse-int.mu.html#L28'>parse-int</a> &lt;integer&gt;\n&quot;</span>
<span id="L18" class="LineNr">18 </span> exit-status <span class="SpecialChar">&lt;-</span> copy <span class="Constant">1</span>
<span id="L19" class="LineNr">19 </span> <span class="PreProc">break</span> $main-body
<span id="L20" class="LineNr">20 </span> <span class="Delimiter">}</span>
@ -99,7 +99,7 @@ if ('onhashchange' in window) {
<span id="L41" class="LineNr">41 </span> <span class="PreProc">var</span> c/<span class="Constant">eax</span>: byte <span class="SpecialChar">&lt;-</span> copy <span class="Constant">0</span>
<span id="L42" class="LineNr">42 </span> c <span class="SpecialChar">&lt;-</span> copy-byte *tmp
<span id="L43" class="LineNr">43 </span> <span class="Comment">#</span>
<span id="L44" class="LineNr">44 </span> <span class="PreProc">var</span> digit/<span class="Constant">eax</span>: int <span class="SpecialChar">&lt;-</span> <a href='../075write-int-decimal.subx.html#L405'>to-decimal-digit</a> c
<span id="L44" class="LineNr">44 </span> <span class="PreProc">var</span> digit/<span class="Constant">eax</span>: int <span class="SpecialChar">&lt;-</span> <a href='../126write-int-decimal.subx.html#L405'>to-decimal-digit</a> c
<span id="L45" class="LineNr">45 </span> out <span class="SpecialChar">&lt;-</span> add digit
<span id="L46" class="LineNr">46 </span> i <span class="SpecialChar">&lt;-</span> increment
<span id="L47" class="LineNr">47 </span> <span class="PreProc">loop</span>

View File

@ -72,7 +72,7 @@ if ('onhashchange' in window) {
<span id="L14" class="LineNr">14 </span> compare n, <span class="Constant">1</span>
<span id="L15" class="LineNr">15 </span> <span class="Delimiter">{</span>
<span id="L16" class="LineNr">16 </span> <span class="PreProc">break-if-&gt;</span>
<span id="L17" class="LineNr">17 </span> <a href='../103screen.subx.html#L122'>print-string-to-screen</a> <span class="Constant">&quot;usage: cat &lt;filename&gt;\n&quot;</span>
<span id="L17" class="LineNr">17 </span> <a href='../304screen.subx.html#L123'>print-string-to-screen</a> <span class="Constant">&quot;usage: cat &lt;filename&gt;\n&quot;</span>
<span id="L18" class="LineNr">18 </span> <span class="PreProc">break</span> $main-body
<span id="L19" class="LineNr">19 </span> <span class="Delimiter">}</span>
<span id="L20" class="LineNr">20 </span> <span class="Delimiter">{</span>
@ -81,15 +81,15 @@ if ('onhashchange' in window) {
<span id="L23" class="LineNr">23 </span> <span class="PreProc">var</span> in: (handle buffered-file)
<span id="L24" class="LineNr">24 </span> <span class="Delimiter">{</span>
<span id="L25" class="LineNr">25 </span> <span class="PreProc">var</span> addr-in/<span class="Constant">eax</span>: (addr handle buffered-file) <span class="SpecialChar">&lt;-</span> address in
<span id="L26" class="LineNr">26 </span> <a href='../105files.subx.html#L3'>open</a> *filename, <span class="Constant">0</span>, addr-in
<span id="L26" class="LineNr">26 </span> <a href='../306files.subx.html#L3'>open</a> *filename, <span class="Constant">0</span>, addr-in
<span id="L27" class="LineNr">27 </span> <span class="Delimiter">}</span>
<span id="L28" class="LineNr">28 </span> <span class="PreProc">var</span> _in-addr/<span class="Constant">eax</span>: (addr buffered-file) <span class="SpecialChar">&lt;-</span> <a href='../069allocate.subx.html#L256'>lookup</a> in
<span id="L28" class="LineNr">28 </span> <span class="PreProc">var</span> _in-addr/<span class="Constant">eax</span>: (addr buffered-file) <span class="SpecialChar">&lt;-</span> <a href='../120allocate.subx.html#L256'>lookup</a> in
<span id="L29" class="LineNr">29 </span> <span class="PreProc">var</span> in-addr/<span class="Constant">ecx</span>: (addr buffered-file) <span class="SpecialChar">&lt;-</span> copy _in-addr
<span id="L30" class="LineNr">30 </span> <span class="Delimiter">{</span>
<span id="L31" class="LineNr">31 </span> <span class="PreProc">var</span> c/<span class="Constant">eax</span>: byte <span class="SpecialChar">&lt;-</span> <a href='../061read-byte.subx.html#L38'>read-byte-buffered</a> in-addr
<span id="L31" class="LineNr">31 </span> <span class="PreProc">var</span> c/<span class="Constant">eax</span>: byte <span class="SpecialChar">&lt;-</span> <a href='../112read-byte.subx.html#L38'>read-byte-buffered</a> in-addr
<span id="L32" class="LineNr">32 </span> compare c, <span class="Constant">0xffffffff</span> <span class="Comment"># EOF marker</span>
<span id="L33" class="LineNr">33 </span> <span class="PreProc">break-if-=</span>
<span id="L34" class="LineNr">34 </span> <a href='../103screen.subx.html#L135'>print-byte-to-screen</a> c
<span id="L34" class="LineNr">34 </span> <a href='../304screen.subx.html#L136'>print-byte-to-screen</a> c
<span id="L35" class="LineNr">35 </span> <span class="PreProc">loop</span>
<span id="L36" class="LineNr">36 </span> <span class="Delimiter">}</span>
<span id="L37" class="LineNr">37 </span> <span class="Delimiter">}</span>

View File

@ -87,16 +87,16 @@ if ('onhashchange' in window) {
<span id="L29" class="LineNr">29 </span> <span class="subxComment"># write-int32-hex-buffered(Stdout, *N)</span>
<span id="L30" class="LineNr">30 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L31" class="LineNr">31 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='random.subx.html#L53'>N</a></span>/disp32 <span class="subxComment"># push *N</span>
<span id="L32" class="LineNr">32 </span> 68/push <span class="SpecialChar"><a href='../064write-byte.subx.html#L10'>Stdout</a></span>/imm32
<span id="L32" class="LineNr">32 </span> 68/push <span class="SpecialChar"><a href='../115write-byte.subx.html#L10'>Stdout</a></span>/imm32
<span id="L33" class="LineNr">33 </span> <span class="subxS2Comment"># . . call</span>
<span id="L34" class="LineNr">34 </span> e8/call <a href='../066write-int-hex.subx.html#L266'>write-int32-hex-buffered</a>/disp32
<span id="L34" class="LineNr">34 </span> e8/call <a href='../117write-int-hex.subx.html#L266'>write-int32-hex-buffered</a>/disp32
<span id="L35" class="LineNr">35 </span>
<span id="L36" class="LineNr">36 </span> <span class="subxComment"># write-buffered(Stdout, Newline)</span>
<span id="L37" class="LineNr">37 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L38" class="LineNr">38 </span> 68/push <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>/imm32
<span id="L39" class="LineNr">39 </span> 68/push <span class="SpecialChar"><a href='../064write-byte.subx.html#L10'>Stdout</a></span>/imm32
<span id="L38" class="LineNr">38 </span> 68/push <span class="SpecialChar"><a href='../102test.subx.html#L82'>Newline</a></span>/imm32
<span id="L39" class="LineNr">39 </span> 68/push <span class="SpecialChar"><a href='../115write-byte.subx.html#L10'>Stdout</a></span>/imm32
<span id="L40" class="LineNr">40 </span> <span class="subxS2Comment"># . . call</span>
<span id="L41" class="LineNr">41 </span> e8/call <a href='../065write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L41" class="LineNr">41 </span> e8/call <a href='../116write-buffered.subx.html#L8'>write-buffered</a>/disp32
<span id="L42" class="LineNr">42 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L43" class="LineNr">43 </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="L44" class="LineNr">44 </span>

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@ -76,17 +76,17 @@ if ('onhashchange' in window) {
<span id="L16" class="LineNr"> 16 </span> <span class="subxComment"># initialize heap</span>
<span id="L17" class="LineNr"> 17 </span> <span class="subxS1Comment"># . Heap = new-segment(Heap-size)</span>
<span id="L18" class="LineNr"> 18 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L19" class="LineNr"> 19 </span> 68/push <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L20" class="LineNr"> 20 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='../069allocate.subx.html#L34'>Heap-size</a></span>/disp32 <span class="subxComment"># push *Heap-size</span>
<span id="L19" class="LineNr"> 19 </span> 68/push <span class="SpecialChar"><a href='../120allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L20" class="LineNr"> 20 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='../120allocate.subx.html#L34'>Heap-size</a></span>/disp32 <span class="subxComment"># push *Heap-size</span>
<span id="L21" class="LineNr"> 21 </span> <span class="subxS2Comment"># . . call</span>
<span id="L22" class="LineNr"> 22 </span> e8/call <a href='../053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L22" class="LineNr"> 22 </span> e8/call <a href='../104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L23" class="LineNr"> 23 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L24" class="LineNr"> 24 </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="L25" class="LineNr"> 25 </span> <span class="subxComment"># initialize-trace-stream(256KB)</span>
<span id="L26" class="LineNr"> 26 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L27" class="LineNr"> 27 </span> 68/push 0x40000/imm32/256KB
<span id="L28" class="LineNr"> 28 </span> <span class="subxS2Comment"># . . call</span>
<span id="L29" class="LineNr"> 29 </span> e8/call <a href='../056trace.subx.html#L48'>initialize-trace-stream</a>/disp32
<span id="L29" class="LineNr"> 29 </span> e8/call <a href='../107trace.subx.html#L48'>initialize-trace-stream</a>/disp32
<span id="L30" class="LineNr"> 30 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L31" class="LineNr"> 31 </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="L32" class="LineNr"> 32 </span>
@ -100,7 +100,7 @@ if ('onhashchange' in window) {
<span id="L40" class="LineNr"> 40 </span> 68/push <span class="Constant">&quot;test&quot;</span>/imm32
<span id="L41" class="LineNr"> 41 </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="L42" class="LineNr"> 42 </span> <span class="subxS2Comment"># . . call</span>
<span id="L43" class="LineNr"> 43 </span> e8/call <a href='../052kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L43" class="LineNr"> 43 </span> e8/call <a href='../103kernel-string-equal.subx.html#L31'>kernel-string-equal?</a>/disp32
<span id="L44" class="LineNr"> 44 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L45" class="LineNr"> 45 </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="L46" class="LineNr"> 46 </span> <span class="subxS1Comment"># . if (eax == false) goto run-main</span>
@ -109,14 +109,14 @@ if ('onhashchange' in window) {
<span id="L49" class="LineNr"> 49 </span> <span class="subxComment"># run-tests()</span>
<span id="L50" class="LineNr"> 50 </span> e8/call run-tests/disp32
<span id="L51" class="LineNr"> 51 </span> <span class="subxComment"># syscall(exit, *Num-test-failures)</span>
<span id="L52" class="LineNr"> 52 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='../051test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L52" class="LineNr"> 52 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='../102test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L53" class="LineNr"> 53 </span> eb/jump $subx-tests-main:end/disp8
<span id="L54" class="LineNr"> 54 </span><span class="Constant">$subx-tests-main:interactive</span>:
<span id="L55" class="LineNr"> 55 </span> <span class="subxH1Comment"># - otherwise convert stdin</span>
<span id="L56" class="LineNr"> 56 </span> <span class="subxComment"># subx-gen-run-tests(Stdin, Stdout)</span>
<span id="L57" class="LineNr"> 57 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L58" class="LineNr"> 58 </span> 68/push <span class="SpecialChar"><a href='../064write-byte.subx.html#L10'>Stdout</a></span>/imm32
<span id="L59" class="LineNr"> 59 </span> 68/push <span class="SpecialChar"><a href='../061read-byte.subx.html#L14'>Stdin</a></span>/imm32
<span id="L58" class="LineNr"> 58 </span> 68/push <span class="SpecialChar"><a href='../115write-byte.subx.html#L10'>Stdout</a></span>/imm32
<span id="L59" class="LineNr"> 59 </span> 68/push <span class="SpecialChar"><a href='../112read-byte.subx.html#L14'>Stdin</a></span>/imm32
<span id="L60" class="LineNr"> 60 </span> <span class="subxS2Comment"># . . call</span>
<span id="L61" class="LineNr"> 61 </span> e8/call <a href='tests.subx.html#L69'>subx-gen-run-tests</a>/disp32
<span id="L62" class="LineNr"> 62 </span> <span class="subxS2Comment"># . . discard args</span>
@ -184,9 +184,9 @@ if ('onhashchange' in window) {
<span id="L124" class="LineNr">124 </span> 56/push-esi
<span id="L125" class="LineNr">125 </span> 68/push 1/imm32
<span id="L126" class="LineNr">126 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar">Segment-size</span>/disp32 <span class="subxComment"># push *Segment-size</span>
<span id="L127" class="LineNr">127 </span> 68/push <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L127" class="LineNr">127 </span> 68/push <span class="SpecialChar"><a href='../120allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L128" class="LineNr">128 </span> <span class="subxS2Comment"># . . call</span>
<span id="L129" class="LineNr">129 </span> e8/call <a href='../070new-stream.subx.html#L8'>new-stream</a>/disp32
<span id="L129" class="LineNr">129 </span> e8/call <a href='../121new-stream.subx.html#L8'>new-stream</a>/disp32
<span id="L130" class="LineNr">130 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L131" class="LineNr">131 </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> 0x10/imm32 <span class="subxComment"># add to esp</span>
<span id="L132" class="LineNr">132 </span> <span class="subxComment"># var new-code-stream/edi: (addr stream byte) = lookup(*new-code-stream-handle)</span>
@ -195,7 +195,7 @@ if ('onhashchange' in window) {
<span id="L135" class="LineNr">135 </span> ff 6/subop/push 1/mod/*+disp8 6/rm32/esi <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 *(esi+4)</span>
<span id="L136" class="LineNr">136 </span> ff 6/subop/push 0/mod/indirect 6/rm32/esi <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 *esi</span>
<span id="L137" class="LineNr">137 </span> <span class="subxS2Comment"># . . call</span>
<span id="L138" class="LineNr">138 </span> e8/call <a href='../069allocate.subx.html#L256'>lookup</a>/disp32
<span id="L138" class="LineNr">138 </span> e8/call <a href='../120allocate.subx.html#L256'>lookup</a>/disp32
<span id="L139" class="LineNr">139 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L140" class="LineNr">140 </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="L141" class="LineNr">141 </span> <span class="subxS1Comment"># . new-code-stream = eax</span>
@ -205,7 +205,7 @@ if ('onhashchange' in window) {
<span id="L145" class="LineNr">145 </span> 68/push <span class="Constant">&quot;\n== code\n&quot;</span>/imm32
<span id="L146" class="LineNr">146 </span> 57/push-edi
<span id="L147" class="LineNr">147 </span> <span class="subxS2Comment"># . . call</span>
<span id="L148" class="LineNr">148 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L148" class="LineNr">148 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L149" class="LineNr">149 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L150" class="LineNr">150 </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="L151" class="LineNr">151 </span> <span class="subxComment"># write(new-code-segment, &quot;run-tests:\n&quot;)</span>
@ -213,7 +213,7 @@ if ('onhashchange' in window) {
<span id="L153" class="LineNr">153 </span> 68/push <span class="Constant">&quot;run-tests:\n&quot;</span>/imm32
<span id="L154" class="LineNr">154 </span> 57/push-edi
<span id="L155" class="LineNr">155 </span> <span class="subxS2Comment"># . . call</span>
<span id="L156" class="LineNr">156 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L156" class="LineNr">156 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L157" class="LineNr">157 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L158" class="LineNr">158 </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="L159" class="LineNr">159 </span><span class="Constant">$subx-gen-run-tests:loop</span>:
@ -221,7 +221,7 @@ if ('onhashchange' in window) {
<span id="L161" class="LineNr">161 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L162" class="LineNr">162 </span> 51/push-ecx
<span id="L163" class="LineNr">163 </span> <span class="subxS2Comment"># . . call</span>
<span id="L164" class="LineNr">164 </span> e8/call <a href='../055stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L164" class="LineNr">164 </span> e8/call <a href='../106stream.subx.html#L17'>clear-stream</a>/disp32
<span id="L165" class="LineNr">165 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L166" class="LineNr">166 </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="L167" class="LineNr">167 </span> <span class="subxComment"># read-line-buffered(in, line)</span>
@ -229,7 +229,7 @@ if ('onhashchange' in window) {
<span id="L169" class="LineNr">169 </span> 51/push-ecx
<span id="L170" class="LineNr">170 </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="L171" class="LineNr">171 </span> <span class="subxS2Comment"># . . call</span>
<span id="L172" class="LineNr">172 </span> e8/call <a href='../071read-line.subx.html#L9'>read-line-buffered</a>/disp32
<span id="L172" class="LineNr">172 </span> e8/call <a href='../122read-line.subx.html#L9'>read-line-buffered</a>/disp32
<span id="L173" class="LineNr">173 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L174" class="LineNr">174 </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="L175" class="LineNr">175 </span><span class="Constant">$subx-gen-run-tests:check0</span>:
@ -241,7 +241,7 @@ if ('onhashchange' in window) {
<span id="L181" class="LineNr">181 </span> 52/push-edx
<span id="L182" class="LineNr">182 </span> 51/push-ecx
<span id="L183" class="LineNr">183 </span> <span class="subxS2Comment"># . . call</span>
<span id="L184" class="LineNr">184 </span> e8/call <a href='../076next-word.subx.html#L10'>next-word</a>/disp32
<span id="L184" class="LineNr">184 </span> e8/call <a href='../127next-word.subx.html#L10'>next-word</a>/disp32
<span id="L185" class="LineNr">185 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L186" class="LineNr">186 </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="L187" class="LineNr">187 </span><span class="Constant">$subx-gen-run-tests:check-for-label</span>:
@ -250,7 +250,7 @@ if ('onhashchange' in window) {
<span id="L190" class="LineNr">190 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L191" class="LineNr">191 </span> 52/push-edx
<span id="L192" class="LineNr">192 </span> <span class="subxS2Comment"># . . call</span>
<span id="L193" class="LineNr">193 </span> e8/call <a href='../077subx-words.subx.html#L535'>is-label?</a>/disp32
<span id="L193" class="LineNr">193 </span> e8/call <a href='../128subx-words.subx.html#L535'>is-label?</a>/disp32
<span id="L194" class="LineNr">194 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L195" class="LineNr">195 </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="L196" class="LineNr">196 </span> <span class="subxS1Comment"># . if (eax == false) continue</span>
@ -264,7 +264,7 @@ if ('onhashchange' in window) {
<span id="L204" class="LineNr">204 </span> 68/push <span class="Constant">&quot;test-&quot;</span>/imm32
<span id="L205" class="LineNr">205 </span> 52/push-edx
<span id="L206" class="LineNr">206 </span> <span class="subxS2Comment"># . . call</span>
<span id="L207" class="LineNr">207 </span> e8/call <a href='../072slice.subx.html#L487'>slice-starts-with?</a>/disp32
<span id="L207" class="LineNr">207 </span> e8/call <a href='../123slice.subx.html#L487'>slice-starts-with?</a>/disp32
<span id="L208" class="LineNr">208 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L209" class="LineNr">209 </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="L210" class="LineNr">210 </span> <span class="subxS1Comment"># . if (eax == false) break</span>
@ -278,7 +278,7 @@ if ('onhashchange' in window) {
<span id="L218" class="LineNr">218 </span> 68/push <span class="Constant">&quot; e8/call &quot;</span>/imm32
<span id="L219" class="LineNr">219 </span> 57/push-edi
<span id="L220" class="LineNr">220 </span> <span class="subxS2Comment"># . . call</span>
<span id="L221" class="LineNr">221 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L221" class="LineNr">221 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L222" class="LineNr">222 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L223" class="LineNr">223 </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="L224" class="LineNr">224 </span> <span class="subxComment"># write-slice(new-code-segment, word-slice)</span>
@ -286,7 +286,7 @@ if ('onhashchange' in window) {
<span id="L226" class="LineNr">226 </span> 52/push-edx
<span id="L227" class="LineNr">227 </span> 57/push-edi
<span id="L228" class="LineNr">228 </span> <span class="subxS2Comment"># . . call</span>
<span id="L229" class="LineNr">229 </span> e8/call <a href='../072slice.subx.html#L793'>write-slice</a>/disp32
<span id="L229" class="LineNr">229 </span> e8/call <a href='../123slice.subx.html#L793'>write-slice</a>/disp32
<span id="L230" class="LineNr">230 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L231" class="LineNr">231 </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="L232" class="LineNr">232 </span> <span class="subxComment"># write(new-code-segment, &quot;/disp32\n&quot;)</span>
@ -294,7 +294,7 @@ if ('onhashchange' in window) {
<span id="L234" class="LineNr">234 </span> 68/push <span class="Constant">&quot;/disp32\n&quot;</span>/imm32
<span id="L235" class="LineNr">235 </span> 57/push-edi
<span id="L236" class="LineNr">236 </span> <span class="subxS2Comment"># . . call</span>
<span id="L237" class="LineNr">237 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L237" class="LineNr">237 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L238" class="LineNr">238 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L239" class="LineNr">239 </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="L240" class="LineNr">240 </span><span class="Constant">$subx-gen-run-tests:continue</span>:
@ -302,7 +302,7 @@ if ('onhashchange' in window) {
<span id="L242" class="LineNr">242 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L243" class="LineNr">243 </span> 51/push-ecx
<span id="L244" class="LineNr">244 </span> <span class="subxS2Comment"># . . call</span>
<span id="L245" class="LineNr">245 </span> e8/call <a href='../055stream.subx.html#L56'>rewind-stream</a>/disp32
<span id="L245" class="LineNr">245 </span> e8/call <a href='../106stream.subx.html#L56'>rewind-stream</a>/disp32
<span id="L246" class="LineNr">246 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L247" class="LineNr">247 </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="L248" class="LineNr">248 </span> <span class="subxComment"># write-stream-data(out, line)</span>
@ -310,7 +310,7 @@ if ('onhashchange' in window) {
<span id="L250" class="LineNr">250 </span> 51/push-ecx
<span id="L251" class="LineNr">251 </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="L252" class="LineNr">252 </span> <span class="subxS2Comment"># . . call</span>
<span id="L253" class="LineNr">253 </span> e8/call <a href='../074write-stream-data.subx.html#L11'>write-stream-data</a>/disp32
<span id="L253" class="LineNr">253 </span> e8/call <a href='../125write-stream-data.subx.html#L11'>write-stream-data</a>/disp32
<span id="L254" class="LineNr">254 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L255" class="LineNr">255 </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="L256" class="LineNr">256 </span> <span class="subxComment"># loop</span>
@ -324,7 +324,7 @@ if ('onhashchange' in window) {
<span id="L264" class="LineNr">264 </span> 68/push <span class="Constant">&quot; c3/return\n&quot;</span>/imm32
<span id="L265" class="LineNr">265 </span> 57/push-edi
<span id="L266" class="LineNr">266 </span> <span class="subxS2Comment"># . . call</span>
<span id="L267" class="LineNr">267 </span> e8/call <a href='../057write.subx.html#L24'>write</a>/disp32
<span id="L267" class="LineNr">267 </span> e8/call <a href='../108write.subx.html#L24'>write</a>/disp32
<span id="L268" class="LineNr">268 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L269" class="LineNr">269 </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="L270" class="LineNr">270 </span> <span class="subxComment"># write-stream-data(out, new-code-segment)</span>
@ -332,7 +332,7 @@ if ('onhashchange' in window) {
<span id="L272" class="LineNr">272 </span> 57/push-edi
<span id="L273" class="LineNr">273 </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="L274" class="LineNr">274 </span> <span class="subxS2Comment"># . . call</span>
<span id="L275" class="LineNr">275 </span> e8/call <a href='../074write-stream-data.subx.html#L11'>write-stream-data</a>/disp32
<span id="L275" class="LineNr">275 </span> e8/call <a href='../125write-stream-data.subx.html#L11'>write-stream-data</a>/disp32
<span id="L276" class="LineNr">276 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L277" class="LineNr">277 </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="L278" class="LineNr">278 </span><span class="Constant">$subx-gen-run-tests:end</span>:
@ -340,7 +340,7 @@ if ('onhashchange' in window) {
<span id="L280" class="LineNr">280 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L281" class="LineNr">281 </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="L282" class="LineNr">282 </span> <span class="subxS2Comment"># . . call</span>
<span id="L283" class="LineNr">283 </span> e8/call <a href='../064write-byte.subx.html#L81'>flush</a>/disp32
<span id="L283" class="LineNr">283 </span> e8/call <a href='../115write-byte.subx.html#L81'>flush</a>/disp32
<span id="L284" class="LineNr">284 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L285" class="LineNr">285 </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="L286" class="LineNr">286 </span> <span class="subxS1Comment"># . reclaim locals</span>

42
html/apps/tui.mu.html generated
View File

@ -65,28 +65,28 @@ if ('onhashchange' in window) {
<span id="L7" class="LineNr"> 7 </span><span class="PreProc">fn</span> <span class="muFunction">main</span><span class="PreProc"> -&gt; </span>exit-status/<span class="Constant">ebx</span>: int <span class="Delimiter">{</span>
<span id="L8" class="LineNr"> 8 </span> <span class="PreProc">var</span> nrows/<span class="Constant">eax</span>: int <span class="SpecialChar">&lt;-</span> copy <span class="Constant">0</span>
<span id="L9" class="LineNr"> 9 </span> <span class="PreProc">var</span> ncols/<span class="Constant">ecx</span>: int <span class="SpecialChar">&lt;-</span> copy <span class="Constant">0</span>
<span id="L10" class="LineNr">10 </span> nrows, ncols <span class="SpecialChar">&lt;-</span> <a href='../103screen.subx.html#L37'>screen-size</a>
<span id="L11" class="LineNr">11 </span> <a href='../103screen.subx.html#L6'>enable-screen-grid-mode</a>
<span id="L12" class="LineNr">12 </span> <a href='../103screen.subx.html#L91'>move-cursor-on-screen</a> <span class="Constant">5</span>, <span class="Constant">35</span>
<span id="L13" class="LineNr">13 </span> <a href='../103screen.subx.html#L185'>start-color-on-screen</a> <span class="Constant">1</span>, <span class="Constant">0x7a</span>
<span id="L14" class="LineNr">14 </span> <a href='../103screen.subx.html#L260'>start-blinking-on-screen</a>
<span id="L15" class="LineNr">15 </span> <a href='../103screen.subx.html#L122'>print-string-to-screen</a> <span class="Constant">&quot;Hello world!&quot;</span>
<span id="L16" class="LineNr">16 </span> <a href='../103screen.subx.html#L170'>reset-formatting-on-screen</a>
<span id="L17" class="LineNr">17 </span> <a href='../103screen.subx.html#L91'>move-cursor-on-screen</a> <span class="Constant">6</span>, <span class="Constant">35</span>
<span id="L18" class="LineNr">18 </span> <a href='../103screen.subx.html#L122'>print-string-to-screen</a> <span class="Constant">&quot;tty dimensions: &quot;</span>
<span id="L19" class="LineNr">19 </span> <a href='../103screen.subx.html#L157'>print-int32-hex-to-screen</a> nrows
<span id="L20" class="LineNr">20 </span> <a href='../103screen.subx.html#L122'>print-string-to-screen</a> <span class="Constant">&quot; rows, &quot;</span>
<span id="L21" class="LineNr">21 </span> <a href='../103screen.subx.html#L157'>print-int32-hex-to-screen</a> ncols
<span id="L22" class="LineNr">22 </span> <a href='../103screen.subx.html#L122'>print-string-to-screen</a> <span class="Constant">&quot; rows\n&quot;</span>
<span id="L10" class="LineNr">10 </span> nrows, ncols <span class="SpecialChar">&lt;-</span> <a href='../304screen.subx.html#L37'>screen-size</a>
<span id="L11" class="LineNr">11 </span> <a href='../304screen.subx.html#L6'>enable-screen-grid-mode</a>
<span id="L12" class="LineNr">12 </span> <a href='../304screen.subx.html#L91'>move-cursor-on-screen</a> <span class="Constant">5</span>, <span class="Constant">35</span>
<span id="L13" class="LineNr">13 </span> <a href='../304screen.subx.html#L186'>start-color-on-screen</a> <span class="Constant">1</span>, <span class="Constant">0x7a</span>
<span id="L14" class="LineNr">14 </span> <a href='../304screen.subx.html#L261'>start-blinking-on-screen</a>
<span id="L15" class="LineNr">15 </span> <a href='../304screen.subx.html#L123'>print-string-to-screen</a> <span class="Constant">&quot;Hello world!&quot;</span>
<span id="L16" class="LineNr">16 </span> <a href='../304screen.subx.html#L171'>reset-formatting-on-screen</a>
<span id="L17" class="LineNr">17 </span> <a href='../304screen.subx.html#L91'>move-cursor-on-screen</a> <span class="Constant">6</span>, <span class="Constant">35</span>
<span id="L18" class="LineNr">18 </span> <a href='../304screen.subx.html#L123'>print-string-to-screen</a> <span class="Constant">&quot;tty dimensions: &quot;</span>
<span id="L19" class="LineNr">19 </span> <a href='../304screen.subx.html#L158'>print-int32-hex-to-screen</a> nrows
<span id="L20" class="LineNr">20 </span> <a href='../304screen.subx.html#L123'>print-string-to-screen</a> <span class="Constant">&quot; rows, &quot;</span>
<span id="L21" class="LineNr">21 </span> <a href='../304screen.subx.html#L158'>print-int32-hex-to-screen</a> ncols
<span id="L22" class="LineNr">22 </span> <a href='../304screen.subx.html#L123'>print-string-to-screen</a> <span class="Constant">&quot; rows\n&quot;</span>
<span id="L23" class="LineNr">23 </span>
<span id="L24" class="LineNr">24 </span> <a href='../103screen.subx.html#L122'>print-string-to-screen</a> <span class="Constant">&quot;press a key to see its code: &quot;</span>
<span id="L25" class="LineNr">25 </span> <a href='../104keyboard.subx.html#L6'>enable-keyboard-immediate-mode</a>
<span id="L26" class="LineNr">26 </span> <span class="PreProc">var</span> x/<span class="Constant">eax</span>: byte <span class="SpecialChar">&lt;-</span> <a href='../104keyboard.subx.html#L122'>read-key</a>
<span id="L27" class="LineNr">27 </span> <a href='../104keyboard.subx.html#L72'>enable-keyboard-type-mode</a>
<span id="L28" class="LineNr">28 </span> <a href='../103screen.subx.html#L24'>enable-screen-type-mode</a>
<span id="L29" class="LineNr">29 </span> <a href='../103screen.subx.html#L122'>print-string-to-screen</a> <span class="Constant">&quot;You pressed &quot;</span>
<span id="L30" class="LineNr">30 </span> <a href='../103screen.subx.html#L157'>print-int32-hex-to-screen</a> x
<span id="L31" class="LineNr">31 </span> <a href='../103screen.subx.html#L122'>print-string-to-screen</a> <span class="Constant">&quot;\n&quot;</span>
<span id="L24" class="LineNr">24 </span> <a href='../304screen.subx.html#L123'>print-string-to-screen</a> <span class="Constant">&quot;press a key to see its code: &quot;</span>
<span id="L25" class="LineNr">25 </span> <a href='../305keyboard.subx.html#L6'>enable-keyboard-immediate-mode</a>
<span id="L26" class="LineNr">26 </span> <span class="PreProc">var</span> x/<span class="Constant">eax</span>: byte <span class="SpecialChar">&lt;-</span> <a href='../305keyboard.subx.html#L122'>read-key</a>
<span id="L27" class="LineNr">27 </span> <a href='../305keyboard.subx.html#L72'>enable-keyboard-type-mode</a>
<span id="L28" class="LineNr">28 </span> <a href='../304screen.subx.html#L24'>enable-screen-type-mode</a>
<span id="L29" class="LineNr">29 </span> <a href='../304screen.subx.html#L123'>print-string-to-screen</a> <span class="Constant">&quot;You pressed &quot;</span>
<span id="L30" class="LineNr">30 </span> <a href='../304screen.subx.html#L158'>print-int32-hex-to-screen</a> x
<span id="L31" class="LineNr">31 </span> <a href='../304screen.subx.html#L123'>print-string-to-screen</a> <span class="Constant">&quot;\n&quot;</span>
<span id="L32" class="LineNr">32 </span> exit-status <span class="SpecialChar">&lt;-</span> copy <span class="Constant">0</span>
<span id="L33" class="LineNr">33 </span><span class="Delimiter">}</span>
</pre>

View File

@ -75,13 +75,13 @@ if ('onhashchange' in window) {
<span id="L18" class="LineNr">18 </span> 81 7/subop/compare *esi 4/imm32
<span id="L19" class="LineNr">19 </span> 7e/jump-if-&lt;= <span class="Constant">break</span>/disp8
<span id="L20" class="LineNr">20 </span> <span class="subxComment"># if (argv[1] != &quot;test&quot;) break</span>
<span id="L21" class="LineNr">21 </span> (<a href='054string-equal.subx.html#L15'>string-equal?</a> *(esi+8) <span class="Constant">&quot;test&quot;</span>) <span class="subxComment"># =&gt; eax</span>
<span id="L21" class="LineNr">21 </span> (<a href='105string-equal.subx.html#L15'>string-equal?</a> *(esi+8) <span class="Constant">&quot;test&quot;</span>) <span class="subxComment"># =&gt; eax</span>
<span id="L22" class="LineNr">22 </span> 3d/compare-eax-and 0/imm32
<span id="L23" class="LineNr">23 </span> 74/jump-if-= <span class="Constant">break</span>/disp8
<span id="L24" class="LineNr">24 </span> <span class="subxComment">#</span>
<span id="L25" class="LineNr">25 </span> (run-tests)
<span id="L26" class="LineNr">26 </span> <span class="subxComment"># return *Num-test-failures</span>
<span id="L27" class="LineNr">27 </span> 8b/-&gt; *<span class="SpecialChar"><a href='051test.subx.html#L89'>Num-test-failures</a></span> 3/r32/ebx
<span id="L27" class="LineNr">27 </span> 8b/-&gt; *<span class="SpecialChar"><a href='102test.subx.html#L89'>Num-test-failures</a></span> 3/r32/ebx
<span id="L28" class="LineNr">28 </span> eb/jump $main:end/disp8
<span id="L29" class="LineNr">29 </span> }
<span id="L30" class="LineNr">30 </span><span class="Constant">$main:end</span>:

10
html/mu-init.subx.html generated
View File

@ -76,7 +76,7 @@ if ('onhashchange' in window) {
<span id="L20" class="LineNr">20 </span> 89/&lt;- %esi 4/r32/esp
<span id="L21" class="LineNr">21 </span><span class="Constant">$Entry:initialize-heap</span>:
<span id="L22" class="LineNr">22 </span> <span class="subxH1Comment"># - initialize the heap</span>
<span id="L23" class="LineNr">23 </span> (<a href='053new-segment.subx.html#L40'>new-segment</a> *<span class="SpecialChar"><a href='069allocate.subx.html#L34'>Heap-size</a></span> <span class="SpecialChar"><a href='069allocate.subx.html#L27'>Heap</a></span>)
<span id="L23" class="LineNr">23 </span> (<a href='104new-segment.subx.html#L40'>new-segment</a> *<span class="SpecialChar"><a href='120allocate.subx.html#L34'>Heap-size</a></span> <span class="SpecialChar"><a href='120allocate.subx.html#L27'>Heap</a></span>)
<span id="L24" class="LineNr">24 </span><span class="Constant">$Entry:initialize-args</span>:
<span id="L25" class="LineNr">25 </span> <span class="subxH1Comment"># - convert argv from null-terminated 'kernel' strings to length-prefixed Mu strings</span>
<span id="L26" class="LineNr">26 </span> <span class="subxComment"># var argc/edx: int</span>
@ -88,8 +88,8 @@ if ('onhashchange' in window) {
<span id="L32" class="LineNr">32 </span> 68/push 0/imm32
<span id="L33" class="LineNr">33 </span> 89/&lt;- %ebx 4/r32/esp
<span id="L34" class="LineNr">34 </span> <span class="subxComment"># var args/edi: (addr array (addr array byte))</span>
<span id="L35" class="LineNr">35 </span> (<a href='069allocate.subx.html#L576'>allocate-array</a> <span class="SpecialChar"><a href='069allocate.subx.html#L27'>Heap</a></span> %edx %ebx)
<span id="L36" class="LineNr">36 </span> (<a href='069allocate.subx.html#L256'>lookup</a> *ebx *(ebx+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L35" class="LineNr">35 </span> (<a href='120allocate.subx.html#L576'>allocate-array</a> <span class="SpecialChar"><a href='120allocate.subx.html#L27'>Heap</a></span> %edx %ebx)
<span id="L36" class="LineNr">36 </span> (<a href='120allocate.subx.html#L256'>lookup</a> *ebx *(ebx+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L37" class="LineNr">37 </span> 89/&lt;- %edi 0/r32/eax
<span id="L38" class="LineNr">38 </span> <span class="subxComment"># var curr/ecx: (addr kernel-string) = argv</span>
<span id="L39" class="LineNr">39 </span> 8d/copy-address *(esi+4) 1/r32/ecx
@ -102,8 +102,8 @@ if ('onhashchange' in window) {
<span id="L46" class="LineNr">46 </span> 39/compare %ecx 2/r32/edx
<span id="L47" class="LineNr">47 </span> 73/jump-if-addr&gt;= <span class="Constant">break</span>/disp8
<span id="L48" class="LineNr">48 </span> <span class="subxComment"># *dest = kernel-string-to-string(*curr)</span>
<span id="L49" class="LineNr">49 </span> (<a href='102kernel-string.subx.html#L7'>kernel-string-to-string</a> <span class="SpecialChar"><a href='069allocate.subx.html#L27'>Heap</a></span> *ecx %ebx)
<span id="L50" class="LineNr">50 </span> (<a href='069allocate.subx.html#L256'>lookup</a> *ebx *(ebx+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L49" class="LineNr">49 </span> (<a href='303kernel-string.subx.html#L7'>kernel-string-to-string</a> <span class="SpecialChar"><a href='120allocate.subx.html#L27'>Heap</a></span> *ecx %ebx)
<span id="L50" class="LineNr">50 </span> (<a href='120allocate.subx.html#L256'>lookup</a> *ebx *(ebx+4)) <span class="subxComment"># =&gt; eax</span>
<span id="L51" class="LineNr">51 </span> 89/&lt;- *esi 0/r32/eax
<span id="L52" class="LineNr">52 </span> <span class="subxComment"># curr += 4</span>
<span id="L53" class="LineNr">53 </span> 81 0/subop/add %ecx 4/imm32

View File

@ -65,22 +65,22 @@ if ('onhashchange' in window) {
<span id="L8" class="LineNr"> 8 </span><span class="SpecialChar">Entry</span>:
<span id="L9" class="LineNr"> 9 </span> <span class="subxComment"># Heap = new-segment(64KB)</span>
<span id="L10" class="LineNr">10 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L11" class="LineNr">11 </span> 68/push <span class="SpecialChar"><a href='069allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L12" class="LineNr">12 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='069allocate.subx.html#L34'>Heap-size</a></span>/disp32 <span class="subxComment"># push *Heap-size</span>
<span id="L11" class="LineNr">11 </span> 68/push <span class="SpecialChar"><a href='120allocate.subx.html#L27'>Heap</a></span>/imm32
<span id="L12" class="LineNr">12 </span> ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="SpecialChar"><a href='120allocate.subx.html#L34'>Heap-size</a></span>/disp32 <span class="subxComment"># push *Heap-size</span>
<span id="L13" class="LineNr">13 </span> <span class="subxS2Comment"># . . call</span>
<span id="L14" class="LineNr">14 </span> e8/call <a href='053new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L14" class="LineNr">14 </span> e8/call <a href='104new-segment.subx.html#L40'>new-segment</a>/disp32
<span id="L15" class="LineNr">15 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L16" class="LineNr">16 </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="L17" class="LineNr">17 </span> <span class="subxComment"># initialize-trace-stream(256KB)</span>
<span id="L18" class="LineNr">18 </span> <span class="subxS2Comment"># . . push args</span>
<span id="L19" class="LineNr">19 </span> 68/push 0x40000/imm32/256KB
<span id="L20" class="LineNr">20 </span> <span class="subxS2Comment"># . . call</span>
<span id="L21" class="LineNr">21 </span> e8/call <a href='056trace.subx.html#L48'>initialize-trace-stream</a>/disp32
<span id="L21" class="LineNr">21 </span> e8/call <a href='107trace.subx.html#L48'>initialize-trace-stream</a>/disp32
<span id="L22" class="LineNr">22 </span> <span class="subxS2Comment"># . . discard args</span>
<span id="L23" class="LineNr">23 </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="L24" class="LineNr">24 </span> <span class="subxComment"># for debugging: run a single test</span>
<span id="L25" class="LineNr">25 </span> e8/call $TEST_NAME/disp32
<span id="L26" class="LineNr">26 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='051test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L26" class="LineNr">26 </span> 8b/copy 0/mod/indirect 5/rm32/.disp32 <span class="Normal"> . </span> <span class="Normal"> . </span> 3/r32/ebx <span class="SpecialChar"><a href='102test.subx.html#L89'>Num-test-failures</a></span>/disp32 <span class="subxComment"># copy *Num-test-failures to ebx</span>
<span id="L27" class="LineNr">27 </span> b8/copy-to-eax 1/imm32/exit
<span id="L28" class="LineNr">28 </span> cd/syscall 0x80/imm8
<span id="L29" class="LineNr">29 </span>