2021-10-10 04:07:54 +00:00
<!DOCTYPE html>
2018-12-29 23:27:18 +00:00
< html >
< head >
2021-10-10 04:07:54 +00:00
< meta charset = "UTF-8" >
2020-07-11 06:44:10 +00:00
< title > Mu - 120allocate.subx< / title >
2021-10-10 04:07:54 +00:00
< meta name = "Generator" content = "Vim/8.2" >
< meta name = "plugin-version" content = "vim8.1_v2" >
2018-12-29 23:27:18 +00:00
< meta name = "syntax" content = "none" >
2021-10-10 04:07:54 +00:00
< meta name = "settings" content = "number_lines,use_css,no_foldcolumn,expand_tabs,line_ids,prevent_copy=,use_input_for_pc=fallback" >
2021-06-25 04:44:18 +00:00
< meta name = "colorscheme" content = "minimal-light" >
2021-10-10 04:07:54 +00:00
< style >
2018-12-29 23:27:18 +00:00
<!--
2021-06-26 16:20:32 +00:00
pre { font-family: monospace; color: #000000; background-color: #ffffd7; }
body { font-size:12pt; font-family: monospace; color: #000000; background-color: #ffffd7; }
2018-12-30 08:02:42 +00:00
a { color:inherit; }
2018-12-29 23:27:18 +00:00
* { font-size:12pt; font-size: 1em; }
2021-08-16 06:44:43 +00:00
.subxMinorFunction { color: #875f5f; }
2018-12-29 23:27:18 +00:00
.subxComment { color: #005faf; }
2021-08-16 06:44:43 +00:00
.subxS1Comment { color: #0000af; }
2021-07-16 15:38:43 +00:00
.subxS2Comment { color: #8a8a8a; }
2019-07-14 16:42:36 +00:00
.LineNr { }
2021-06-26 16:20:32 +00:00
.Constant { color: #008787; }
2021-08-16 06:44:43 +00:00
.subxTest { color: #5f8700; }
2019-09-20 18:19:30 +00:00
.SpecialChar { color: #d70000; }
2021-06-26 16:20:32 +00:00
.Normal { color: #000000; background-color: #ffffd7; padding-bottom: 1px; }
2021-08-16 06:44:43 +00:00
.subxFunction { color: #af5f00; text-decoration: underline; }
2018-12-29 23:27:18 +00:00
-->
< / style >
2021-10-10 04:07:54 +00:00
< script >
2018-12-29 23:27:18 +00:00
<!--
/* 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;
}
2019-07-14 16:42:36 +00:00
var lineElem = document.getElementById(lineNum);
2018-12-29 23:27:18 +00:00
/* 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();' >
2020-12-30 17:37:50 +00:00
< a href = 'https://github.com/akkartik/mu/blob/main/120allocate.subx' > https://github.com/akkartik/mu/blob/main/120allocate.subx< / a >
2018-12-29 23:27:18 +00:00
< 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 >
< span id = "L3" class = "LineNr" > 3 < / span > < span class = "subxComment" > # We'd like to be able to write tests for functions that allocate memory,< / span >
< span id = "L4" class = "LineNr" > 4 < / span > < span class = "subxComment" > # making assertions on the precise addresses used. To achieve this we'll pass< / span >
< span id = "L5" class = "LineNr" > 5 < / span > < span class = "subxComment" > # in an *allocation descriptor* to allocate from.< / span >
< span id = "L6" class = "LineNr" > 6 < / span > < span class = "subxComment" > #< / span >
< span id = "L7" class = "LineNr" > 7 < / span > < span class = "subxComment" > # Allocation descriptors are also useful outside of tests. Assembly and machine< / span >
< span id = "L8" class = "LineNr" > 8 < / span > < span class = "subxComment" > # code are of necessity unsafe languages, and one of the most insidious kinds< / span >
< span id = "L9" class = "LineNr" > 9 < / span > < span class = "subxComment" > # of bugs unsafe languages expose us to are dangling pointers to memory that< / span >
< span id = "L10" class = "LineNr" > 10 < / span > < span class = "subxComment" > # has been freed and potentially even reused for something totally different.< / span >
< span id = "L11" class = "LineNr" > 11 < / span > < span class = "subxComment" > # To reduce the odds of such " use after free" errors, SubX programs tend to not< / span >
< span id = "L12" class = "LineNr" > 12 < / span > < span class = "subxComment" > # reclaim and reuse dynamically allocated memory. (Running out of memory is far< / span >
< span id = "L13" class = "LineNr" > 13 < / span > < span class = "subxComment" > # easier to debug.) Long-running programs that want to reuse memory are mostly< / span >
< span id = "L14" class = "LineNr" > 14 < / span > < span class = "subxComment" > # on their own to be careful. However, they do get one bit of help: they can< / span >
< span id = "L15" class = "LineNr" > 15 < / span > < span class = "subxComment" > # carve out chunks of memory and then allocate from them manually using this< / span >
< span id = "L16" class = "LineNr" > 16 < / span > < span class = "subxComment" > # very same 'allocate' helper. They just need a new allocation descriptor for< / span >
< span id = "L17" class = "LineNr" > 17 < / span > < span class = "subxComment" > # their book-keeping.< / span >
< span id = "L18" class = "LineNr" > 18 < / span >
2019-09-20 18:19:30 +00:00
< span id = "L19" class = "LineNr" > 19 < / span > == data
< span id = "L20" class = "LineNr" > 20 < / span >
2020-05-23 06:08:09 +00:00
< span id = "L21" class = "LineNr" > 21 < / span > < span class = "subxComment" > # Allocations are returned in a handle, which consists of an alloc-id and a payload.< / span >
< span id = "L22" class = "LineNr" > 22 < / span > < span class = "subxComment" > # The alloc-id helps detect use-after-free errors.< / span >
< span id = "L23" class = "LineNr" > 23 < / span > < span class = "SpecialChar" > Handle-size< / span > : < span class = "subxComment" > # (addr int)< / span >
< span id = "L24" class = "LineNr" > 24 < / span > 8/imm32
< span id = "L25" class = "LineNr" > 25 < / span >
< span id = "L26" class = "LineNr" > 26 < / span > < span class = "subxComment" > # A default allocation descriptor for programs to use.< / span >
< span id = "L27" class = "LineNr" > 27 < / span > < span class = "SpecialChar" > Heap< / span > : < span class = "subxComment" > # allocation-descriptor< / span >
< span id = "L28" class = "LineNr" > 28 < / span > < span class = "subxComment" > # curr< / span >
2021-05-02 06:52:28 +00:00
< span id = "L29" class = "LineNr" > 29 < / span > 0x02000000/imm32 < span class = "subxComment" > # 32 MB< / span >
2020-05-23 06:08:09 +00:00
< span id = "L30" class = "LineNr" > 30 < / span > < span class = "subxComment" > # limit< / span >
2021-05-02 06:52:28 +00:00
< span id = "L31" class = "LineNr" > 31 < / span > 0x80000000/imm32 < span class = "subxComment" > # 2 GB< / span >
2020-05-23 06:08:09 +00:00
< span id = "L32" class = "LineNr" > 32 < / span >
2021-03-24 00:31:08 +00:00
< span id = "L33" class = "LineNr" > 33 < / span > < span class = "SpecialChar" > Next-alloc-id< / span > : < span class = "subxComment" > # int< / span >
< span id = "L34" class = "LineNr" > 34 < / span > 0x100/imm32 < span class = "subxComment" > # save a few alloc ids for fake handles< / span >
< span id = "L35" class = "LineNr" > 35 < / span >
< span id = "L36" class = "LineNr" > 36 < / span > == code
< span id = "L37" class = "LineNr" > 37 < / span > < span class = "subxComment" > # instruction effective address register displacement immediate< / span >
< span id = "L38" class = "LineNr" > 38 < / span > < span class = "subxS1Comment" > # . op subop mod rm32 base index scale r32< / span >
< span id = "L39" class = "LineNr" > 39 < / 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 = "L40" class = "LineNr" > 40 < / span >
< span id = "L41" class = "LineNr" > 41 < / span > < span class = "subxComment" > # Allocate and clear 'n' bytes of memory from an allocation-descriptor 'ad'.< / span >
< span id = "L42" class = "LineNr" > 42 < / span > < span class = "subxComment" > # Abort if there isn't enough memory in 'ad'.< / span >
< span id = "L43" class = "LineNr" > 43 < / span > < span class = "subxFunction" > allocate< / span > : < span class = "subxComment" > # ad: (addr allocation-descriptor), n: int, out: (addr handle _)< / span >
< span id = "L44" class = "LineNr" > 44 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L45" class = "LineNr" > 45 < / span > 55/push-ebp
< span id = "L46" class = "LineNr" > 46 < / 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 = "L47" class = "LineNr" > 47 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L48" class = "LineNr" > 48 < / span > 50/push-eax
< span id = "L49" class = "LineNr" > 49 < / span > < span class = "subxComment" > # allocate-raw(ad, n, out)< / span >
2020-05-23 06:08:09 +00:00
< span id = "L50" class = "LineNr" > 50 < / span > < span class = "subxS2Comment" > # . . push args< / span >
2021-03-24 00:31:08 +00:00
< span id = "L51" class = "LineNr" > 51 < / 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 = "L52" class = "LineNr" > 52 < / 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 = "L53" class = "LineNr" > 53 < / 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 = "L54" class = "LineNr" > 54 < / span > < span class = "subxS2Comment" > # . . call< / span >
2021-08-16 06:44:43 +00:00
< span id = "L55" class = "LineNr" > 55 < / span > e8/call < a href = '120allocate.subx.html#L92' > allocate-raw< / a > /disp32
2021-03-24 00:31:08 +00:00
< 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 > 0xc/imm32 < span class = "subxComment" > # add to esp< / span >
< span id = "L58" class = "LineNr" > 58 < / span > < span class = "subxComment" > # eax = out-> payload + 4< / span >
< span id = "L59" class = "LineNr" > 59 < / span > 8b/copy 1/mod/*+disp8 5/rm32/ebp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/eax 0x10/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ebp+16) to eax< / span >
< span id = "L60" class = "LineNr" > 60 < / 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 = "L61" class = "LineNr" > 61 < / span > 05/add-to-eax 4/imm32
< span id = "L62" class = "LineNr" > 62 < / span > < span class = "subxComment" > # zero-out(eax, n)< / span >
< span id = "L63" class = "LineNr" > 63 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L64" class = "LineNr" > 64 < / 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 = "L65" class = "LineNr" > 65 < / span > 50/push-eax
< span id = "L66" class = "LineNr" > 66 < / span > < span class = "subxS2Comment" > # . . call< / span >
2021-08-16 06:44:43 +00:00
< span id = "L67" class = "LineNr" > 67 < / span > e8/call < a href = '120allocate.subx.html#L869' > zero-out< / a > /disp32
2021-03-24 00:31:08 +00:00
< 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 = "Constant" > $allocate:end< / span > :
< span id = "L71" class = "LineNr" > 71 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L72" class = "LineNr" > 72 < / span > 58/pop-to-eax
< span id = "L73" class = "LineNr" > 73 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L74" class = "LineNr" > 74 < / 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 = "L75" class = "LineNr" > 75 < / span > 5d/pop-to-ebp
< span id = "L76" class = "LineNr" > 76 < / span > c3/return
< span id = "L77" class = "LineNr" > 77 < / span >
2021-08-16 06:44:43 +00:00
< span id = "L78" class = "LineNr" > 78 < / span > < span class = "subxFunction" > heap-bound< / span > : < span class = "subxComment" > # -> _/eax: int< / span >
< span id = "L79" class = "LineNr" > 79 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L80" class = "LineNr" > 80 < / span > 55/push-ebp
< span id = "L81" class = "LineNr" > 81 < / 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 = "L82" class = "LineNr" > 82 < / span > < span class = "subxComment" > #< / span >
< span id = "L83" class = "LineNr" > 83 < / 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#L27' > Heap< / a > < / span > /disp32 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *Heap to eax< / span >
< span id = "L84" class = "LineNr" > 84 < / span > < span class = "Constant" > $heap-bound:end< / span > :
< span id = "L85" class = "LineNr" > 85 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L86" class = "LineNr" > 86 < / 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 = "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" > # Claim the next 'n' bytes of memory starting at ad-> curr and update ad-> curr.< / span >
< span id = "L91" class = "LineNr" > 91 < / span > < span class = "subxComment" > # Abort if there isn't enough memory in 'ad'.< / span >
< span id = "L92" class = "LineNr" > 92 < / span > < span class = "subxFunction" > allocate-raw< / span > : < span class = "subxComment" > # ad: (addr allocation-descriptor), n: int, out: (addr handle _)< / span >
< span id = "L93" class = "LineNr" > 93 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L94" class = "LineNr" > 94 < / span > 55/push-ebp
< span id = "L95" class = "LineNr" > 95 < / 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 = "L96" class = "LineNr" > 96 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L97" class = "LineNr" > 97 < / span > 50/push-eax
< span id = "L98" class = "LineNr" > 98 < / span > 51/push-ecx
< span id = "L99" class = "LineNr" > 99 < / span > 52/push-edx
< span id = "L100" class = "LineNr" > 100 < / span > 53/push-ebx
< span id = "L101" class = "LineNr" > 101 < / span > 56/push-esi
< span id = "L102" class = "LineNr" > 102 < / span > 57/push-edi
< span id = "L103" class = "LineNr" > 103 < / span > < span class = "subxComment" > # ecx = ad< / span >
< span id = "L104" class = "LineNr" > 104 < / 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 = "L105" class = "LineNr" > 105 < / span > < span class = "subxComment" > # edx = out< / span >
< span id = "L106" class = "LineNr" > 106 < / span > 8b/copy 1/mod/*+disp8 5/rm32/ebp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 2/r32/edx 0x10/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ebp+16) to edx< / span >
< span id = "L107" class = "LineNr" > 107 < / span > < span class = "subxComment" > # ebx = n< / span >
< span id = "L108" class = "LineNr" > 108 < / 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 = "L109" class = "LineNr" > 109 < / span > < span class = "subxComment" > # out-> alloc-id = Next-alloc-id< / span >
< span id = "L110" class = "LineNr" > 110 < / 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#L33' > Next-alloc-id< / a > < / span > /disp32 < span class = "subxComment" > # copy *Next-alloc-id to eax< / span >
< span id = "L111" class = "LineNr" > 111 < / 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 = "L112" class = "LineNr" > 112 < / span > < span class = "subxComment" > # out-> payload = ad-> curr< / span >
< span id = "L113" class = "LineNr" > 113 < / 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 = "L114" class = "LineNr" > 114 < / span > < span class = "Constant" > $allocate-raw:save-payload-in-eax< / span > :
< span id = "L115" class = "LineNr" > 115 < / 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 = "L116" class = "LineNr" > 116 < / span > < span class = "subxComment" > # *out-> payload = Next-alloc-id< / span >
< span id = "L117" class = "LineNr" > 117 < / 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 = "L118" class = "LineNr" > 118 < / 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#L33' > Next-alloc-id< / a > < / span > /disp32 < span class = "subxComment" > # copy *Next-alloc-id to esi< / span >
< span id = "L119" class = "LineNr" > 119 < / 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 = "L120" class = "LineNr" > 120 < / span > < span class = "Constant" > $allocate-raw:increment-next-alloc-id< / span > :
< span id = "L121" class = "LineNr" > 121 < / span > < span class = "subxComment" > # increment *Next-alloc-id< / span >
< span id = "L122" class = "LineNr" > 122 < / 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#L33' > Next-alloc-id< / a > < / span > /disp32 < span class = "subxComment" > # increment *Next-alloc-id< / span >
< span id = "L123" class = "LineNr" > 123 < / span > < span class = "subxComment" > # check if there's enough space< / span >
< span id = "L124" class = "LineNr" > 124 < / span > < span class = "subxComment" > # TODO: move this check up before any state updates when we support error recovery< / span >
< span id = "L125" class = "LineNr" > 125 < / 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 >
< span id = "L126" class = "LineNr" > 126 < / span > 3b/compare 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" > # compare eax with *(ecx+4)< / span >
< span id = "L127" class = "LineNr" > 127 < / span > 73/jump-if-> =-signed $allocate-raw:< a href = '317abort.subx.html#L5' > abort< / a > /disp8
< span id = "L128" class = "LineNr" > 128 < / span > < span class = "Constant" > $allocate-raw:commit< / span > :
< span id = "L129" class = "LineNr" > 129 < / span > < span class = "subxComment" > # ad-> curr += n+4< / span >
< span id = "L130" class = "LineNr" > 130 < / span > 89/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 eax to *ecx< / span >
< span id = "L131" class = "LineNr" > 131 < / span > < span class = "Constant" > $allocate-raw:end< / span > :
< span id = "L132" class = "LineNr" > 132 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L133" class = "LineNr" > 133 < / span > 5f/pop-to-edi
< span id = "L134" class = "LineNr" > 134 < / span > 5e/pop-to-esi
< span id = "L135" class = "LineNr" > 135 < / span > 5b/pop-to-ebx
< span id = "L136" class = "LineNr" > 136 < / span > 5a/pop-to-edx
< span id = "L137" class = "LineNr" > 137 < / span > 59/pop-to-ecx
< span id = "L138" class = "LineNr" > 138 < / span > 58/pop-to-eax
< span id = "L139" class = "LineNr" > 139 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L140" class = "LineNr" > 140 < / 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 = "L141" class = "LineNr" > 141 < / span > 5d/pop-to-ebp
< span id = "L142" class = "LineNr" > 142 < / span > c3/return
< span id = "L143" class = "LineNr" > 143 < / span >
< span id = "L144" class = "LineNr" > 144 < / span > < span class = "Constant" > $allocate-raw:< a href = '317abort.subx.html#L5' > abort< / a > < / span > :
< span id = "L145" class = "LineNr" > 145 < / span > (< a href = '317abort.subx.html#L5' > abort< / a > < span class = "Constant" > " allocate: failed" < / span > )
< span id = "L146" class = "LineNr" > 146 < / span > < span class = "subxComment" > # never gets here< / span >
< span id = "L147" class = "LineNr" > 147 < / span >
< span id = "L148" class = "LineNr" > 148 < / span > < span class = "subxTest" > test-allocate-raw-success< / span > :
< span id = "L149" class = "LineNr" > 149 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L150" class = "LineNr" > 150 < / span > 55/push-ebp
< span id = "L151" class = "LineNr" > 151 < / 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 = "L152" class = "LineNr" > 152 < / span > < span class = "subxComment" > # var ad/ecx: allocation-descriptor containing 16 bytes< / span >
< span id = "L153" class = "LineNr" > 153 < / span > < span class = "subxS1Comment" > # . var end/ecx: (addr byte)< / span >
< span id = "L154" class = "LineNr" > 154 < / span > 89/< - %ecx 4/r32/esp
< span id = "L155" class = "LineNr" > 155 < / span > < span class = "subxS1Comment" > # . var start/edx: (addr byte) = end - 16< / span >
< span id = "L156" class = "LineNr" > 156 < / span > 81 5/subop/subtract %esp 0x10/imm32
< span id = "L157" class = "LineNr" > 157 < / span > 89/< - %edx 4/r32/esp
< span id = "L158" class = "LineNr" > 158 < / span > < span class = "subxS1Comment" > # . ad = {start, end}< / span >
< span id = "L159" class = "LineNr" > 159 < / span > 51/push-ecx
2021-05-18 20:01:59 +00:00
< span id = "L160" class = "LineNr" > 160 < / span > 52/push-edx
2021-08-16 06:44:43 +00:00
< span id = "L161" class = "LineNr" > 161 < / 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 = "L162" class = "LineNr" > 162 < / span > < span class = "subxComment" > # var expected-payload/ebx = ad-> curr< / span >
< span id = "L163" class = "LineNr" > 163 < / span > 8b/copy 0/mod/indirect 1/rm32/ecx < 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" > # copy *ecx to ebx< / span >
< span id = "L164" class = "LineNr" > 164 < / span > < span class = "subxComment" > # var h/edx: handle = {0, 0}< / span >
< span id = "L165" class = "LineNr" > 165 < / span > 68/push 0/imm32
< span id = "L166" class = "LineNr" > 166 < / span > 68/push 0/imm32
< span id = "L167" class = "LineNr" > 167 < / 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 = "L168" class = "LineNr" > 168 < / span > < span class = "subxComment" > # *Next-alloc-id = 0x34< / span >
< span id = "L169" class = "LineNr" > 169 < / 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#L33' > Next-alloc-id< / a > < / span > /disp32 0x34/imm32 < span class = "subxComment" > # copy to *Next-alloc-id< / span >
< span id = "L170" class = "LineNr" > 170 < / span > < span class = "subxComment" > # allocate-raw(ad, 3, h)< / span >
< span id = "L171" class = "LineNr" > 171 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L172" class = "LineNr" > 172 < / span > 52/push-edx
< span id = "L173" class = "LineNr" > 173 < / span > 68/push 3/imm32
< span id = "L174" class = "LineNr" > 174 < / span > 51/push-ecx
< span id = "L175" class = "LineNr" > 175 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L176" class = "LineNr" > 176 < / span > e8/call < a href = '120allocate.subx.html#L92' > allocate-raw< / 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" > # check-ints-equal(h-> alloc-id, 0x34, msg)< / span >
< span id = "L180" class = "LineNr" > 180 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L181" class = "LineNr" > 181 < / span > 68/push < span class = "Constant" > " F - < a href = '120allocate.subx.html#L148' > test-allocate-raw-success< / a > : sets alloc-id in handle" < / span > /imm32
< span id = "L182" class = "LineNr" > 182 < / span > 68/push 0x34/imm32
< span id = "L183" class = "LineNr" > 183 < / 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 = "L184" class = "LineNr" > 184 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L185" class = "LineNr" > 185 < / span > e8/call < a href = '502test.mu.html#L2' > 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 = "subxComment" > # check-ints-equal(h-> payload, expected-payload, msg)< / span >
< 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" > " F - < a href = '120allocate.subx.html#L148' > test-allocate-raw-success< / a > : sets payload in handle" < / span > /imm32
< span id = "L191" class = "LineNr" > 191 < / span > 53/push-ebx
< span id = "L192" class = "LineNr" > 192 < / 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 = "L193" class = "LineNr" > 193 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L194" class = "LineNr" > 194 < / span > e8/call < a href = '502test.mu.html#L2' > 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 > < span class = "subxComment" > # check-ints-equal(h-> payload-> alloc-id, 0x34, 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" > " F - < a href = '120allocate.subx.html#L148' > test-allocate-raw-success< / a > : sets alloc-id in payload" < / span > /imm32
< span id = "L200" class = "LineNr" > 200 < / span > 68/push 0x34/imm32
< span id = "L201" class = "LineNr" > 201 < / 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 = "L202" class = "LineNr" > 202 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L203" class = "LineNr" > 203 < / span > e8/call < a href = '502test.mu.html#L2' > 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" > # check-ints-equal(*Next-alloc-id, 0x35, msg)< / 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" > " F - < a href = '120allocate.subx.html#L148' > test-allocate-raw-success< / a > : increments Next-alloc-id" < / span > /imm32
< span id = "L209" class = "LineNr" > 209 < / span > 68/push 0x35/imm32
< span id = "L210" class = "LineNr" > 210 < / 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#L33' > Next-alloc-id< / a > < / span > /disp32 < span class = "subxComment" > # push *Next-alloc-id< / span >
< span id = "L211" class = "LineNr" > 211 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L212" class = "LineNr" > 212 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / a > /disp32
< span id = "L213" class = "LineNr" > 213 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L214" class = "LineNr" > 214 < / span > 81 0/subop/add 3/mod/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 = "L215" class = "LineNr" > 215 < / span > < span class = "subxComment" > # check-ints-equal(ad-> curr - expected-payload, 3 + 4 for alloc-id, msg)< / span >
< span id = "L216" class = "LineNr" > 216 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L217" class = "LineNr" > 217 < / span > 68/push < span class = "Constant" > " F - < a href = '120allocate.subx.html#L148' > test-allocate-raw-success< / a > : updates allocation descriptor" < / span > /imm32
< span id = "L218" class = "LineNr" > 218 < / span > 68/push 7/imm32
< span id = "L219" class = "LineNr" > 219 < / 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 = "L220" class = "LineNr" > 220 < / 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 = "L221" class = "LineNr" > 221 < / span > 50/push-eax
< span id = "L222" class = "LineNr" > 222 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L223" class = "LineNr" > 223 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / a > /disp32
< span id = "L224" class = "LineNr" > 224 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L225" class = "LineNr" > 225 < / span > 81 0/subop/add 3/mod/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 = "L226" class = "LineNr" > 226 < / span > < span class = "subxComment" > # clean up< / span >
< span id = "L227" class = "LineNr" > 227 < / 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#L33' > Next-alloc-id< / a > < / span > /disp32 0x100/imm32 < span class = "subxComment" > # copy to *Next-alloc-id< / span >
< span id = "L228" class = "LineNr" > 228 < / span > < span class = "subxS1Comment" > # . reclaim locals< / 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 > 0x20/imm32 < span class = "subxComment" > # add to esp< / span >
< span id = "L230" class = "LineNr" > 230 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L231" class = "LineNr" > 231 < / 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 = "L232" class = "LineNr" > 232 < / span > 5d/pop-to-ebp
< span id = "L233" class = "LineNr" > 233 < / span > c3/return
< span id = "L234" class = "LineNr" > 234 < / span >
< span id = "L235" class = "LineNr" > 235 < / span > < span class = "subxFunction" > lookup< / span > : < span class = "subxComment" > # h: (handle _T) -> result/eax: (addr _T)< / span >
< span id = "L236" class = "LineNr" > 236 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L237" class = "LineNr" > 237 < / span > 55/push-ebp
< span id = "L238" class = "LineNr" > 238 < / 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 = "L239" class = "LineNr" > 239 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L240" class = "LineNr" > 240 < / span > 51/push-ecx
< span id = "L241" class = "LineNr" > 241 < / span > < span class = "subxComment" > # eax = 0< / span >
< span id = "L242" class = "LineNr" > 242 < / span > 31/xor 3/mod/direct 0/rm32/eax < 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" > # clear eax< / span >
< span id = "L243" class = "LineNr" > 243 < / span > < span class = "subxComment" > # ecx = handle-> alloc_id< / span >
< span id = "L244" class = "LineNr" > 244 < / 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 = "L245" class = "LineNr" > 245 < / span > < span class = "subxComment" > # if (ecx == 0) return 0< / span >
< span id = "L246" class = "LineNr" > 246 < / span > 81 7/subop/compare 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 > 0/imm32 < span class = "subxComment" > # compare ecx< / span >
< span id = "L247" class = "LineNr" > 247 < / span > 74/jump-if-= $lookup:end/disp8
< span id = "L248" class = "LineNr" > 248 < / span > < span class = "subxComment" > # eax = handle-> address (payload)< / span >
< span id = "L249" class = "LineNr" > 249 < / 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 = "L250" class = "LineNr" > 250 < / span > < span class = "subxComment" > # if (ecx != *eax) abort< / span >
< span id = "L251" class = "LineNr" > 251 < / span > 39/compare 0/mod/indirect 0/rm32/eax < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 1/r32/ecx < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "subxComment" > # compare *eax and ecx< / span >
< span id = "L252" class = "LineNr" > 252 < / span > 75/jump-if-!= $lookup:< a href = '317abort.subx.html#L5' > abort< / a > /disp8
< span id = "L253" class = "LineNr" > 253 < / span > < span class = "subxComment" > # add 4 to eax< / span >
< span id = "L254" class = "LineNr" > 254 < / span > 05/add-to-eax 4/imm32
< span id = "L255" class = "LineNr" > 255 < / span > < span class = "Constant" > $lookup:end< / span > :
< span id = "L256" class = "LineNr" > 256 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L257" class = "LineNr" > 257 < / span > 59/pop-to-ecx
< span id = "L258" class = "LineNr" > 258 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L259" class = "LineNr" > 259 < / 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 = "L260" class = "LineNr" > 260 < / span > 5d/pop-to-ebp
< span id = "L261" class = "LineNr" > 261 < / span > c3/return
< span id = "L262" class = "LineNr" > 262 < / span >
< span id = "L263" class = "LineNr" > 263 < / span > < span class = "Constant" > $lookup:< a href = '317abort.subx.html#L5' > abort< / a > < / span > :
2021-11-09 17:23:31 +00:00
< span id = "L264" class = "LineNr" > 264 < / span > (< a href = '501draw-text.mu.html#L332' > draw-text-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 < span class = "Constant" > " lookup failed: (" < / span > 3 0) < span class = "subxComment" > # 3=cyan< / span >
< span id = "L265" class = "LineNr" > 265 < / span > (< a href = '501draw-text.mu.html#L387' > draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 *(ebp+8) 3 0)
< span id = "L266" class = "LineNr" > 266 < / span > (< a href = '501draw-text.mu.html#L332' > draw-text-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 < span class = "Constant" > " , " < / span > 3 0)
< span id = "L267" class = "LineNr" > 267 < / span > (< a href = '501draw-text.mu.html#L387' > draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 *(ebp+0xc) 3 0)
< span id = "L268" class = "LineNr" > 268 < / span > (< a href = '501draw-text.mu.html#L332' > draw-text-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 < span class = "Constant" > " ) -> " < / span > 3 0)
< span id = "L269" class = "LineNr" > 269 < / span > (< a href = '501draw-text.mu.html#L387' > draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 *eax 3 0)
< span id = "L270" class = "LineNr" > 270 < / span > (< a href = '501draw-text.mu.html#L332' > draw-text-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 < span class = "Constant" > " . Contents of a few words starting from address 0: " < / span > 3 0)
2021-08-16 06:44:43 +00:00
< span id = "L271" class = "LineNr" > 271 < / span > b8/copy-to-eax 0/imm32
2021-11-09 17:23:31 +00:00
< span id = "L272" class = "LineNr" > 272 < / span > (< a href = '501draw-text.mu.html#L387' > draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 *eax 2 0)
< span id = "L273" class = "LineNr" > 273 < / span > (< a href = '501draw-text.mu.html#L332' > draw-text-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 < span class = "Constant" > " " < / span > 2 0)
2021-05-18 20:01:59 +00:00
< span id = "L274" class = "LineNr" > 274 < / span > 40/increment-eax
2021-11-09 17:23:31 +00:00
< span id = "L275" class = "LineNr" > 275 < / span > (< a href = '501draw-text.mu.html#L387' > draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 *eax 3 0)
< span id = "L276" class = "LineNr" > 276 < / span > (< a href = '501draw-text.mu.html#L332' > draw-text-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 < span class = "Constant" > " " < / span > 2 0)
2021-05-18 20:01:59 +00:00
< span id = "L277" class = "LineNr" > 277 < / span > 40/increment-eax
2021-11-09 17:23:31 +00:00
< span id = "L278" class = "LineNr" > 278 < / span > (< a href = '501draw-text.mu.html#L387' > draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 *eax 3 0)
< span id = "L279" class = "LineNr" > 279 < / span > (< a href = '501draw-text.mu.html#L332' > draw-text-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 < span class = "Constant" > " " < / span > 2 0)
2021-05-18 20:01:59 +00:00
< span id = "L280" class = "LineNr" > 280 < / span > 40/increment-eax
2021-11-09 17:23:31 +00:00
< span id = "L281" class = "LineNr" > 281 < / span > (< a href = '501draw-text.mu.html#L387' > draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 *eax 3 0)
< span id = "L282" class = "LineNr" > 282 < / span > (< a href = '501draw-text.mu.html#L332' > draw-text-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 < span class = "Constant" > " " < / span > 2 0)
2021-08-16 06:44:43 +00:00
< span id = "L283" class = "LineNr" > 283 < / span > 40/increment-eax
2021-11-09 17:23:31 +00:00
< span id = "L284" class = "LineNr" > 284 < / span > (< a href = '501draw-text.mu.html#L387' > draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 *eax 3 0)
< span id = "L285" class = "LineNr" > 285 < / span > (< a href = '501draw-text.mu.html#L332' > draw-text-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 < span class = "Constant" > " " < / span > 2 0)
2021-08-16 06:44:43 +00:00
< span id = "L286" class = "LineNr" > 286 < / span > 40/increment-eax
2021-11-09 17:23:31 +00:00
< span id = "L287" class = "LineNr" > 287 < / span > (< a href = '501draw-text.mu.html#L387' > draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 *eax 3 0)
< span id = "L288" class = "LineNr" > 288 < / span > (< a href = '501draw-text.mu.html#L332' > draw-text-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 < span class = "Constant" > " " < / span > 2 0)
2021-08-16 06:44:43 +00:00
< span id = "L289" class = "LineNr" > 289 < / span > 40/increment-eax
2021-11-09 17:23:31 +00:00
< span id = "L290" class = "LineNr" > 290 < / span > (< a href = '501draw-text.mu.html#L387' > draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 *eax 3 0)
< span id = "L291" class = "LineNr" > 291 < / span > (< a href = '501draw-text.mu.html#L332' > draw-text-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 < span class = "Constant" > " " < / span > 2 0)
2021-08-16 06:44:43 +00:00
< span id = "L292" class = "LineNr" > 292 < / span > 40/increment-eax
2021-11-09 17:23:31 +00:00
< span id = "L293" class = "LineNr" > 293 < / span > (< a href = '501draw-text.mu.html#L387' > draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen< / a > 0 *eax 3 0)
2021-08-16 06:44:43 +00:00
< span id = "L294" class = "LineNr" > 294 < / span > (< a href = '317abort.subx.html#L5' > abort< / a > < span class = "Constant" > " \n" < / span > )
< span id = "L295" class = "LineNr" > 295 < / span > < span class = "subxComment" > # never gets here< / span >
< span id = "L296" class = "LineNr" > 296 < / span >
< span id = "L297" class = "LineNr" > 297 < / span > < span class = "subxTest" > test-lookup-success< / span > :
< span id = "L298" class = "LineNr" > 298 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L299" class = "LineNr" > 299 < / span > 55/push-ebp
< span id = "L300" class = "LineNr" > 300 < / 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 = "L301" class = "LineNr" > 301 < / span > < span class = "subxComment" > # var ad/ebx: allocation-descriptor containing 16 bytes< / span >
< span id = "L302" class = "LineNr" > 302 < / span > < span class = "subxS1Comment" > # . var end/ecx: (addr byte)< / span >
< span id = "L303" class = "LineNr" > 303 < / span > 89/< - %ecx 4/r32/esp
< span id = "L304" class = "LineNr" > 304 < / span > < span class = "subxS1Comment" > # . var start/edx: (addr byte) = end - 16< / span >
< span id = "L305" class = "LineNr" > 305 < / span > 81 5/subop/subtract %esp 0x10/imm32
< span id = "L306" class = "LineNr" > 306 < / span > 89/< - %edx 4/r32/esp
< span id = "L307" class = "LineNr" > 307 < / span > < span class = "subxS1Comment" > # . ad = {start, end}< / span >
< span id = "L308" class = "LineNr" > 308 < / span > 51/push-ecx
< span id = "L309" class = "LineNr" > 309 < / span > 52/push-edx
< span id = "L310" class = "LineNr" > 310 < / span > 89/copy 3/mod/direct 3/rm32/ebx < 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 ebx< / span >
< span id = "L311" class = "LineNr" > 311 < / span > < span class = "subxComment" > # var handle/ecx: handle< / span >
< span id = "L312" class = "LineNr" > 312 < / span > 68/push 0/imm32/address
< span id = "L313" class = "LineNr" > 313 < / span > 68/push 0/imm32/alloc-id
< span id = "L314" class = "LineNr" > 314 < / 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 = "L315" class = "LineNr" > 315 < / span > < span class = "subxComment" > # var old-top/edx = ad-> curr< / span >
< span id = "L316" class = "LineNr" > 316 < / span > 8b/copy 0/mod/indirect 3/rm32/ebx < 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" > # copy *ebx to edx< / span >
< span id = "L317" class = "LineNr" > 317 < / span > < span class = "subxComment" > # allocate-raw(ad, 2, handle)< / span >
< span id = "L318" class = "LineNr" > 318 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L319" class = "LineNr" > 319 < / span > 51/push-ecx
< span id = "L320" class = "LineNr" > 320 < / span > 68/push 2/imm32/size
< span id = "L321" class = "LineNr" > 321 < / span > 53/push-ebx
< span id = "L322" class = "LineNr" > 322 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L323" class = "LineNr" > 323 < / span > e8/call < a href = '120allocate.subx.html#L92' > allocate-raw< / 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 > 0xc/imm32 < span class = "subxComment" > # add to esp< / span >
< span id = "L326" class = "LineNr" > 326 < / span > < span class = "subxComment" > # eax = lookup(handle)< / span >
< span id = "L327" class = "LineNr" > 327 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L328" class = "LineNr" > 328 < / 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 = "L329" class = "LineNr" > 329 < / 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 = "L330" class = "LineNr" > 330 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L331" class = "LineNr" > 331 < / span > e8/call < a href = '120allocate.subx.html#L235' > lookup< / 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" > # eax contains old top of heap, except skipping the alloc-id in the payload< / span >
< span id = "L335" class = "LineNr" > 335 < / span > < span class = "subxS1Comment" > # . check-ints-equal(eax, old-top+4, msg)< / span >
< span id = "L336" class = "LineNr" > 336 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L337" class = "LineNr" > 337 < / span > 68/push < span class = "Constant" > " F - test-lookup-success" < / span > /imm32
< span id = "L338" class = "LineNr" > 338 < / span > 81 0/subop/add 3/mod/direct 2/rm32/edx < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to edx< / span >
< span id = "L339" class = "LineNr" > 339 < / span > 52/push-edx
< span id = "L340" class = "LineNr" > 340 < / span > 50/push-eax
< span id = "L341" class = "LineNr" > 341 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L342" class = "LineNr" > 342 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / 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 > 0xc/imm32 < span class = "subxComment" > # add to esp< / span >
< span id = "L345" class = "LineNr" > 345 < / span > < span class = "subxComment" > # clean up< / span >
< span id = "L346" class = "LineNr" > 346 < / 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#L33' > Next-alloc-id< / a > < / span > /disp32 0x100/imm32 < span class = "subxComment" > # copy to *Next-alloc-id< / span >
< span id = "L347" class = "LineNr" > 347 < / span > < span class = "subxS1Comment" > # . reclaim locals< / 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 > 0x20/imm32 < span class = "subxComment" > # add to esp< / 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
< span id = "L352" class = "LineNr" > 352 < / span > c3/return
< span id = "L353" class = "LineNr" > 353 < / span >
< span id = "L354" class = "LineNr" > 354 < / span > < span class = "subxTest" > test-lookup-null-returns-null< / span > :
< span id = "L355" class = "LineNr" > 355 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L356" class = "LineNr" > 356 < / span > 55/push-ebp
< span id = "L357" class = "LineNr" > 357 < / 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 = "L358" class = "LineNr" > 358 < / span > < span class = "subxComment" > # var handle/ecx: handle< / span >
< span id = "L359" class = "LineNr" > 359 < / span > 68/push 0/imm32/address
< span id = "L360" class = "LineNr" > 360 < / span > 68/push 0/imm32/alloc-id
< span id = "L361" class = "LineNr" > 361 < / 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 = "L362" class = "LineNr" > 362 < / span > < span class = "subxComment" > # eax = lookup(handle)< / span >
< span id = "L363" class = "LineNr" > 363 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< 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 = '120allocate.subx.html#L235' > 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 >
< span id = "L371" class = "LineNr" > 371 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L372" class = "LineNr" > 372 < / span > 68/push < span class = "Constant" > " F - test-lookup-null-returns-null" < / span > /imm32
< 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 = '502test.mu.html#L2' > 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" > # . reclaim locals< / 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 > 8/imm32 < span class = "subxComment" > # add to esp< / span >
< span id = "L381" class = "LineNr" > 381 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L382" class = "LineNr" > 382 < / 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 = "L383" class = "LineNr" > 383 < / span > 5d/pop-to-ebp
< span id = "L384" class = "LineNr" > 384 < / span > c3/return
< span id = "L385" class = "LineNr" > 385 < / span >
< span id = "L386" class = "LineNr" > 386 < / span > < span class = "subxMinorFunction" > _pending-test-lookup-failure< / span > :
< span id = "L387" class = "LineNr" > 387 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L388" class = "LineNr" > 388 < / span > 55/push-ebp
< span id = "L389" class = "LineNr" > 389 < / 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 = "L390" class = "LineNr" > 390 < / span > < span class = "subxComment" > # var ad/ecx: allocation-descriptor containing 16 bytes< / span >
< span id = "L391" class = "LineNr" > 391 < / span > < span class = "subxS1Comment" > # . var end/ecx: (addr byte)< / span >
< span id = "L392" class = "LineNr" > 392 < / span > 89/< - %ecx 4/r32/esp
< span id = "L393" class = "LineNr" > 393 < / span > < span class = "subxS1Comment" > # . var start/edx: (addr byte) = end - 16< / span >
< span id = "L394" class = "LineNr" > 394 < / span > 81 5/subop/subtract %esp 0x10/imm32
< span id = "L395" class = "LineNr" > 395 < / span > 89/< - %edx 4/r32/esp
< span id = "L396" class = "LineNr" > 396 < / span > < span class = "subxS1Comment" > # . ad = {start, end}< / span >
2021-05-18 20:01:59 +00:00
< span id = "L397" class = "LineNr" > 397 < / span > 51/push-ecx
2021-08-16 06:44:43 +00:00
< span id = "L398" class = "LineNr" > 398 < / span > 52/push-edx
< span id = "L399" class = "LineNr" > 399 < / 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 = "L400" class = "LineNr" > 400 < / span > < span class = "subxComment" > # var h1/ecx: handle< / span >
< span id = "L401" class = "LineNr" > 401 < / span > 68/push 0/imm32/address
< span id = "L402" class = "LineNr" > 402 < / span > 68/push 0/imm32/alloc-id
< span id = "L403" class = "LineNr" > 403 < / 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 = "L404" class = "LineNr" > 404 < / span > < span class = "subxComment" > # var old_top/ebx = ad-> curr< / span >
< span id = "L405" class = "LineNr" > 405 < / span > 8b/copy 0/mod/indirect 6/rm32/esi < 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" > # copy *esi to ebx< / span >
< span id = "L406" class = "LineNr" > 406 < / span > < span class = "subxComment" > # first allocation, to h1< / span >
< span id = "L407" class = "LineNr" > 407 < / span > < span class = "subxS1Comment" > # . allocate(ad, 2, h1)< / span >
< span id = "L408" class = "LineNr" > 408 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L409" class = "LineNr" > 409 < / span > 51/push-ecx
< 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 = '120allocate.subx.html#L43' > 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 ad-> curr to mimic reclamation< / span >
< span id = "L417" class = "LineNr" > 417 < / span > 89/copy 0/mod/indirect 6/rm32/esi < 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" > # copy ebx to *esi< / span >
< span id = "L418" class = "LineNr" > 418 < / span > < span class = "subxComment" > # second allocation that returns the same address as the first< / span >
< span id = "L419" class = "LineNr" > 419 < / span > < span class = "subxComment" > # var h2/edx: handle< / span >
< span id = "L420" class = "LineNr" > 420 < / span > 68/push 0/imm32/address
< span id = "L421" class = "LineNr" > 421 < / span > 68/push 0/imm32/alloc-id
< span id = "L422" class = "LineNr" > 422 < / 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 = "L423" class = "LineNr" > 423 < / span > < span class = "subxS1Comment" > # . allocate(ad, 2, h2)< / span >
< span id = "L424" class = "LineNr" > 424 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L425" class = "LineNr" > 425 < / span > 52/push-edx
< 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 = '120allocate.subx.html#L43' > 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-> address, h2-> address, msg)< / span >
< span id = "L433" class = "LineNr" > 433 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L434" class = "LineNr" > 434 < / span > 68/push < span class = "Constant" > " F - test-lookup-failure" < / span > /imm32
< 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 = '502test.mu.html#L2' > 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 >
< span id = "L442" class = "LineNr" > 442 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< 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 = '120allocate.subx.html#L235' > 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 = '120allocate.subx.html#L33' > 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" > # . reclaim locals< / 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 > 0x20/imm32 < span class = "subxComment" > # add to esp< / span >
< span id = "L454" class = "LineNr" > 454 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L455" class = "LineNr" > 455 < / 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 = "L456" class = "LineNr" > 456 < / span > 5d/pop-to-ebp
< span id = "L457" class = "LineNr" > 457 < / span > c3/return
< span id = "L458" class = "LineNr" > 458 < / span >
< span id = "L459" class = "LineNr" > 459 < / span > < span class = "subxComment" > # when comparing handles, just treat them as pure values< / span >
< span id = "L460" class = "LineNr" > 460 < / span > < span class = "subxFunction" > handle-equal?< / span > : < span class = "subxComment" > # a: (handle _T), b: (handle _T) -> result/eax: boolean< / span >
< span id = "L461" class = "LineNr" > 461 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L462" class = "LineNr" > 462 < / span > 55/push-ebp
< span id = "L463" class = "LineNr" > 463 < / 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 = "L464" class = "LineNr" > 464 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L465" class = "LineNr" > 465 < / span > 51/push-ecx
< span id = "L466" class = "LineNr" > 466 < / span > < span class = "subxComment" > # eax = false< / span >
< span id = "L467" class = "LineNr" > 467 < / span > b8/copy-to-eax 0/imm32/false
< span id = "L468" class = "LineNr" > 468 < / span > < span class = "Constant" > $handle-equal?:compare-alloc-id< / span > :
< span id = "L469" class = "LineNr" > 469 < / span > < span class = "subxComment" > # ecx = a-> alloc_id< / span >
< span id = "L470" class = "LineNr" > 470 < / 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 = "L471" class = "LineNr" > 471 < / span > < span class = "subxComment" > # if (ecx != b-> alloc_id) return false< / span >
< span id = "L472" class = "LineNr" > 472 < / span > 39/compare 1/mod/*+disp8 5/rm32/ebp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 1/r32/ecx 0x10/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # compare ecx and *(ebp+16)< / span >
< span id = "L473" class = "LineNr" > 473 < / span > 75/jump-if-!= $handle-equal?:end/disp8
< span id = "L474" class = "LineNr" > 474 < / span > < span class = "Constant" > $handle-equal?:compare-address< / span > :
< span id = "L475" class = "LineNr" > 475 < / span > < span class = "subxComment" > # ecx = handle-> address< / span >
< span id = "L476" class = "LineNr" > 476 < / span > 8b/copy 1/mod/*+disp8 5/rm32/ebp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 1/r32/ecx 0xc/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ebp+12) to ecx< / span >
< span id = "L477" class = "LineNr" > 477 < / span > < span class = "subxComment" > # if (ecx != b-> address) return false< / span >
< span id = "L478" class = "LineNr" > 478 < / span > 39/compare 1/mod/*+disp8 5/rm32/ebp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 1/r32/ecx 0x14/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # compare ecx and *(ebp+20)< / span >
< span id = "L479" class = "LineNr" > 479 < / span > 75/jump-if-!= $handle-equal?:end/disp8
< span id = "L480" class = "LineNr" > 480 < / span > < span class = "Constant" > $handle-equal?:return-true< / span > :
< span id = "L481" class = "LineNr" > 481 < / span > < span class = "subxComment" > # return true< / span >
< span id = "L482" class = "LineNr" > 482 < / span > b8/copy-to-eax 1/imm32/true
< span id = "L483" class = "LineNr" > 483 < / span > < span class = "Constant" > $handle-equal?:end< / span > :
< span id = "L484" class = "LineNr" > 484 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L485" class = "LineNr" > 485 < / span > 59/pop-to-ecx
< span id = "L486" class = "LineNr" > 486 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L487" class = "LineNr" > 487 < / 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 = "L488" class = "LineNr" > 488 < / span > 5d/pop-to-ebp
< span id = "L489" class = "LineNr" > 489 < / span > c3/return
< span id = "L490" class = "LineNr" > 490 < / span >
< span id = "L491" class = "LineNr" > 491 < / span > < span class = "subxFunction" > copy-handle< / span > : < span class = "subxComment" > # src: (handle _T), dest: (addr handle _T)< / span >
< span id = "L492" class = "LineNr" > 492 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L493" class = "LineNr" > 493 < / span > 55/push-ebp
< span id = "L494" class = "LineNr" > 494 < / 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 = "L495" class = "LineNr" > 495 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L496" class = "LineNr" > 496 < / span > 50/push-eax
< span id = "L497" class = "LineNr" > 497 < / span > 51/push-ecx
< span id = "L498" class = "LineNr" > 498 < / span > < span class = "subxComment" > # ecx = dest< / span >
< span id = "L499" class = "LineNr" > 499 < / span > 8b/copy 1/mod/*+disp8 5/rm32/ebp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 1/r32/ecx 0x10/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ebp+16) to ecx< / span >
< span id = "L500" class = "LineNr" > 500 < / span > < span class = "subxComment" > # *dest = src< / span >
< span id = "L501" class = "LineNr" > 501 < / 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 = "L502" class = "LineNr" > 502 < / span > 89/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 eax to *ecx< / span >
< span id = "L503" class = "LineNr" > 503 < / 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 = "L504" class = "LineNr" > 504 < / span > 89/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 eax to *(ecx+4)< / span >
< span id = "L505" class = "LineNr" > 505 < / span > < span class = "Constant" > $copy-handle:end< / span > :
< span id = "L506" class = "LineNr" > 506 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L507" class = "LineNr" > 507 < / span > 59/pop-to-ecx
< span id = "L508" class = "LineNr" > 508 < / span > 58/pop-to-eax
< span id = "L509" class = "LineNr" > 509 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L510" class = "LineNr" > 510 < / 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 = "L511" class = "LineNr" > 511 < / span > 5d/pop-to-ebp
< span id = "L512" class = "LineNr" > 512 < / span > c3/return
< span id = "L513" class = "LineNr" > 513 < / span >
< span id = "L514" class = "LineNr" > 514 < / span > < span class = "subxComment" > # helper: create a nested allocation descriptor (useful for tests)< / span >
< span id = "L515" class = "LineNr" > 515 < / span > < span class = "subxFunction" > allocate-region< / span > : < span class = "subxComment" > # ad: (addr allocation-descriptor), n: int, out: (addr handle allocation-descriptor)< / span >
< span id = "L516" class = "LineNr" > 516 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L517" class = "LineNr" > 517 < / span > 55/push-ebp
< span id = "L518" class = "LineNr" > 518 < / 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 = "L519" class = "LineNr" > 519 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L520" class = "LineNr" > 520 < / span > 50/push-eax
< span id = "L521" class = "LineNr" > 521 < / span > 51/push-ecx
< span id = "L522" class = "LineNr" > 522 < / span > < span class = "subxComment" > # allocate(ad, n, out)< / span >
< span id = "L523" class = "LineNr" > 523 < / span > < span class = "subxS2Comment" > # . . push args< / 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 > 0x10/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # push *(ebp+16)< / span >
< span id = "L525" class = "LineNr" > 525 < / 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 = "L526" class = "LineNr" > 526 < / 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 = "L527" class = "LineNr" > 527 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L528" class = "LineNr" > 528 < / span > e8/call < a href = '120allocate.subx.html#L43' > allocate< / a > /disp32
< span id = "L529" class = "LineNr" > 529 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L530" class = "LineNr" > 530 < / span > 81 0/subop/add 3/mod/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 = "L531" class = "LineNr" > 531 < / span > < span class = "subxComment" > # eax = out-> payload< / span >
< span id = "L532" class = "LineNr" > 532 < / span > 8b/copy 1/mod/*+disp8 5/rm32/ebp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/eax 0x10/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ebp+16) to eax< / span >
< span id = "L533" class = "LineNr" > 533 < / 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 = "L534" class = "LineNr" > 534 < / span > < span class = "subxComment" > # skip payload-> allocid< / span >
< span id = "L535" class = "LineNr" > 535 < / span > 05/add-to-eax 4/imm32
< span id = "L536" class = "LineNr" > 536 < / span > < span class = "subxComment" > # if (eax == 0) abort< / span >
< span id = "L537" class = "LineNr" > 537 < / span > 3d/compare-eax-and 0/imm32
< span id = "L538" class = "LineNr" > 538 < / span > 74/jump-if-= $allocate-region:< a href = '317abort.subx.html#L5' > abort< / a > /disp8
< span id = "L539" class = "LineNr" > 539 < / span > < span class = "subxComment" > # earmark 8 bytes at the start for a new allocation descriptor< / span >
< span id = "L540" class = "LineNr" > 540 < / span > < span class = "subxS1Comment" > # . *eax = eax + 8< / span >
< span id = "L541" class = "LineNr" > 541 < / span > 89/copy 3/mod/direct 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 eax to ecx< / span >
< span id = "L542" class = "LineNr" > 542 < / span > 81 0/subop/add 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 > 8/imm32 < span class = "subxComment" > # add to ecx< / span >
< span id = "L543" class = "LineNr" > 543 < / span > 89/copy 0/mod/indirect 0/rm32/eax < 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 ecx to *eax< / span >
< span id = "L544" class = "LineNr" > 544 < / span > < span class = "subxS1Comment" > # . *(eax+4) = eax + n< / span >
< span id = "L545" class = "LineNr" > 545 < / span > 89/copy 3/mod/direct 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 eax to ecx< / span >
< span id = "L546" class = "LineNr" > 546 < / span > 03/add 1/mod/*+disp8 5/rm32/ebp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 1/r32/ecx 0xc/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # add *(ebp+12) to ecx< / span >
< span id = "L547" class = "LineNr" > 547 < / span > 89/copy 1/mod/*+disp8 0/rm32/eax < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 1/r32/ecx 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy ecx to *(eax+4)< / span >
< span id = "L548" class = "LineNr" > 548 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L549" class = "LineNr" > 549 < / span > 59/pop-to-ecx
< span id = "L550" class = "LineNr" > 550 < / span > 58/pop-to-eax
< span id = "L551" class = "LineNr" > 551 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L552" class = "LineNr" > 552 < / 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 = "L553" class = "LineNr" > 553 < / span > 5d/pop-to-ebp
< span id = "L554" class = "LineNr" > 554 < / span > c3/return
< span id = "L555" class = "LineNr" > 555 < / span >
< span id = "L556" class = "LineNr" > 556 < / span > < span class = "subxComment" > # We could create a more general '$abort' jump target, but then we'd need to do< / span >
< span id = "L557" class = "LineNr" > 557 < / span > < span class = "subxComment" > # a conditional jump followed by loading the error message and an unconditional< / span >
< span id = "L558" class = "LineNr" > 558 < / span > < span class = "subxComment" > # jump. Or we'd need to unconditionally load the error message before a< / span >
< span id = "L559" class = "LineNr" > 559 < / span > < span class = "subxComment" > # conditional jump, even if it's unused the vast majority of the time. This way< / span >
< span id = "L560" class = "LineNr" > 560 < / span > < span class = "subxComment" > # we bloat a potentially cold segment in RAM so we can abort with a single< / span >
< span id = "L561" class = "LineNr" > 561 < / span > < span class = "subxComment" > # instruction.< / span >
< span id = "L562" class = "LineNr" > 562 < / span > < span class = "Constant" > $allocate-region:< a href = '317abort.subx.html#L5' > abort< / a > < / span > :
< span id = "L563" class = "LineNr" > 563 < / span > (< a href = '317abort.subx.html#L5' > abort< / a > < span class = "Constant" > " allocate-region: failed to allocate" < / span > )
< span id = "L564" class = "LineNr" > 564 < / span > < span class = "subxComment" > # never gets here< / span >
< span id = "L565" class = "LineNr" > 565 < / span >
< span id = "L566" class = "LineNr" > 566 < / span > < span class = "subxComment" > # Claim the next 'n+4' bytes of memory and initialize the first 4 to n.< / span >
< span id = "L567" class = "LineNr" > 567 < / span > < span class = "subxComment" > # Abort if there isn't enough memory in 'ad'.< / span >
< span id = "L568" class = "LineNr" > 568 < / span > < span class = "subxFunction" > allocate-array< / span > : < span class = "subxComment" > # ad: (addr allocation-descriptor), n: int, out: (addr handle _)< / span >
< span id = "L569" class = "LineNr" > 569 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L570" class = "LineNr" > 570 < / span > 55/push-ebp
< span id = "L571" class = "LineNr" > 571 < / 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 = "L572" class = "LineNr" > 572 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L573" class = "LineNr" > 573 < / span > 50/push-eax
< span id = "L574" class = "LineNr" > 574 < / span > 51/push-ecx
< span id = "L575" class = "LineNr" > 575 < / span > 52/push-edx
< span id = "L576" class = "LineNr" > 576 < / span > < span class = "subxComment" > # ecx = n< / span >
< span id = "L577" class = "LineNr" > 577 < / span > 8b/copy 1/mod/*+disp8 5/rm32/ebp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 1/r32/ecx 0xc/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ebp+12) to ecx< / span >
< span id = "L578" class = "LineNr" > 578 < / span > < span class = "subxComment" > # var size/edx: int = n+4< / span >
< span id = "L579" class = "LineNr" > 579 < / span > 8d/copy-address 1/mod/*+disp8 1/rm32/ecx < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 2/r32/edx 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy ecx+4 to edx< / span >
< span id = "L580" class = "LineNr" > 580 < / span > < span class = "subxComment" > # allocate(ad, size, out)< / span >
< span id = "L581" class = "LineNr" > 581 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L582" class = "LineNr" > 582 < / 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 = "L583" class = "LineNr" > 583 < / span > 52/push-edx
< span id = "L584" class = "LineNr" > 584 < / 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 = "L585" class = "LineNr" > 585 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L586" class = "LineNr" > 586 < / span > e8/call < a href = '120allocate.subx.html#L43' > allocate< / a > /disp32
< span id = "L587" class = "LineNr" > 587 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L588" class = "LineNr" > 588 < / span > 81 0/subop/add 3/mod/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 = "L589" class = "LineNr" > 589 < / span > < span class = "subxComment" > # *out-> payload = n< / span >
< span id = "L590" class = "LineNr" > 590 < / span > 8b/copy 1/mod/*+disp8 5/rm32/ebp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/eax 0x10/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ebp+16) to eax< / span >
< span id = "L591" class = "LineNr" > 591 < / 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 = "L592" class = "LineNr" > 592 < / span > < span class = "subxS1Comment" > # . skip payload-> allocid< / span >
< span id = "L593" class = "LineNr" > 593 < / span > 05/add-to-eax 4/imm32
< span id = "L594" class = "LineNr" > 594 < / span > < span class = "subxS1Comment" > # .< / span >
< span id = "L595" class = "LineNr" > 595 < / span > 89/copy 0/mod/indirect 0/rm32/eax < 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 ecx to *eax< / span >
< span id = "L596" class = "LineNr" > 596 < / span > < span class = "Constant" > $allocate-array:end< / span > :
< span id = "L597" class = "LineNr" > 597 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L598" class = "LineNr" > 598 < / span > 5a/pop-to-edx
< span id = "L599" class = "LineNr" > 599 < / span > 59/pop-to-ecx
< span id = "L600" class = "LineNr" > 600 < / span > 58/pop-to-eax
< span id = "L601" class = "LineNr" > 601 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L602" class = "LineNr" > 602 < / 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 = "L603" class = "LineNr" > 603 < / span > 5d/pop-to-ebp
< span id = "L604" class = "LineNr" > 604 < / span > c3/return
< span id = "L605" class = "LineNr" > 605 < / span >
< span id = "L606" class = "LineNr" > 606 < / span > < span class = "subxTest" > test-allocate-array< / span > :
< span id = "L607" class = "LineNr" > 607 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L608" class = "LineNr" > 608 < / span > 55/push-ebp
< span id = "L609" class = "LineNr" > 609 < / 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 = "L610" class = "LineNr" > 610 < / span > < span class = "subxComment" > # var ad/ecx: allocation-descriptor containing 16 bytes< / span >
< span id = "L611" class = "LineNr" > 611 < / span > < span class = "subxS1Comment" > # . var end/ecx: (addr byte)< / span >
< span id = "L612" class = "LineNr" > 612 < / span > 89/< - %ecx 4/r32/esp
< span id = "L613" class = "LineNr" > 613 < / span > < span class = "subxS1Comment" > # . var start/edx: (addr byte) = end - 16< / span >
< span id = "L614" class = "LineNr" > 614 < / span > 81 5/subop/subtract %esp 0x10/imm32
< span id = "L615" class = "LineNr" > 615 < / span > 89/< - %edx 4/r32/esp
< span id = "L616" class = "LineNr" > 616 < / span > < span class = "subxS1Comment" > # . ad = {start, end}< / span >
< span id = "L617" class = "LineNr" > 617 < / span > 51/push-ecx
2021-05-18 20:01:59 +00:00
< span id = "L618" class = "LineNr" > 618 < / span > 52/push-edx
2021-08-16 06:44:43 +00:00
< span id = "L619" class = "LineNr" > 619 < / 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 = "L620" class = "LineNr" > 620 < / span > < span class = "subxComment" > # var expected-payload/ebx = ad-> curr< / span >
< span id = "L621" class = "LineNr" > 621 < / span > 8b/copy 0/mod/indirect 1/rm32/ecx < 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" > # copy *ecx to ebx< / span >
< span id = "L622" class = "LineNr" > 622 < / span > < span class = "subxComment" > # var h/edx: handle = {0, 0}< / span >
< span id = "L623" class = "LineNr" > 623 < / span > 68/push 0/imm32
< span id = "L624" class = "LineNr" > 624 < / span > 68/push 0/imm32
< span id = "L625" class = "LineNr" > 625 < / 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 = "L626" class = "LineNr" > 626 < / span > < span class = "subxComment" > # *Next-alloc-id = 0x34< / span >
< span id = "L627" class = "LineNr" > 627 < / 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#L33' > Next-alloc-id< / a > < / span > /disp32 0x34/imm32 < span class = "subxComment" > # copy to *Next-alloc-id< / span >
< span id = "L628" class = "LineNr" > 628 < / span > < span class = "subxComment" > # allocate-array(ad, 3, h)< / span >
< span id = "L629" class = "LineNr" > 629 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L630" class = "LineNr" > 630 < / span > 52/push-edx
< span id = "L631" class = "LineNr" > 631 < / span > 68/push 3/imm32
< span id = "L632" class = "LineNr" > 632 < / span > 51/push-ecx
< span id = "L633" class = "LineNr" > 633 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L634" class = "LineNr" > 634 < / span > e8/call < a href = '120allocate.subx.html#L568' > allocate-array< / a > /disp32
< span id = "L635" class = "LineNr" > 635 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L636" class = "LineNr" > 636 < / span > 81 0/subop/add 3/mod/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 = "L637" class = "LineNr" > 637 < / span > < span class = "subxComment" > # check-ints-equal(h-> alloc-id, 0x34, msg)< / span >
< span id = "L638" class = "LineNr" > 638 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L639" class = "LineNr" > 639 < / span > 68/push < span class = "Constant" > " F - < a href = '120allocate.subx.html#L606' > test-allocate-array< / a > : sets alloc-id in handle" < / span > /imm32
< span id = "L640" class = "LineNr" > 640 < / span > 68/push 0x34/imm32
< span id = "L641" class = "LineNr" > 641 < / 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 = "L642" class = "LineNr" > 642 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L643" class = "LineNr" > 643 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / a > /disp32
< span id = "L644" class = "LineNr" > 644 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L645" class = "LineNr" > 645 < / span > 81 0/subop/add 3/mod/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 = "L646" class = "LineNr" > 646 < / span > < span class = "subxComment" > # check-ints-equal(h-> payload, expected-payload, msg)< / span >
< span id = "L647" class = "LineNr" > 647 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L648" class = "LineNr" > 648 < / span > 68/push < span class = "Constant" > " F - < a href = '120allocate.subx.html#L606' > test-allocate-array< / a > : sets payload in handle" < / span > /imm32
< span id = "L649" class = "LineNr" > 649 < / span > 53/push-ebx
< span id = "L650" class = "LineNr" > 650 < / 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 = "L651" class = "LineNr" > 651 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L652" class = "LineNr" > 652 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / a > /disp32
< span id = "L653" class = "LineNr" > 653 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L654" class = "LineNr" > 654 < / span > 81 0/subop/add 3/mod/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 = "L655" class = "LineNr" > 655 < / span > < span class = "subxComment" > # check-ints-equal(h-> payload-> alloc-id, 0x34, msg)< / span >
< span id = "L656" class = "LineNr" > 656 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L657" class = "LineNr" > 657 < / span > 68/push < span class = "Constant" > " F - < a href = '120allocate.subx.html#L606' > test-allocate-array< / a > : sets alloc-id in payload" < / span > /imm32
< span id = "L658" class = "LineNr" > 658 < / span > 68/push 0x34/imm32
< span id = "L659" class = "LineNr" > 659 < / 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 = "L660" class = "LineNr" > 660 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L661" class = "LineNr" > 661 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / a > /disp32
< span id = "L662" class = "LineNr" > 662 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L663" class = "LineNr" > 663 < / span > 81 0/subop/add 3/mod/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 = "L664" class = "LineNr" > 664 < / span > < span class = "subxComment" > # check-ints-equal(h-> payload-> size, 3, msg)< / span >
< span id = "L665" class = "LineNr" > 665 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L666" class = "LineNr" > 666 < / span > 68/push < span class = "Constant" > " F - < a href = '120allocate.subx.html#L606' > test-allocate-array< / a > : sets array size in payload" < / span > /imm32
< span id = "L667" class = "LineNr" > 667 < / span > 68/push 3/imm32
< span id = "L668" class = "LineNr" > 668 < / 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 = "L669" class = "LineNr" > 669 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L670" class = "LineNr" > 670 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / a > /disp32
< span id = "L671" class = "LineNr" > 671 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L672" class = "LineNr" > 672 < / span > 81 0/subop/add 3/mod/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 = "L673" class = "LineNr" > 673 < / span > < span class = "subxComment" > # check-ints-equal(*Next-alloc-id, 0x35, msg)< / span >
< span id = "L674" class = "LineNr" > 674 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L675" class = "LineNr" > 675 < / span > 68/push < span class = "Constant" > " F - < a href = '120allocate.subx.html#L606' > test-allocate-array< / a > : increments Next-alloc-id" < / span > /imm32
< span id = "L676" class = "LineNr" > 676 < / span > 68/push 0x35/imm32
< span id = "L677" class = "LineNr" > 677 < / 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#L33' > Next-alloc-id< / a > < / span > /disp32 < span class = "subxComment" > # push *Next-alloc-id< / span >
< span id = "L678" class = "LineNr" > 678 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L679" class = "LineNr" > 679 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / a > /disp32
< span id = "L680" class = "LineNr" > 680 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L681" class = "LineNr" > 681 < / span > 81 0/subop/add 3/mod/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 = "L682" class = "LineNr" > 682 < / span > < span class = "subxComment" > # check-ints-equal(ad-> curr - expected-payload, 3 + 4 for alloc-id + 4 for array size, msg)< / span >
< span id = "L683" class = "LineNr" > 683 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L684" class = "LineNr" > 684 < / span > 68/push < span class = "Constant" > " F - < a href = '120allocate.subx.html#L606' > test-allocate-array< / a > : updates allocation descriptor" < / span > /imm32
< span id = "L685" class = "LineNr" > 685 < / span > 68/push 0xb/imm32
< span id = "L686" class = "LineNr" > 686 < / 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 = "L687" class = "LineNr" > 687 < / 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 = "L688" class = "LineNr" > 688 < / span > 50/push-eax
< span id = "L689" class = "LineNr" > 689 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L690" class = "LineNr" > 690 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / a > /disp32
< span id = "L691" class = "LineNr" > 691 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L692" class = "LineNr" > 692 < / span > 81 0/subop/add 3/mod/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 = "L693" class = "LineNr" > 693 < / span > < span class = "subxComment" > # clean up< / span >
< span id = "L694" class = "LineNr" > 694 < / 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#L33' > Next-alloc-id< / a > < / span > /disp32 1/imm32 < span class = "subxComment" > # copy to *Next-alloc-id< / span >
< span id = "L695" class = "LineNr" > 695 < / span > < span class = "subxS1Comment" > # . reclaim locals< / span >
< span id = "L696" class = "LineNr" > 696 < / span > 81 0/subop/add 3/mod/direct 4/rm32/esp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0x20/imm32 < span class = "subxComment" > # add to esp< / span >
< span id = "L697" class = "LineNr" > 697 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L698" class = "LineNr" > 698 < / 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 = "L699" class = "LineNr" > 699 < / span > 5d/pop-to-ebp
< span id = "L700" class = "LineNr" > 700 < / span > c3/return
< span id = "L701" class = "LineNr" > 701 < / span >
< span id = "L702" class = "LineNr" > 702 < / span > < span class = "subxFunction" > copy-array< / span > : < span class = "subxComment" > # ad: (addr allocation-descriptor), src: (addr array _T), out: (addr handle array _T)< / span >
< span id = "L703" class = "LineNr" > 703 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L704" class = "LineNr" > 704 < / span > 55/push-ebp
< span id = "L705" class = "LineNr" > 705 < / 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 = "L706" class = "LineNr" > 706 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L707" class = "LineNr" > 707 < / span > 50/push-eax
< span id = "L708" class = "LineNr" > 708 < / span > 51/push-ecx
< span id = "L709" class = "LineNr" > 709 < / span > 52/push-edx
< span id = "L710" class = "LineNr" > 710 < / span > 56/push-esi
< span id = "L711" class = "LineNr" > 711 < / span > < span class = "subxComment" > # esi = src< / span >
< span id = "L712" class = "LineNr" > 712 < / span > 8b/copy 1/mod/*+disp8 5/rm32/ebp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 6/r32/esi 0xc/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ebp+12) to esi< / span >
< span id = "L713" class = "LineNr" > 713 < / span > < span class = "subxComment" > # var size/ecx: int = src-> size+4< / span >
< span id = "L714" class = "LineNr" > 714 < / 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 = "Normal" > . < / span > < span class = "subxComment" > # copy *esi to ecx< / span >
< span id = "L715" class = "LineNr" > 715 < / span > 81 0/subop/add 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 > 4/imm32 < span class = "subxComment" > # add to ecx< / span >
< span id = "L716" class = "LineNr" > 716 < / span > < span class = "subxComment" > # allocate(ad, size, out)< / span >
< span id = "L717" class = "LineNr" > 717 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L718" class = "LineNr" > 718 < / 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 = "L719" class = "LineNr" > 719 < / span > 51/push-ecx
< span id = "L720" class = "LineNr" > 720 < / 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 = "L721" class = "LineNr" > 721 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L722" class = "LineNr" > 722 < / span > e8/call < a href = '120allocate.subx.html#L43' > allocate< / 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 > 0xc/imm32 < span class = "subxComment" > # add to esp< / span >
< span id = "L725" class = "LineNr" > 725 < / span > < span class = "subxComment" > # var payload/eax: (addr byte) = out-> payload< / span >
< span id = "L726" class = "LineNr" > 726 < / span > 8b/copy 1/mod/*+disp8 5/rm32/ebp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/eax 0x10/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ebp+16) to eax< / span >
< span id = "L727" class = "LineNr" > 727 < / 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 = "L728" class = "LineNr" > 728 < / span > < span class = "subxS1Comment" > # . skip payload-> allocid< / span >
< span id = "L729" class = "LineNr" > 729 < / span > 05/add-to-eax 4/imm32
< span id = "L730" class = "LineNr" > 730 < / span > < span class = "subxComment" > # var max/ecx: (addr byte) = payload + size< / span >
< span id = "L731" class = "LineNr" > 731 < / span > 01/add 3/mod/direct 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" > # add eax to ecx< / span >
< span id = "L732" class = "LineNr" > 732 < / span > < span class = "subxComment" > # _append-4(payload, max, src, & src-> data[src-> size])< / span >
< span id = "L733" class = "LineNr" > 733 < / span > < span class = "subxS2Comment" > # . . push & src-> data[src-> size]< / span >
< span id = "L734" class = "LineNr" > 734 < / span > 8b/copy 0/mod/indirect 6/rm32/esi < 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" > # copy *esi to edx< / span >
< span id = "L735" class = "LineNr" > 735 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 6/base/esi 2/index/edx < span class = "Normal" > . < / span > 2/r32/edx 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy esi+edx+4 to edx< / span >
< span id = "L736" class = "LineNr" > 736 < / span > 52/push-edx
< span id = "L737" class = "LineNr" > 737 < / span > < span class = "subxS2Comment" > # . . push src< / span >
< span id = "L738" class = "LineNr" > 738 < / span > 56/push-esi
< span id = "L739" class = "LineNr" > 739 < / span > < span class = "subxS2Comment" > # . . push max< / span >
< span id = "L740" class = "LineNr" > 740 < / span > 51/push-ecx
< span id = "L741" class = "LineNr" > 741 < / span > < span class = "subxS2Comment" > # . . push payload< / span >
< span id = "L742" class = "LineNr" > 742 < / span > 50/push-eax
< span id = "L743" class = "LineNr" > 743 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L744" class = "LineNr" > 744 < / span > e8/call < a href = '108write.subx.html#L257' > _append-4< / a > /disp32
< span id = "L745" class = "LineNr" > 745 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L746" class = "LineNr" > 746 < / span > 81 0/subop/add 3/mod/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 = "L747" class = "LineNr" > 747 < / span > < span class = "Constant" > $copy-array:end< / span > :
< span id = "L748" class = "LineNr" > 748 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L749" class = "LineNr" > 749 < / span > 5e/pop-to-esi
< span id = "L750" class = "LineNr" > 750 < / span > 5a/pop-to-edx
< span id = "L751" class = "LineNr" > 751 < / span > 59/pop-to-ecx
< span id = "L752" class = "LineNr" > 752 < / span > 58/pop-to-eax
< span id = "L753" class = "LineNr" > 753 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L754" class = "LineNr" > 754 < / 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 = "L755" class = "LineNr" > 755 < / span > 5d/pop-to-ebp
< span id = "L756" class = "LineNr" > 756 < / span > c3/return
< span id = "L757" class = "LineNr" > 757 < / span >
< span id = "L758" class = "LineNr" > 758 < / span > < span class = "subxTest" > test-copy-array< / span > :
< span id = "L759" class = "LineNr" > 759 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L760" class = "LineNr" > 760 < / span > 55/push-ebp
< span id = "L761" class = "LineNr" > 761 < / 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 = "L762" class = "LineNr" > 762 < / span > < span class = "subxComment" > # var src/esi: (addr array int) = [3, 4, 5]< / span >
< span id = "L763" class = "LineNr" > 763 < / span > 68/push 5/imm32
< span id = "L764" class = "LineNr" > 764 < / span > 68/push 4/imm32
< span id = "L765" class = "LineNr" > 765 < / span > 68/push 3/imm32
< span id = "L766" class = "LineNr" > 766 < / span > 68/push 0xc/imm32/size
< span id = "L767" class = "LineNr" > 767 < / span > 89/copy 3/mod/direct 6/rm32/esi < 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 esi< / span >
< span id = "L768" class = "LineNr" > 768 < / span > < span class = "subxComment" > # var ad/ecx: allocation-descriptor containing 32 bytes< / span >
< span id = "L769" class = "LineNr" > 769 < / span > < span class = "subxS1Comment" > # . var end/ecx: (addr byte)< / span >
< span id = "L770" class = "LineNr" > 770 < / span > 89/< - %ecx 4/r32/esp
< span id = "L771" class = "LineNr" > 771 < / span > < span class = "subxS1Comment" > # . var start/edx: (addr byte) = end - 32< / span >
< span id = "L772" class = "LineNr" > 772 < / span > 81 5/subop/subtract %esp 0x20/imm32
< span id = "L773" class = "LineNr" > 773 < / span > 89/< - %edx 4/r32/esp
< span id = "L774" class = "LineNr" > 774 < / span > < span class = "subxS1Comment" > # . ad = {start, end}< / span >
< span id = "L775" class = "LineNr" > 775 < / span > 51/push-ecx
2021-05-18 20:01:59 +00:00
< span id = "L776" class = "LineNr" > 776 < / span > 52/push-edx
2021-08-16 06:44:43 +00:00
< span id = "L777" class = "LineNr" > 777 < / 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 = "L778" class = "LineNr" > 778 < / span > < span class = "subxComment" > # var expected-payload/ebx = ad-> curr< / span >
< span id = "L779" class = "LineNr" > 779 < / span > 8b/copy 0/mod/indirect 1/rm32/ecx < 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" > # copy *ecx to ebx< / span >
< span id = "L780" class = "LineNr" > 780 < / span > < span class = "subxComment" > # var h/edx: handle = {0, 0}< / span >
< span id = "L781" class = "LineNr" > 781 < / span > 68/push 0/imm32
< span id = "L782" class = "LineNr" > 782 < / span > 68/push 0/imm32
< span id = "L783" class = "LineNr" > 783 < / 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 = "L784" class = "LineNr" > 784 < / span > < span class = "subxComment" > # *Next-alloc-id = 0x34< / span >
< span id = "L785" class = "LineNr" > 785 < / 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#L33' > Next-alloc-id< / a > < / span > /disp32 0x34/imm32 < span class = "subxComment" > # copy to *Next-alloc-id< / span >
< span id = "L786" class = "LineNr" > 786 < / span > < span class = "subxComment" > # copy-array(ad, src, h)< / span >
< span id = "L787" class = "LineNr" > 787 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L788" class = "LineNr" > 788 < / span > 52/push-edx
< span id = "L789" class = "LineNr" > 789 < / span > 56/push-esi
< span id = "L790" class = "LineNr" > 790 < / span > 51/push-ecx
< span id = "L791" class = "LineNr" > 791 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L792" class = "LineNr" > 792 < / span > e8/call < a href = '120allocate.subx.html#L702' > copy-array< / a > /disp32
< span id = "L793" class = "LineNr" > 793 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L794" class = "LineNr" > 794 < / span > 81 0/subop/add 3/mod/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 = "L795" class = "LineNr" > 795 < / span > < span class = "subxComment" > # check-ints-equal(h-> alloc-id, 0x34, msg)< / span >
< span id = "L796" class = "LineNr" > 796 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L797" class = "LineNr" > 797 < / span > 68/push < span class = "Constant" > " F - < a href = '120allocate.subx.html#L758' > test-copy-array< / a > : sets alloc-id in handle" < / span > /imm32
< span id = "L798" class = "LineNr" > 798 < / span > 68/push 0x34/imm32
< span id = "L799" class = "LineNr" > 799 < / 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 = "L800" class = "LineNr" > 800 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L801" class = "LineNr" > 801 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / a > /disp32
< span id = "L802" class = "LineNr" > 802 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L803" class = "LineNr" > 803 < / span > 81 0/subop/add 3/mod/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 = "L804" class = "LineNr" > 804 < / span > < span class = "subxComment" > # check-ints-equal(h-> payload, expected-payload, msg)< / span >
< span id = "L805" class = "LineNr" > 805 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L806" class = "LineNr" > 806 < / span > 68/push < span class = "Constant" > " F - < a href = '120allocate.subx.html#L758' > test-copy-array< / a > : sets payload in handle" < / span > /imm32
< span id = "L807" class = "LineNr" > 807 < / span > 53/push-ebx
< span id = "L808" class = "LineNr" > 808 < / 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 = "L809" class = "LineNr" > 809 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L810" class = "LineNr" > 810 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / a > /disp32
< span id = "L811" class = "LineNr" > 811 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L812" class = "LineNr" > 812 < / span > 81 0/subop/add 3/mod/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 = "L813" class = "LineNr" > 813 < / span > < span class = "subxComment" > # check-ints-equal(h-> payload-> alloc-id, 0x34, msg)< / span >
< span id = "L814" class = "LineNr" > 814 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L815" class = "LineNr" > 815 < / span > 68/push < span class = "Constant" > " F - < a href = '120allocate.subx.html#L758' > test-copy-array< / a > : sets alloc-id in payload" < / span > /imm32
< span id = "L816" class = "LineNr" > 816 < / span > 68/push 0x34/imm32
< span id = "L817" class = "LineNr" > 817 < / 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 = "L818" class = "LineNr" > 818 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L819" class = "LineNr" > 819 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / a > /disp32
< span id = "L820" class = "LineNr" > 820 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L821" class = "LineNr" > 821 < / span > 81 0/subop/add 3/mod/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 = "L822" class = "LineNr" > 822 < / span > < span class = "subxComment" > # var payload/eax: (addr int) = lookup(h)< / span >
< span id = "L823" class = "LineNr" > 823 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L824" class = "LineNr" > 824 < / 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 = "L825" class = "LineNr" > 825 < / 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 = "L826" class = "LineNr" > 826 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L827" class = "LineNr" > 827 < / span > e8/call < a href = '120allocate.subx.html#L235' > lookup< / a > /disp32
< span id = "L828" class = "LineNr" > 828 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L829" class = "LineNr" > 829 < / span > 81 0/subop/add 3/mod/direct 4/rm32/esp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to esp< / span >
< span id = "L830" class = "LineNr" > 830 < / span > < span class = "subxComment" > # check-ints-equal(payload-> size, 0xc, msg)< / span >
< span id = "L831" class = "LineNr" > 831 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L832" class = "LineNr" > 832 < / span > 68/push < span class = "Constant" > " F - < a href = '120allocate.subx.html#L758' > test-copy-array< / a > : sets array size in payload" < / span > /imm32
< span id = "L833" class = "LineNr" > 833 < / span > 68/push 0xc/imm32
< span id = "L834" class = "LineNr" > 834 < / 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 = "L835" class = "LineNr" > 835 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L836" class = "LineNr" > 836 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / a > /disp32
< span id = "L837" class = "LineNr" > 837 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L838" class = "LineNr" > 838 < / span > 81 0/subop/add 3/mod/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 = "L839" class = "LineNr" > 839 < / span > < span class = "subxComment" > # check-ints-equal(*Next-alloc-id, 0x35, msg)< / span >
< span id = "L840" class = "LineNr" > 840 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L841" class = "LineNr" > 841 < / span > 68/push < span class = "Constant" > " F - < a href = '120allocate.subx.html#L758' > test-copy-array< / a > : increments Next-alloc-id" < / span > /imm32
< span id = "L842" class = "LineNr" > 842 < / span > 68/push 0x35/imm32
< span id = "L843" class = "LineNr" > 843 < / 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#L33' > Next-alloc-id< / a > < / span > /disp32 < span class = "subxComment" > # push *Next-alloc-id< / span >
< span id = "L844" class = "LineNr" > 844 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L845" class = "LineNr" > 845 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / a > /disp32
< span id = "L846" class = "LineNr" > 846 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L847" class = "LineNr" > 847 < / span > 81 0/subop/add 3/mod/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 = "L848" class = "LineNr" > 848 < / span > < span class = "subxComment" > # check-ints-equal(ad-> curr - expected-payload, 12 + 4 for alloc-id + 4 for size, msg)< / span >
< span id = "L849" class = "LineNr" > 849 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L850" class = "LineNr" > 850 < / span > 68/push < span class = "Constant" > " F - < a href = '120allocate.subx.html#L758' > test-copy-array< / a > : updates allocation descriptor" < / span > /imm32
< span id = "L851" class = "LineNr" > 851 < / span > 68/push 0x14/imm32
< span id = "L852" class = "LineNr" > 852 < / 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 = "L853" class = "LineNr" > 853 < / 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 = "L854" class = "LineNr" > 854 < / span > 50/push-eax
< span id = "L855" class = "LineNr" > 855 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L856" class = "LineNr" > 856 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / 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 > 0xc/imm32 < span class = "subxComment" > # add to esp< / span >
< span id = "L859" class = "LineNr" > 859 < / span > < span class = "subxComment" > # clean up< / span >
< span id = "L860" class = "LineNr" > 860 < / 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#L33' > Next-alloc-id< / a > < / span > /disp32 1/imm32 < span class = "subxComment" > # copy to *Next-alloc-id< / span >
< span id = "L861" class = "LineNr" > 861 < / span > < span class = "subxS1Comment" > # . reclaim locals< / span >
< span id = "L862" class = "LineNr" > 862 < / span > 81 0/subop/add 3/mod/direct 4/rm32/esp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0x40/imm32 < span class = "subxComment" > # add to esp< / span >
< span id = "L863" class = "LineNr" > 863 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L864" class = "LineNr" > 864 < / 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 = "L865" class = "LineNr" > 865 < / span > 5d/pop-to-ebp
< span id = "L866" class = "LineNr" > 866 < / span > c3/return
< span id = "L867" class = "LineNr" > 867 < / span >
< span id = "L868" class = "LineNr" > 868 < / span > < span class = "subxComment" > # Fill a region of memory with zeroes.< / span >
< span id = "L869" class = "LineNr" > 869 < / span > < span class = "subxFunction" > zero-out< / span > : < span class = "subxComment" > # start: (addr byte), size: int< / span >
< span id = "L870" class = "LineNr" > 870 < / span > < span class = "subxComment" > # pseudocode:< / span >
< span id = "L871" class = "LineNr" > 871 < / span > < span class = "subxComment" > # curr/esi = start< / span >
< span id = "L872" class = "LineNr" > 872 < / span > < span class = "subxComment" > # i/ecx = 0< / span >
< span id = "L873" class = "LineNr" > 873 < / span > < span class = "subxComment" > # while true< / span >
< span id = "L874" class = "LineNr" > 874 < / span > < span class = "subxComment" > # if (i > = size) break< / span >
< span id = "L875" class = "LineNr" > 875 < / span > < span class = "subxComment" > # *curr = 0< / span >
< span id = "L876" class = "LineNr" > 876 < / span > < span class = "subxComment" > # ++curr< / span >
< span id = "L877" class = "LineNr" > 877 < / span > < span class = "subxComment" > # ++i< / span >
< span id = "L878" class = "LineNr" > 878 < / span > < span class = "subxComment" > #< / span >
< span id = "L879" class = "LineNr" > 879 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L880" class = "LineNr" > 880 < / span > 55/push-ebp
< span id = "L881" class = "LineNr" > 881 < / 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 = "L882" class = "LineNr" > 882 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L883" class = "LineNr" > 883 < / span > 50/push-eax
< span id = "L884" class = "LineNr" > 884 < / span > 51/push-ecx
< span id = "L885" class = "LineNr" > 885 < / span > 52/push-edx
< span id = "L886" class = "LineNr" > 886 < / span > 56/push-esi
< span id = "L887" class = "LineNr" > 887 < / span > < span class = "subxComment" > # curr/esi = start< / span >
< span id = "L888" class = "LineNr" > 888 < / 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 = "L889" class = "LineNr" > 889 < / span > < span class = "subxComment" > # var i/ecx: int = 0< / span >
< span id = "L890" class = "LineNr" > 890 < / 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 = "L891" class = "LineNr" > 891 < / span > < span class = "subxComment" > # edx = size< / span >
< span id = "L892" class = "LineNr" > 892 < / 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 = "L893" class = "LineNr" > 893 < / span > < span class = "Constant" > $zero-out:loop< / span > :
< span id = "L894" class = "LineNr" > 894 < / span > < span class = "subxComment" > # if (i > = size) break< / span >
< span id = "L895" class = "LineNr" > 895 < / 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 = "L896" class = "LineNr" > 896 < / span > 7d/jump-if-> = $zero-out:end/disp8
< span id = "L897" class = "LineNr" > 897 < / span > < span class = "subxComment" > # *curr = 0< / span >
< span id = "L898" class = "LineNr" > 898 < / span > c6 0/subop/copy-byte 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 = "L899" class = "LineNr" > 899 < / span > < span class = "subxComment" > # ++curr< / span >
< span id = "L900" class = "LineNr" > 900 < / span > 46/increment-esi
< span id = "L901" class = "LineNr" > 901 < / span > < span class = "subxComment" > # ++i< / span >
< span id = "L902" class = "LineNr" > 902 < / span > 41/increment-ecx
< span id = "L903" class = "LineNr" > 903 < / span > eb/jump $zero-out:< span class = "Constant" > loop< / span > /disp8
< span id = "L904" class = "LineNr" > 904 < / span > < span class = "Constant" > $zero-out:end< / span > :
< span id = "L905" class = "LineNr" > 905 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L906" class = "LineNr" > 906 < / span > 5e/pop-to-esi
< span id = "L907" class = "LineNr" > 907 < / span > 5a/pop-to-edx
< span id = "L908" class = "LineNr" > 908 < / span > 59/pop-to-ecx
< span id = "L909" class = "LineNr" > 909 < / span > 58/pop-to-eax
< span id = "L910" class = "LineNr" > 910 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L911" class = "LineNr" > 911 < / 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 = "L912" class = "LineNr" > 912 < / span > 5d/pop-to-ebp
< span id = "L913" class = "LineNr" > 913 < / span > c3/return
< span id = "L914" class = "LineNr" > 914 < / span >
< span id = "L915" class = "LineNr" > 915 < / span > < span class = "subxTest" > test-zero-out< / span > :
< span id = "L916" class = "LineNr" > 916 < / span > < span class = "subxS1Comment" > # . prologue< / span >
< span id = "L917" class = "LineNr" > 917 < / span > 55/push-ebp
< span id = "L918" class = "LineNr" > 918 < / 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 = "L919" class = "LineNr" > 919 < / span > < span class = "subxComment" > # region/ecx = 34, 35, 36, 37< / span >
< span id = "L920" class = "LineNr" > 920 < / span > 68/push 0x37363534/imm32
< span id = "L921" class = "LineNr" > 921 < / 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 = "L922" class = "LineNr" > 922 < / span > < span class = "subxComment" > # zero-out(ecx, 3)< / span >
< span id = "L923" class = "LineNr" > 923 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L924" class = "LineNr" > 924 < / span > 68/push 3/imm32/size
< span id = "L925" class = "LineNr" > 925 < / span > 51/push-ecx
< span id = "L926" class = "LineNr" > 926 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L927" class = "LineNr" > 927 < / span > e8/call < a href = '120allocate.subx.html#L869' > zero-out< / a > /disp32
< span id = "L928" class = "LineNr" > 928 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L929" class = "LineNr" > 929 < / span > 81 0/subop/add 3/mod/direct 4/rm32/esp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to esp< / span >
< span id = "L930" class = "LineNr" > 930 < / span > < span class = "subxComment" > # first 3 bytes cleared, fourth left alone< / span >
< span id = "L931" class = "LineNr" > 931 < / span > < span class = "subxS1Comment" > # . check-ints-equal(*ecx, 0x37000000, msg)< / span >
< span id = "L932" class = "LineNr" > 932 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L933" class = "LineNr" > 933 < / span > 68/push < span class = "Constant" > " F - test-zero-out" < / span > /imm32
< span id = "L934" class = "LineNr" > 934 < / span > 68/push 0x37000000/imm32
< span id = "L935" class = "LineNr" > 935 < / 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 = "L936" class = "LineNr" > 936 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L937" class = "LineNr" > 937 < / span > e8/call < a href = '502test.mu.html#L2' > check-ints-equal< / a > /disp32
< span id = "L938" class = "LineNr" > 938 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L939" class = "LineNr" > 939 < / span > 81 0/subop/add 3/mod/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 = "L940" class = "LineNr" > 940 < / span > < span class = "subxS1Comment" > # . reclaim locals< / span >
< span id = "L941" class = "LineNr" > 941 < / span > 81 0/subop/add 3/mod/direct 4/rm32/esp < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to esp< / span >
< span id = "L942" class = "LineNr" > 942 < / span > < span class = "subxS1Comment" > # . epilogue< / span >
< span id = "L943" class = "LineNr" > 943 < / 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 = "L944" class = "LineNr" > 944 < / span > 5d/pop-to-ebp
< span id = "L945" class = "LineNr" > 945 < / span > c3/return
< span id = "L946" class = "LineNr" > 946 < / span >
< span id = "L947" class = "LineNr" > 947 < / span > < span class = "subxS2Comment" > # . . vim: nowrap:textwidth=0< / span >
2018-12-29 23:27:18 +00:00
< / pre >
< / body >
< / html >
<!-- vim: set foldmethod=manual : -->