2019-04-24 03:51:58 +00:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
< html >
< head >
< meta http-equiv = "content-type" content = "text/html; charset=UTF-8" >
2019-07-28 01:26:18 +00:00
< title > Mu - apps/dquotes.subx< / title >
2019-07-14 16:42:36 +00:00
< meta name = "Generator" content = "Vim/8.1" >
< meta name = "plugin-version" content = "vim8.1_v1" >
2019-04-24 03:51:58 +00:00
< meta name = "syntax" content = "none" >
< meta name = "settings" content = "number_lines,use_css,no_foldcolumn,expand_tabs,line_ids,prevent_copy=" >
< meta name = "colorscheme" content = "minimal-light" >
< style type = "text/css" >
<!--
pre { font-family: monospace; color: #000000; background-color: #c6c6c6; }
body { font-size:12pt; font-family: monospace; color: #000000; background-color: #c6c6c6; }
a { color:inherit; }
* { font-size:12pt; font-size: 1em; }
2019-07-14 16:42:36 +00:00
.Folded { color: #080808; background-color: #949494; }
.subxH1Comment { color: #005faf; text-decoration: underline; }
2019-04-24 03:51:58 +00:00
.subxComment { color: #005faf; }
.subxS1Comment { color: #0000af; }
2019-07-14 16:42:36 +00:00
.LineNr { }
2019-04-24 03:51:58 +00:00
.SpecialChar { color: #d70000; }
.Normal { color: #000000; background-color: #c6c6c6; padding-bottom: 1px; }
.subxTest { color: #5f8700; }
2019-07-14 16:42:36 +00:00
.subxFunction { color: #af5f00; text-decoration: underline; }
.Constant { color: #008787; }
.subxMinorFunction { color: #875f5f; }
.subxS2Comment { color: #8a8a8a; }
2019-04-24 03:51:58 +00:00
-->
< / style >
< script type = 'text/javascript' >
<!--
/* function to open any folds containing a jumped-to line before jumping to it */
function JumpToLine()
{
var lineNum;
lineNum = window.location.hash;
lineNum = lineNum.substr(1); /* strip off '#' */
if (lineNum.indexOf('L') == -1) {
lineNum = 'L'+lineNum;
}
2019-07-14 16:42:36 +00:00
var lineElem = document.getElementById(lineNum);
2019-04-24 03:51:58 +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();' >
2019-07-28 01:26:18 +00:00
< a href = 'https://github.com/akkartik/mu/blob/master/apps/dquotes.subx' > https://github.com/akkartik/mu/blob/master/apps/dquotes.subx< / a >
2019-04-24 03:51:58 +00:00
< pre id = 'vimCodeElement' >
< span id = "L1" class = "LineNr" > 1 < / span > < span class = "subxComment" > # Translate literal strings within double quotes.< / span >
< span id = "L2" class = "LineNr" > 2 < / span > < span class = "subxComment" > # Replace them with references to new variables in the data segment.< / span >
< span id = "L3" class = "LineNr" > 3 < / span > < span class = "subxComment" > #< / span >
< span id = "L4" class = "LineNr" > 4 < / span > < span class = "subxComment" > # To run (from the subx/ directory):< / span >
2019-07-25 07:08:23 +00:00
< span id = "L5" class = "LineNr" > 5 < / span > < span class = "subxComment" > # $ ./subx translate *.subx apps/dquotes.subx -o apps/dquotes< / span >
2019-04-24 03:51:58 +00:00
< span id = "L6" class = "LineNr" > 6 < / span > < span class = "subxComment" > # $ cat x< / span >
< span id = "L7" class = "LineNr" > 7 < / span > < span class = "subxComment" > # == code< / span >
< span id = "L8" class = "LineNr" > 8 < / span > < span class = "subxComment" > # ab " cd ef" /imm32< / span >
2019-07-25 07:08:23 +00:00
< span id = "L9" class = "LineNr" > 9 < / span > < span class = "subxComment" > # $ cat x |./subx run apps/dquotes< / span >
2019-04-24 03:51:58 +00:00
< span id = "L10" class = "LineNr" > 10 < / span > < span class = "subxComment" > # == code< / span >
< span id = "L11" class = "LineNr" > 11 < / span > < span class = "subxComment" > # ab __string1/imm32< / span >
< span id = "L12" class = "LineNr" > 12 < / span > < span class = "subxComment" > # == data< / span >
< span id = "L13" class = "LineNr" > 13 < / span > < span class = "subxComment" > # __string1:< / span >
< span id = "L14" class = "LineNr" > 14 < / span > < span class = "subxComment" > # 5/imm32< / span >
< span id = "L15" class = "LineNr" > 15 < / span > < span class = "subxComment" > # 0x63/c 0x64/d 0x20/ 0x65/e 0x66/f< / span >
< span id = "L16" class = "LineNr" > 16 < / span >
< span id = "L17" class = "LineNr" > 17 < / span > == code
< span id = "L18" class = "LineNr" > 18 < / span > < span class = "subxComment" > # instruction effective address register displacement immediate< / span >
< span id = "L19" class = "LineNr" > 19 < / span > < span class = "subxS1Comment" > # . op subop mod rm32 base index scale r32< / span >
< span id = "L20" class = "LineNr" > 20 < / 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 = "L21" class = "LineNr" > 21 < / span >
2019-05-20 08:44:06 +00:00
< span id = "L22" class = "LineNr" > 22 < / span > < span class = "SpecialChar" > Entry< / span > :
< span id = "L23" class = "LineNr" > 23 < / span > < span class = "subxComment" > # initialize heap< / span >
2019-07-25 07:08:23 +00:00
< span id = "L24" class = "LineNr" > 24 < / span > < span class = "subxS1Comment" > # . Heap = new-segment(Heap-size)< / span >
2019-05-20 08:44:06 +00:00
< span id = "L25" class = "LineNr" > 25 < / span > < span class = "subxS2Comment" > # . . push args< / span >
2019-07-14 16:42:36 +00:00
< span id = "L26" class = "LineNr" > 26 < / span > 68/push < span class = "SpecialChar" > < a href = '../075array-equal.subx.html#L623' > Heap< / a > < / span > /imm32
2019-07-25 07:08:23 +00:00
< span id = "L27" class = "LineNr" > 27 < / 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" > Heap-size< / span > /disp32 < span class = "subxComment" > # push *Heap-size< / span >
2019-05-20 08:44:06 +00:00
< span id = "L28" class = "LineNr" > 28 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L29" class = "LineNr" > 29 < / span > e8/call < a href = '../053new-segment.subx.html#L41' > new-segment< / a > /disp32
< span id = "L30" class = "LineNr" > 30 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L31" class = "LineNr" > 31 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L32" class = "LineNr" > 32 < / span >
2019-07-14 16:42:36 +00:00
< span id = "L33" class = "LineNr" > 33 < / span > < span class = "subxComment" > # run tests if necessary, convert stdin if not< / span >
< span id = "L34" class = "LineNr" > 34 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L35" class = "LineNr" > 35 < / 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 = "L36" class = "LineNr" > 36 < / span > < span class = "subxH1Comment" > # - if argc > 1 and argv[1] == " test" , then return run_tests()< / span >
< span id = "L37" class = "LineNr" > 37 < / span > < span class = "subxS1Comment" > # . argc > 1< / span >
< span id = "L38" class = "LineNr" > 38 < / span > 81 7/subop/compare 1/mod/*+disp8 5/rm32/EBP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/disp8 1/imm32 < span class = "subxComment" > # compare *EBP< / span >
< span id = "L39" class = "LineNr" > 39 < / span > 7e/jump-if-lesser-or-equal $run-main/disp8
< span id = "L40" class = "LineNr" > 40 < / span > < span class = "subxS1Comment" > # . argv[1] == " test" < / span >
< span id = "L41" class = "LineNr" > 41 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L42" class = "LineNr" > 42 < / span > 68/push < span class = "Constant" > " test" < / span > /imm32
< span id = "L43" class = "LineNr" > 43 < / span > ff 6/subop/push 1/mod/*+disp8 5/rm32/EBP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # push *(EBP+8)< / span >
< span id = "L44" class = "LineNr" > 44 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L45" class = "LineNr" > 45 < / span > e8/call < a href = '../052kernel-string-equal.subx.html#L31' > kernel-string-equal?< / a > /disp32
< span id = "L46" class = "LineNr" > 46 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L47" class = "LineNr" > 47 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L48" class = "LineNr" > 48 < / span > < span class = "subxS1Comment" > # . check result< / span >
< span id = "L49" class = "LineNr" > 49 < / span > 3d/compare-EAX-and 1/imm32
< span id = "L50" class = "LineNr" > 50 < / span > 75/jump-if-not-equal $run-main/disp8
< span id = "L51" class = "LineNr" > 51 < / span > < span class = "subxS1Comment" > # . run-tests()< / span >
< span id = "L52" class = "LineNr" > 52 < / span > e8/call run-tests/disp32
< span id = "L53" class = "LineNr" > 53 < / span > 8b/copy 0/mod/indirect 5/rm32/.disp32 < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 3/r32/EBX < span class = "SpecialChar" > < a href = '../051test.subx.html#L90' > Num-test-failures< / a > < / span > /disp32 < span class = "subxComment" > # copy *Num-test-failures to EBX< / span >
< span id = "L54" class = "LineNr" > 54 < / span > eb/jump $main:end/disp8
< span id = "L55" class = "LineNr" > 55 < / span > < span class = "Constant" > $run-main< / span > :
< span id = "L56" class = "LineNr" > 56 < / span > < span class = "subxH1Comment" > # - otherwise convert stdin< / span >
< span id = "L57" class = "LineNr" > 57 < / span > < span class = "subxComment" > # var ed/EAX : exit-descriptor< / span >
< span id = "L58" class = "LineNr" > 58 < / span > 81 5/subop/subtract 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # subtract from ESP< / span >
< span id = "L59" class = "LineNr" > 59 < / span > 89/copy 3/mod/direct 0/rm32/EAX < 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 EAX< / span >
< span id = "L60" class = "LineNr" > 60 < / span > < span class = "subxComment" > # configure ed to really exit()< / span >
< span id = "L61" class = "LineNr" > 61 < / span > < span class = "subxS1Comment" > # . ed-> target = 0< / span >
< span id = "L62" class = "LineNr" > 62 < / span > c7 0/subop/copy 0/mod/direct 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/imm32 < span class = "subxComment" > # copy to *EAX< / span >
< span id = "L63" class = "LineNr" > 63 < / span > < span class = "subxComment" > # return convert(Stdin, 1/stdout, 2/stderr, ed)< / span >
< span id = "L64" class = "LineNr" > 64 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L65" class = "LineNr" > 65 < / span > 50/push-EAX/ed
2019-07-25 07:08:23 +00:00
< span id = "L66" class = "LineNr" > 66 < / span > 68/push < span class = "SpecialChar" > < a href = '../065write-buffered.subx.html#L213' > Stderr< / a > < / span > /imm32
2019-07-14 16:42:36 +00:00
< span id = "L67" class = "LineNr" > 67 < / span > 68/push < span class = "SpecialChar" > < a href = '../064write-byte.subx.html#L10' > Stdout< / a > < / span > /imm32
< span id = "L68" class = "LineNr" > 68 < / span > 68/push < span class = "SpecialChar" > < a href = '../061read-byte.subx.html#L14' > Stdin< / a > < / span > /imm32
< span id = "L69" class = "LineNr" > 69 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L70" class = "LineNr" > 70 < / span > e8/call < a href = 'dquotes.subx.html#L83' > convert< / a > /disp32
< span id = "L71" class = "LineNr" > 71 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L72" class = "LineNr" > 72 < / span > 81 0/subop/add 3/mod/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 = "L73" class = "LineNr" > 73 < / span > < span class = "subxS1Comment" > # . syscall(exit, 0)< / span >
< span id = "L74" class = "LineNr" > 74 < / span > bb/copy-to-EBX 0/imm32
< span id = "L75" class = "LineNr" > 75 < / span > < span class = "Constant" > $main:end< / span > :
< span id = "L76" class = "LineNr" > 76 < / span > b8/copy-to-EAX 1/imm32/exit
< span id = "L77" class = "LineNr" > 77 < / span > cd/syscall 0x80/imm8
< span id = "L78" class = "LineNr" > 78 < / span >
< span id = "L79" class = "LineNr" > 79 < / span > < span class = "subxComment" > # conceptual hierarchy within a line:< / span >
< span id = "L80" class = "LineNr" > 80 < / span > < span class = "subxComment" > # line = words separated by ' ', maybe followed by comment starting with '#'< / span >
< span id = "L81" class = "LineNr" > 81 < / span > < span class = "subxComment" > # word = datum until '/', then 0 or more metadata separated by '/'< / span >
< span id = "L82" class = "LineNr" > 82 < / span >
< span id = "L83" class = "LineNr" > 83 < / span > < span class = "subxFunction" > convert< / span > : < span class = "subxComment" > # in : (address buffered-file), out : (address buffered-file) -> < void> < / span >
< span id = "L84" class = "LineNr" > 84 < / span > < span class = "subxComment" > # pseudocode:< / span >
< span id = "L85" class = "LineNr" > 85 < / span > < span class = "subxComment" > # var line = new-stream(512, 1)< / span >
< span id = "L86" class = "LineNr" > 86 < / span > < span class = "subxComment" > # var new-data-segment = new-stream(Heap, Segment-size, 1)< / span >
2019-07-25 07:08:23 +00:00
< span id = "L87" class = "LineNr" > 87 < / span > < span class = "subxComment" > # write(new-data-segment, " == data\n" )< / span >
2019-07-14 16:42:36 +00:00
< span id = "L88" class = "LineNr" > 88 < / span > < span class = "subxComment" > # while true< / span >
< span id = "L89" class = "LineNr" > 89 < / span > < span class = "subxComment" > # clear-stream(line)< / span >
< span id = "L90" class = "LineNr" > 90 < / span > < span class = "subxComment" > # read-line-buffered(in, line)< / span >
< span id = "L91" class = "LineNr" > 91 < / span > < span class = "subxComment" > # if (line-> write == 0) break # end of file< / span >
< span id = "L92" class = "LineNr" > 92 < / span > < span class = "subxComment" > # while true< / span >
< span id = "L93" class = "LineNr" > 93 < / span > < span class = "subxComment" > # var word-slice = next-word-or-string(line)< / span >
< span id = "L94" class = "LineNr" > 94 < / span > < span class = "subxComment" > # if slice-empty?(word-slice) # end of line< / span >
< span id = "L95" class = "LineNr" > 95 < / span > < span class = "subxComment" > # break< / span >
< span id = "L96" class = "LineNr" > 96 < / span > < span class = "subxComment" > # if slice-starts-with?(word-slice, " #" ) # comment< / span >
< span id = "L97" class = "LineNr" > 97 < / span > < span class = "subxComment" > # continue< / span >
< span id = "L98" class = "LineNr" > 98 < / span > < span class = "subxComment" > # if slice-starts-with?(word-slice, '" ') # string literal < == what we're here for< / span >
< span id = "L99" class = "LineNr" > 99 < / span > < span class = "subxComment" > # process-string-literal(word-slice, out, new-data-segment)< / span >
< span id = "L100" class = "LineNr" > 100 < / span > < span class = "subxComment" > # else< / span >
< span id = "L101" class = "LineNr" > 101 < / span > < span class = "subxComment" > # write-slice-buffered(out, word-slice)< / span >
< span id = "L102" class = "LineNr" > 102 < / span > < span class = "subxComment" > # write(out, " " )< / span >
< span id = "L103" class = "LineNr" > 103 < / span > < span class = "subxComment" > # write(out, " \n\n" )< / span >
< span id = "L104" class = "LineNr" > 104 < / span > < span class = "subxComment" > # write-stream-data(out, new-data-segment)< / span >
< span id = "L105" class = "LineNr" > 105 < / span > < span class = "subxComment" > # flush(out)< / span >
< span id = "L106" class = "LineNr" > 106 < / span > < span class = "subxComment" > #< / span >
< span id = "L107" class = "LineNr" > 107 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L108" class = "LineNr" > 108 < / span > 55/push-EBP
< span id = "L109" class = "LineNr" > 109 < / 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 = "L110" class = "LineNr" > 110 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L111" class = "LineNr" > 111 < / span > 50/push-EAX
< span id = "L112" class = "LineNr" > 112 < / span > 51/push-ECX
< span id = "L113" class = "LineNr" > 113 < / span > 52/push-EDX
< span id = "L114" class = "LineNr" > 114 < / span > 53/push-EBX
< span id = "L115" class = "LineNr" > 115 < / span > 56/push-ESI
< span id = "L116" class = "LineNr" > 116 < / span > 57/push-EDI
< span id = "L117" class = "LineNr" > 117 < / span > < span class = "subxComment" > # var line/ECX : (address stream byte) = stream(512)< / span >
< span id = "L118" class = "LineNr" > 118 < / span > 81 5/subop/subtract 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0x200/imm32 < span class = "subxComment" > # subtract from ESP< / span >
< span id = "L119" class = "LineNr" > 119 < / span > 68/push 0x200/imm32/length
< span id = "L120" class = "LineNr" > 120 < / span > 68/push 0/imm32/read
< span id = "L121" class = "LineNr" > 121 < / span > 68/push 0/imm32/write
< span id = "L122" class = "LineNr" > 122 < / 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 = "L123" class = "LineNr" > 123 < / span > < span class = "subxComment" > # var word-slice/EDX = {0, 0}< / span >
< span id = "L124" class = "LineNr" > 124 < / span > 68/push 0/imm32/end
< span id = "L125" class = "LineNr" > 125 < / span > 68/push 0/imm32/start
< span id = "L126" class = "LineNr" > 126 < / 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 = "L127" class = "LineNr" > 127 < / span > < span class = "subxComment" > # new-data-segment/EDI = new-stream(Heap, Segment-size, 1)< / span >
< span id = "L128" class = "LineNr" > 128 < / span > < span class = "subxS1Comment" > # . EAX = new-stream(Heap, Segment-size, 1)< / span >
< span id = "L129" class = "LineNr" > 129 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L130" class = "LineNr" > 130 < / span > 68/push 1/imm32
2019-07-25 07:08:23 +00:00
< span id = "L131" class = "LineNr" > 131 < / span > ff 6/subop/push 0/mod/indirect 5/rm32/.disp32 < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "SpecialChar" > Segment-size< / span > /disp32 < span class = "subxComment" > # push *Segment-size< / span >
2019-07-14 16:42:36 +00:00
< span id = "L132" class = "LineNr" > 132 < / span > 68/push < span class = "SpecialChar" > < a href = '../075array-equal.subx.html#L623' > Heap< / a > < / span > /imm32
< span id = "L133" class = "LineNr" > 133 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L134" class = "LineNr" > 134 < / span > e8/call < a href = '../070new-stream.subx.html#L8' > new-stream< / a > /disp32
< span id = "L135" class = "LineNr" > 135 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L136" class = "LineNr" > 136 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L137" class = "LineNr" > 137 < / span > < span class = "subxS1Comment" > # . EDI = EAX< / span >
< span id = "L138" class = "LineNr" > 138 < / span > 89/copy 3/mod/direct 7/rm32/EDI < 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 EDI< / span >
< span id = "L139" class = "LineNr" > 139 < / span > < span class = "subxComment" > # write(new-data-segment, " == data\n" )< / span >
< span id = "L140" class = "LineNr" > 140 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L141" class = "LineNr" > 141 < / span > 68/push < span class = "Constant" > " == data\n" < / span > /imm32
< span id = "L142" class = "LineNr" > 142 < / span > 57/push-EDI
< span id = "L143" class = "LineNr" > 143 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L144" class = "LineNr" > 144 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L145" class = "LineNr" > 145 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L146" class = "LineNr" > 146 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L147" class = "LineNr" > 147 < / span > < span class = "Constant" > $convert:line-loop< / span > :
< span id = "L148" class = "LineNr" > 148 < / span > < span class = "subxComment" > # clear-stream(line)< / span >
< span id = "L149" class = "LineNr" > 149 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L150" class = "LineNr" > 150 < / span > 51/push-ECX
< span id = "L151" class = "LineNr" > 151 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L152" class = "LineNr" > 152 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L153" class = "LineNr" > 153 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L154" class = "LineNr" > 154 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L155" class = "LineNr" > 155 < / span > < span class = "subxComment" > # read-line-buffered(in, line)< / span >
< span id = "L156" class = "LineNr" > 156 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L157" class = "LineNr" > 157 < / span > 51/push-ECX
< span id = "L158" class = "LineNr" > 158 < / 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 = "L159" class = "LineNr" > 159 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L160" class = "LineNr" > 160 < / span > e8/call < a href = '../071read-line.subx.html#L9' > read-line-buffered< / a > /disp32
< span id = "L161" class = "LineNr" > 161 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L162" class = "LineNr" > 162 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L163" class = "LineNr" > 163 < / span > < span class = "Constant" > $convert:check0< / span > :
< span id = "L164" class = "LineNr" > 164 < / span > < span class = "subxComment" > # if (line-> write == 0) break< / span >
< span id = "L165" class = "LineNr" > 165 < / span > 81 7/subop/compare 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 > 0/imm32 < span class = "subxComment" > # compare *ECX< / span >
< span id = "L166" class = "LineNr" > 166 < / span > 0f 84/jump-if-equal $convert:break/disp32
< span id = "L167" class = "LineNr" > 167 < / span > < span class = "Constant" > $convert:word-loop< / span > :
< span id = "L168" class = "LineNr" > 168 < / span > < span class = "subxComment" > # next-word-or-string(line, word-slice)< / span >
< span id = "L169" class = "LineNr" > 169 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L170" class = "LineNr" > 170 < / span > 52/push-EDX
< span id = "L171" class = "LineNr" > 171 < / span > 51/push-ECX
< span id = "L172" class = "LineNr" > 172 < / span > < span class = "subxS2Comment" > # . . call< / span >
2019-07-25 07:08:23 +00:00
< span id = "L173" class = "LineNr" > 173 < / span > e8/call < a href = 'dquotes.subx.html#L1764' > next-word-or-string< / a > /disp32
2019-07-14 16:42:36 +00:00
< span id = "L174" class = "LineNr" > 174 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L175" class = "LineNr" > 175 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L176" class = "LineNr" > 176 < / span > < span class = "Constant" > $convert:check1< / span > :
< span id = "L177" class = "LineNr" > 177 < / span > < span class = "subxComment" > # if (slice-empty?(word-slice)) break< / span >
< span id = "L178" class = "LineNr" > 178 < / span > < span class = "subxS1Comment" > # . EAX = slice-empty?(word-slice)< / span >
< span id = "L179" class = "LineNr" > 179 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L180" class = "LineNr" > 180 < / span > 52/push-EDX
< span id = "L181" class = "LineNr" > 181 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L182" class = "LineNr" > 182 < / span > e8/call < a href = '../072slice.subx.html#L9' > slice-empty?< / a > /disp32
< span id = "L183" class = "LineNr" > 183 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L184" class = "LineNr" > 184 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L185" class = "LineNr" > 185 < / span > < span class = "subxS1Comment" > # . if (EAX != 0) break< / span >
< span id = "L186" class = "LineNr" > 186 < / span > 3d/compare-EAX-and 0/imm32
< span id = "L187" class = "LineNr" > 187 < / span > 0f 85/jump-if-not-equal $convert:next-line/disp32
< span id = "L188" class = "LineNr" > 188 < / span > < span class = "Constant" > $convert:check-for-comment< / span > :
< span id = "L189" class = "LineNr" > 189 < / span > < span class = "subxComment" > # if (slice-starts-with?(word-slice, " #" )) continue< / span >
< span id = "L190" class = "LineNr" > 190 < / span > < span class = "subxS1Comment" > # . start/ESI = word-slice-> start< / span >
< span id = "L191" class = "LineNr" > 191 < / span > 8b/copy 0/mod/indirect 2/rm32/EDX < 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 *EDX to ESI< / span >
< span id = "L192" class = "LineNr" > 192 < / span > < span class = "subxS1Comment" > # . c/EAX = *start< / span >
< span id = "L193" class = "LineNr" > 193 < / 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 = "L194" class = "LineNr" > 194 < / span > 8a/copy-byte 0/mod/indirect 6/rm32/ESI < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/AL < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "subxComment" > # copy byte at *ESI to AL< / span >
< span id = "L195" class = "LineNr" > 195 < / span > < span class = "subxS1Comment" > # . if (EAX == '#') continue< / span >
< span id = "L196" class = "LineNr" > 196 < / span > 3d/compare-EAX-and 0x23/imm32/hash
< span id = "L197" class = "LineNr" > 197 < / span > 74/jump-if-equal $convert:word-loop/disp8
< span id = "L198" class = "LineNr" > 198 < / span > < span class = "Constant" > $convert:check-for-string-literal< / span > :
2019-07-25 07:08:23 +00:00
< span id = "L199" class = "LineNr" > 199 < / span > 3d/compare-EAX-and 0x22/imm32/dquote
2019-07-14 16:42:36 +00:00
< span id = "L200" class = "LineNr" > 200 < / span > 75/jump-if-not-equal $convert:regular-word/disp8
< span id = "L201" class = "LineNr" > 201 < / span > < span class = "Constant" > $convert:string-literal< / span > :
< span id = "L202" class = "LineNr" > 202 < / span > < span class = "subxComment" > # process-string-literal(word-slice, out, new-data-segment)< / span >
< span id = "L203" class = "LineNr" > 203 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L204" class = "LineNr" > 204 < / span > 57/push-EDI
< span id = "L205" class = "LineNr" > 205 < / 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 = "L206" class = "LineNr" > 206 < / span > 52/push-EDX
< span id = "L207" class = "LineNr" > 207 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L208" class = "LineNr" > 208 < / span > e8/call < a href = 'dquotes.subx.html#L278' > process-string-literal< / a > /disp32
< span id = "L209" class = "LineNr" > 209 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L210" class = "LineNr" > 210 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L211" class = "LineNr" > 211 < / span > < span class = "subxComment" > # continue< / span >
< span id = "L212" class = "LineNr" > 212 < / span > eb/jump $convert:next-word/disp8
< span id = "L213" class = "LineNr" > 213 < / span > < span class = "Constant" > $convert:regular-word< / span > :
< span id = "L214" class = "LineNr" > 214 < / span > < span class = "subxComment" > # write-slice-buffered(out, word-slice)< / span >
< span id = "L215" class = "LineNr" > 215 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L216" class = "LineNr" > 216 < / span > 52/push-EDX
< span id = "L217" class = "LineNr" > 217 < / 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 = "L218" class = "LineNr" > 218 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L219" class = "LineNr" > 219 < / span > e8/call < a href = '../072slice.subx.html#L878' > write-slice-buffered< / a > /disp32
< span id = "L220" class = "LineNr" > 220 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L221" class = "LineNr" > 221 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L222" class = "LineNr" > 222 < / span > < span class = "subxComment" > # fall through< / span >
< span id = "L223" class = "LineNr" > 223 < / span > < span class = "Constant" > $convert:next-word< / span > :
< span id = "L224" class = "LineNr" > 224 < / span > < span class = "subxComment" > # write-buffered(out, " " )< / span >
< span id = "L225" class = "LineNr" > 225 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L226" class = "LineNr" > 226 < / span > 68/push < span class = "Constant" > " " < / span > /imm32
< span id = "L227" class = "LineNr" > 227 < / 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 = "L228" class = "LineNr" > 228 < / span > < span class = "subxS2Comment" > # . . call< / span >
2019-07-25 07:08:23 +00:00
< span id = "L229" class = "LineNr" > 229 < / span > e8/call < a href = '../065write-buffered.subx.html#L8' > write-buffered< / a > /disp32
2019-07-14 16:42:36 +00:00
< span id = "L230" class = "LineNr" > 230 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L231" class = "LineNr" > 231 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L232" class = "LineNr" > 232 < / span > < span class = "subxComment" > # loop< / span >
< span id = "L233" class = "LineNr" > 233 < / span > eb/jump $convert:word-loop/disp8
< span id = "L234" class = "LineNr" > 234 < / span > < span class = "Constant" > $convert:next-line< / span > :
< span id = "L235" class = "LineNr" > 235 < / span > < span class = "subxComment" > # write-buffered(out, " \n" )< / span >
< span id = "L236" class = "LineNr" > 236 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L237" class = "LineNr" > 237 < / span > 68/push < span class = "SpecialChar" > < a href = '../051test.subx.html#L83' > Newline< / a > < / span > /imm32
< span id = "L238" class = "LineNr" > 238 < / 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 = "L239" class = "LineNr" > 239 < / span > < span class = "subxS2Comment" > # . . call< / span >
2019-07-25 07:08:23 +00:00
< span id = "L240" class = "LineNr" > 240 < / span > e8/call < a href = '../065write-buffered.subx.html#L8' > write-buffered< / a > /disp32
2019-07-14 16:42:36 +00:00
< span id = "L241" class = "LineNr" > 241 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L242" class = "LineNr" > 242 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L243" class = "LineNr" > 243 < / span > < span class = "subxComment" > # loop< / span >
< span id = "L244" class = "LineNr" > 244 < / span > e9/jump $convert:line-loop/disp32
< span id = "L245" class = "LineNr" > 245 < / span > < span class = "Constant" > $convert:break< / span > :
< span id = "L246" class = "LineNr" > 246 < / span > < span class = "subxComment" > # write-stream-data(out, new-data-segment)< / span >
< span id = "L247" class = "LineNr" > 247 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L248" class = "LineNr" > 248 < / span > 57/push-EDI
< span id = "L249" class = "LineNr" > 249 < / 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 = "L250" class = "LineNr" > 250 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L251" class = "LineNr" > 251 < / span > e8/call write-stream-data/disp32
< span id = "L252" class = "LineNr" > 252 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L253" class = "LineNr" > 253 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L254" class = "LineNr" > 254 < / span > < span class = "subxComment" > # flush(out)< / span >
< span id = "L255" class = "LineNr" > 255 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L256" class = "LineNr" > 256 < / span > ff 6/subop/push 1/mod/*+disp8 5/rm32/EBP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # push *(EBP+12)< / span >
< span id = "L257" class = "LineNr" > 257 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L258" class = "LineNr" > 258 < / span > e8/call < a href = '../064write-byte.subx.html#L79' > flush< / a > /disp32
< span id = "L259" class = "LineNr" > 259 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L260" class = "LineNr" > 260 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L261" class = "LineNr" > 261 < / span > < span class = "Constant" > $convert:end< / span > :
< span id = "L262" class = "LineNr" > 262 < / span > < span class = "subxS1Comment" > # . reclaim locals< / span >
< span id = "L263" class = "LineNr" > 263 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0x214/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L264" class = "LineNr" > 264 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L265" class = "LineNr" > 265 < / span > 5f/pop-to-EDI
< span id = "L266" class = "LineNr" > 266 < / span > 5e/pop-to-ESI
< span id = "L267" class = "LineNr" > 267 < / span > 5b/pop-to-EBX
< span id = "L268" class = "LineNr" > 268 < / span > 5a/pop-to-EDX
< span id = "L269" class = "LineNr" > 269 < / span > 59/pop-to-ECX
< span id = "L270" class = "LineNr" > 270 < / span > 58/pop-to-EAX
< span id = "L271" class = "LineNr" > 271 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L272" class = "LineNr" > 272 < / 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 = "L273" class = "LineNr" > 273 < / span > 5d/pop-to-EBP
< span id = "L274" class = "LineNr" > 274 < / span > c3/return
< span id = "L275" class = "LineNr" > 275 < / span >
< span id = "L276" class = "LineNr" > 276 < / span > < span class = "subxComment" > # Write out 'string-literal' in a new format to 'out-segment', assign it a new< / span >
< span id = "L277" class = "LineNr" > 277 < / span > < span class = "subxComment" > # label, and write the new label out to 'out'.< / span >
< span id = "L278" class = "LineNr" > 278 < / span > < span class = "subxFunction" > process-string-literal< / span > : < span class = "subxComment" > # string-literal : (address slice), out : (address buffered-file), out-segment : (address stream)< / span >
< span id = "L279" class = "LineNr" > 279 < / span > < span class = "subxComment" > # pseudocode:< / span >
< span id = "L280" class = "LineNr" > 280 < / span > < span class = "subxComment" > # print(out-segment, " _string#{Next-string-literal}:\n" )< / span >
< span id = "L281" class = "LineNr" > 281 < / span > < span class = "subxComment" > # emit-string-literal-data(out-segment, string-literal)< / span >
< span id = "L282" class = "LineNr" > 282 < / span > < span class = "subxComment" > # print(out, " _string#{Next-string-literal}" )< / span >
< span id = "L283" class = "LineNr" > 283 < / span > < span class = "subxComment" > # emit-metadata(out, string-literal)< / span >
< span id = "L284" class = "LineNr" > 284 < / span > < span class = "subxComment" > # ++ *Next-string-literal< / span >
< span id = "L285" class = "LineNr" > 285 < / span > < span class = "subxComment" > #< / span >
< span id = "L286" class = "LineNr" > 286 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L287" class = "LineNr" > 287 < / span > 55/push-EBP
< span id = "L288" class = "LineNr" > 288 < / 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 = "L289" class = "LineNr" > 289 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L290" class = "LineNr" > 290 < / span > 51/push-ECX
< span id = "L291" class = "LineNr" > 291 < / span > < span class = "subxComment" > # var int32-stream/ECX = stream(10) # number of decimal digits a 32-bit number can have< / span >
< span id = "L292" class = "LineNr" > 292 < / span > 81 5/subop/subtract 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xa/imm32 < span class = "subxComment" > # subtract from ESP< / span >
< span id = "L293" class = "LineNr" > 293 < / span > 68/push 0xa/imm32/decimal-digits-in-32bit-number
< span id = "L294" class = "LineNr" > 294 < / span > 68/push 0/imm32/read
< span id = "L295" class = "LineNr" > 295 < / span > 68/push 0/imm32/write
< span id = "L296" class = "LineNr" > 296 < / 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 = "L297" class = "LineNr" > 297 < / span > < span class = "subxComment" > # print(out-segment, " _string#{Next-string-literal}:\n" )< / span >
< span id = "L298" class = "LineNr" > 298 < / span > < span class = "subxS1Comment" > # . write(out-segment, " _string" )< / span >
< span id = "L299" class = "LineNr" > 299 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L300" class = "LineNr" > 300 < / span > 68/push < span class = "Constant" > " _string" < / span > /imm32
< span id = "L301" class = "LineNr" > 301 < / 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 = "L302" class = "LineNr" > 302 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L303" class = "LineNr" > 303 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L304" class = "LineNr" > 304 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L305" class = "LineNr" > 305 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L306" class = "LineNr" > 306 < / span > < span class = "subxS1Comment" > # . print-int32-decimal(out-segment, *Next-string-literal)< / span >
< span id = "L307" class = "LineNr" > 307 < / span > < span class = "subxS2Comment" > # . . push args< / span >
2019-07-25 07:08:23 +00:00
< span id = "L308" class = "LineNr" > 308 < / 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 = 'dquotes.subx.html#L2714' > Next-string-literal< / a > < / span > /disp32 < span class = "subxComment" > # push *Next-string-literal< / span >
2019-07-14 16:42:36 +00:00
< span id = "L309" class = "LineNr" > 309 < / 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 = "L310" class = "LineNr" > 310 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L311" class = "LineNr" > 311 < / span > e8/call < a href = '../074print-int-decimal.subx.html#L8' > print-int32-decimal< / a > /disp32
< span id = "L312" class = "LineNr" > 312 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L313" class = "LineNr" > 313 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L314" class = "LineNr" > 314 < / span > < span class = "subxS1Comment" > # . write(out-segment, " :\n" )< / span >
< span id = "L315" class = "LineNr" > 315 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L316" class = "LineNr" > 316 < / span > 68/push < span class = "Constant" > " :\n" < / span > /imm32
< span id = "L317" class = "LineNr" > 317 < / 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 = "L318" class = "LineNr" > 318 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L319" class = "LineNr" > 319 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L320" class = "LineNr" > 320 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L321" class = "LineNr" > 321 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L322" class = "LineNr" > 322 < / span > < span class = "subxComment" > # emit-string-literal-data(out-segment, string-literal)< / span >
< span id = "L323" class = "LineNr" > 323 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L324" class = "LineNr" > 324 < / 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 > 0x8/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # push *(EBP+8)< / span >
< span id = "L325" class = "LineNr" > 325 < / 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 = "L326" class = "LineNr" > 326 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L327" class = "LineNr" > 327 < / span > e8/call < a href = 'dquotes.subx.html#L845' > emit-string-literal-data< / a > /disp32
< span id = "L328" class = "LineNr" > 328 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L329" class = "LineNr" > 329 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L330" class = "LineNr" > 330 < / span > < span class = "subxComment" > # write(out-segment, " \n" )< / span >
< span id = "L331" class = "LineNr" > 331 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L332" class = "LineNr" > 332 < / span > 68/push < span class = "SpecialChar" > < a href = '../051test.subx.html#L83' > Newline< / a > < / span > /imm32
< span id = "L333" class = "LineNr" > 333 < / 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 = "L334" class = "LineNr" > 334 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L335" class = "LineNr" > 335 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L336" class = "LineNr" > 336 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L337" class = "LineNr" > 337 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L338" class = "LineNr" > 338 < / span > < span class = "subxComment" > # print(out, " _string#{Next-string-literal}" )< / span >
< span id = "L339" class = "LineNr" > 339 < / span > < span class = "subxS1Comment" > # . write-buffered(out, " _string" )< / span >
< span id = "L340" class = "LineNr" > 340 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L341" class = "LineNr" > 341 < / span > 68/push < span class = "Constant" > " _string" < / span > /imm32
< span id = "L342" class = "LineNr" > 342 < / 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 = "L343" class = "LineNr" > 343 < / span > < span class = "subxS2Comment" > # . . call< / span >
2019-07-25 07:08:23 +00:00
< span id = "L344" class = "LineNr" > 344 < / span > e8/call < a href = '../065write-buffered.subx.html#L8' > write-buffered< / a > /disp32
2019-07-14 16:42:36 +00:00
< span id = "L345" class = "LineNr" > 345 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L346" class = "LineNr" > 346 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L347" class = "LineNr" > 347 < / span > < span class = "subxS1Comment" > # . print-int32-decimal(int32-stream, *Next-string-literal)< / span >
< span id = "L348" class = "LineNr" > 348 < / span > < span class = "subxS2Comment" > # . . push args< / span >
2019-07-25 07:08:23 +00:00
< span id = "L349" class = "LineNr" > 349 < / 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 = 'dquotes.subx.html#L2714' > Next-string-literal< / a > < / span > /disp32 < span class = "subxComment" > # push *Next-string-literal< / span >
2019-07-14 16:42:36 +00:00
< span id = "L350" class = "LineNr" > 350 < / span > 51/push-ECX
< span id = "L351" class = "LineNr" > 351 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L352" class = "LineNr" > 352 < / span > e8/call < a href = '../074print-int-decimal.subx.html#L8' > print-int32-decimal< / a > /disp32
< span id = "L353" class = "LineNr" > 353 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L354" class = "LineNr" > 354 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L355" class = "LineNr" > 355 < / span > < span class = "subxS1Comment" > # . write-stream-data(out, int32-stream)< / span >
< span id = "L356" class = "LineNr" > 356 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L357" class = "LineNr" > 357 < / span > 51/push-ECX
< span id = "L358" class = "LineNr" > 358 < / 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 = "L359" class = "LineNr" > 359 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L360" class = "LineNr" > 360 < / span > e8/call write-stream-data/disp32
< span id = "L361" class = "LineNr" > 361 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L362" class = "LineNr" > 362 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L363" class = "LineNr" > 363 < / span > < span class = "subxComment" > # emit-metadata(out, string-literal)< / span >
< span id = "L364" class = "LineNr" > 364 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L365" class = "LineNr" > 365 < / 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 = "L366" class = "LineNr" > 366 < / 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 = "L367" class = "LineNr" > 367 < / span > < span class = "subxS2Comment" > # . . call< / span >
2019-07-25 07:08:23 +00:00
< span id = "L368" class = "LineNr" > 368 < / span > e8/call < a href = 'dquotes.subx.html#L1353' > emit-metadata< / a > /disp32
2019-07-14 16:42:36 +00:00
< span id = "L369" class = "LineNr" > 369 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L370" class = "LineNr" > 370 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L371" class = "LineNr" > 371 < / span > < span class = "subxComment" > # ++ *Next-string-literal< / span >
2019-07-25 07:08:23 +00:00
< span id = "L372" class = "LineNr" > 372 < / 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 = 'dquotes.subx.html#L2714' > Next-string-literal< / a > < / span > /disp32 < span class = "subxComment" > # increment *Num-test-failures< / span >
2019-07-14 16:42:36 +00:00
< span id = "L373" class = "LineNr" > 373 < / span > < span class = "Constant" > $process-string-literal:end< / span > :
< span id = "L374" class = "LineNr" > 374 < / span > < span class = "subxS1Comment" > # . reclaim locals< / span >
< span id = "L375" class = "LineNr" > 375 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0x16/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L376" class = "LineNr" > 376 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L377" class = "LineNr" > 377 < / span > 59/pop-to-ECX
< span id = "L378" class = "LineNr" > 378 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L379" class = "LineNr" > 379 < / 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 = "L380" class = "LineNr" > 380 < / span > 5d/pop-to-EBP
< span id = "L381" class = "LineNr" > 381 < / span > c3/return
< span id = "L382" class = "LineNr" > 382 < / span >
< span id = "L383" class = "LineNr" > 383 < / span > < span class = "subxTest" > test-convert-is-idempotent-by-default< / span > :
< span id = "L384" class = "LineNr" > 384 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L385" class = "LineNr" > 385 < / span > 55/push-EBP
< span id = "L386" class = "LineNr" > 386 < / 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 = "L387" class = "LineNr" > 387 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L388" class = "LineNr" > 388 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-input-stream)< / span >
< span id = "L389" class = "LineNr" > 389 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L390" class = "LineNr" > 390 < / span > 68/push _test-input-stream/imm32
< span id = "L391" class = "LineNr" > 391 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L392" class = "LineNr" > 392 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L393" class = "LineNr" > 393 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L394" class = "LineNr" > 394 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L395" class = "LineNr" > 395 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-input-buffered-file+4)< / span >
< span id = "L396" class = "LineNr" > 396 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L397" class = "LineNr" > 397 < / span > b8/copy-to-EAX _test-input-buffered-file/imm32
< span id = "L398" class = "LineNr" > 398 < / span > 05/add-to-EAX 4/imm32
< span id = "L399" class = "LineNr" > 399 < / span > 50/push-EAX
< span id = "L400" class = "LineNr" > 400 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L401" class = "LineNr" > 401 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L402" class = "LineNr" > 402 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L403" class = "LineNr" > 403 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L404" class = "LineNr" > 404 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-stream)< / span >
< span id = "L405" class = "LineNr" > 405 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L406" class = "LineNr" > 406 < / span > 68/push _test-output-stream/imm32
< span id = "L407" class = "LineNr" > 407 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L408" class = "LineNr" > 408 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L409" class = "LineNr" > 409 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L410" class = "LineNr" > 410 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L411" class = "LineNr" > 411 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-buffered-file+4)< / span >
< span id = "L412" class = "LineNr" > 412 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L413" class = "LineNr" > 413 < / span > b8/copy-to-EAX _test-output-buffered-file/imm32
< span id = "L414" class = "LineNr" > 414 < / span > 05/add-to-EAX 4/imm32
< span id = "L415" class = "LineNr" > 415 < / span > 50/push-EAX
< span id = "L416" class = "LineNr" > 416 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L417" class = "LineNr" > 417 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L418" class = "LineNr" > 418 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L419" class = "LineNr" > 419 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L420" class = "LineNr" > 420 < / span > < span class = "subxComment" > # initialize input (meta comments in parens)< / span >
< span id = "L421" class = "LineNr" > 421 < / span > < span class = "subxComment" > # # comment 1< / span >
< span id = "L422" class = "LineNr" > 422 < / span > < span class = "subxComment" > # # comment 2 indented< / span >
< span id = "L423" class = "LineNr" > 423 < / span > < span class = "subxComment" > # == code 0x1 (new segment)< / span >
< span id = "L424" class = "LineNr" > 424 < / span > < span class = "subxComment" > # # comment 3 inside a segment< / span >
< span id = "L425" class = "LineNr" > 425 < / span > < span class = "subxComment" > # 1< / span >
< span id = "L426" class = "LineNr" > 426 < / span > < span class = "subxComment" > # (empty line)< / span >
< span id = "L427" class = "LineNr" > 427 < / span > < span class = "subxComment" > # 2 3 # comment 4 inline with other contents< / span >
< span id = "L428" class = "LineNr" > 428 < / span > < span class = "subxComment" > # == data 0x2 (new segment)< / span >
< span id = "L429" class = "LineNr" > 429 < / span > < span class = "subxComment" > # 4 5/imm32< / span >
< span id = "L430" class = "LineNr" > 430 < / span > < span class = "subxS1Comment" > # . write(_test-input-stream, " # comment 1\n" )< / span >
< span id = "L431" class = "LineNr" > 431 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L432" class = "LineNr" > 432 < / span > 68/push < span class = "Constant" > " # comment 1\n" < / span > /imm32
< span id = "L433" class = "LineNr" > 433 < / span > 68/push _test-input-stream/imm32
< span id = "L434" class = "LineNr" > 434 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L435" class = "LineNr" > 435 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L436" class = "LineNr" > 436 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L437" class = "LineNr" > 437 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L438" class = "LineNr" > 438 < / span > < span class = "subxS1Comment" > # . write(_test-input-stream, " # comment 2 indented\n" )< / span >
< span id = "L439" class = "LineNr" > 439 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L440" class = "LineNr" > 440 < / span > 68/push < span class = "Constant" > " # comment 2 indented\n" < / span > /imm32
< span id = "L441" class = "LineNr" > 441 < / span > 68/push _test-input-stream/imm32
< span id = "L442" class = "LineNr" > 442 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L443" class = "LineNr" > 443 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L444" class = "LineNr" > 444 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L445" class = "LineNr" > 445 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L446" class = "LineNr" > 446 < / span > < span class = "subxS1Comment" > # . write(_test-input-stream, " == code 0x1\n" )< / span >
< span id = "L447" class = "LineNr" > 447 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L448" class = "LineNr" > 448 < / span > 68/push < span class = "Constant" > " == code 0x1\n" < / span > /imm32
< span id = "L449" class = "LineNr" > 449 < / span > 68/push _test-input-stream/imm32
< span id = "L450" class = "LineNr" > 450 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L451" class = "LineNr" > 451 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L452" class = "LineNr" > 452 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L453" class = "LineNr" > 453 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L454" class = "LineNr" > 454 < / span > < span class = "subxS1Comment" > # . write(_test-input-stream, " # comment 3 inside a segment\n" )< / span >
< span id = "L455" class = "LineNr" > 455 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L456" class = "LineNr" > 456 < / span > 68/push < span class = "Constant" > " # comment 3 inside a segment\n" < / span > /imm32
< span id = "L457" class = "LineNr" > 457 < / span > 68/push _test-input-stream/imm32
< span id = "L458" class = "LineNr" > 458 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L459" class = "LineNr" > 459 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L460" class = "LineNr" > 460 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L461" class = "LineNr" > 461 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L462" class = "LineNr" > 462 < / span > < span class = "subxS1Comment" > # . write(_test-input-stream, " 1\n" )< / span >
< span id = "L463" class = "LineNr" > 463 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L464" class = "LineNr" > 464 < / span > 68/push < span class = "Constant" > " 1\n" < / span > /imm32
< span id = "L465" class = "LineNr" > 465 < / span > 68/push _test-input-stream/imm32
< span id = "L466" class = "LineNr" > 466 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L467" class = "LineNr" > 467 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L468" class = "LineNr" > 468 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L469" class = "LineNr" > 469 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L470" class = "LineNr" > 470 < / span > < span class = "subxS1Comment" > # . write(_test-input-stream, " \n" ) # empty line< / span >
< span id = "L471" class = "LineNr" > 471 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L472" class = "LineNr" > 472 < / span > 68/push < span class = "Constant" > " \n" < / span > /imm32
< span id = "L473" class = "LineNr" > 473 < / span > 68/push _test-input-stream/imm32
< span id = "L474" class = "LineNr" > 474 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L475" class = "LineNr" > 475 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L476" class = "LineNr" > 476 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L477" class = "LineNr" > 477 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L478" class = "LineNr" > 478 < / span > < span class = "subxS1Comment" > # . write(_test-input-stream, " 2 3 # comment 4 inline with other contents\n" )< / span >
< span id = "L479" class = "LineNr" > 479 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L480" class = "LineNr" > 480 < / span > 68/push < span class = "Constant" > " 2 3 # comment 4 inline with other contents\n" < / span > /imm32
< span id = "L481" class = "LineNr" > 481 < / span > 68/push _test-input-stream/imm32
< span id = "L482" class = "LineNr" > 482 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L483" class = "LineNr" > 483 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L484" class = "LineNr" > 484 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L485" class = "LineNr" > 485 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L486" class = "LineNr" > 486 < / span > < span class = "subxS1Comment" > # . write(_test-input-stream, " == data 0x2\n" )< / span >
< span id = "L487" class = "LineNr" > 487 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L488" class = "LineNr" > 488 < / span > 68/push < span class = "Constant" > " == data 0x2\n" < / span > /imm32
< span id = "L489" class = "LineNr" > 489 < / span > 68/push _test-input-stream/imm32
< span id = "L490" class = "LineNr" > 490 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L491" class = "LineNr" > 491 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L492" class = "LineNr" > 492 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L493" class = "LineNr" > 493 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L494" class = "LineNr" > 494 < / span > < span class = "subxS1Comment" > # . write(_test-input-stream, " 4 5/imm32\n" )< / span >
< span id = "L495" class = "LineNr" > 495 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L496" class = "LineNr" > 496 < / span > 68/push < span class = "Constant" > " 4 5/imm32\n" < / span > /imm32
< span id = "L497" class = "LineNr" > 497 < / span > 68/push _test-input-stream/imm32
< span id = "L498" class = "LineNr" > 498 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L499" class = "LineNr" > 499 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L500" class = "LineNr" > 500 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L501" class = "LineNr" > 501 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L502" class = "LineNr" > 502 < / span > < span class = "subxComment" > # convert(_test-input-buffered-file, _test-output-buffered-file)< / span >
< span id = "L503" class = "LineNr" > 503 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L504" class = "LineNr" > 504 < / span > 68/push _test-output-buffered-file/imm32
< span id = "L505" class = "LineNr" > 505 < / span > 68/push _test-input-buffered-file/imm32
< span id = "L506" class = "LineNr" > 506 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L507" class = "LineNr" > 507 < / span > e8/call < a href = 'dquotes.subx.html#L83' > convert< / a > /disp32
< span id = "L508" class = "LineNr" > 508 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L509" class = "LineNr" > 509 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L510" class = "LineNr" > 510 < / span > < span class = "subxS1Comment" > # . flush(_test-output-buffered-file)< / span >
< span id = "L511" class = "LineNr" > 511 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L512" class = "LineNr" > 512 < / span > 68/push _test-output-buffered-file/imm32
< span id = "L513" class = "LineNr" > 513 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L514" class = "LineNr" > 514 < / span > e8/call < a href = '../064write-byte.subx.html#L79' > flush< / a > /disp32
< span id = "L515" class = "LineNr" > 515 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L516" class = "LineNr" > 516 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L517" class = "LineNr" > 517 < / span > < span class = "subxComment" > # check output< / span >
< span id = "L518" class = "LineNr" > 518 < / span > < span class = "subxComment" > # (comment dropped for now)< / span >
< span id = "L519" class = "LineNr" > 519 < / span > < span class = "subxComment" > # (comment dropped for now)< / span >
< span id = "L520" class = "LineNr" > 520 < / span > < span class = "subxComment" > # == code 0x1< / span >
< span id = "L521" class = "LineNr" > 521 < / span > < span class = "subxComment" > # (comment dropped for now)< / span >
< span id = "L522" class = "LineNr" > 522 < / span > < span class = "subxComment" > # 1< / span >
2019-05-20 08:44:06 +00:00
< span id = "L523" class = "LineNr" > 523 < / span > < span class = "subxComment" > # (comment dropped for now)< / span >
2019-07-14 16:42:36 +00:00
< span id = "L524" class = "LineNr" > 524 < / span > < span class = "subxComment" > # 2 3< / span >
< span id = "L525" class = "LineNr" > 525 < / span > < span class = "subxComment" > # == data 0x2< / span >
< span id = "L526" class = "LineNr" > 526 < / span > < span class = "subxComment" > # 4 5/imm32< / span >
< span id = "L527" class = "LineNr" > 527 < / span > < span class = "subxComment" > # We don't care right now what exactly happens to comments. Trailing spaces are also minor details.< / span >
< span id = "L528" class = "Folded" > 528 < / span > < span class = "Folded" > +-- 26 lines: #? # dump output ---------------------------------------------------------------------------------------------------------------------------< / span >
< span id = "L554" class = "LineNr" > 554 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " " , msg)< / span >
< span id = "L555" class = "LineNr" > 555 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L556" class = "LineNr" > 556 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L383' > test-convert-is-idempotent-by-default< / a > /0" < / span > /imm32
< span id = "L557" class = "LineNr" > 557 < / span > 68/push < span class = "Constant" > " " < / span > /imm32
< span id = "L558" class = "LineNr" > 558 < / span > 68/push _test-output-stream/imm32
< span id = "L559" class = "LineNr" > 559 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L560" class = "LineNr" > 560 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / a > /disp32
< span id = "L561" class = "LineNr" > 561 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L562" class = "LineNr" > 562 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L563" class = "LineNr" > 563 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " " , msg)< / span >
< span id = "L564" class = "LineNr" > 564 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L565" class = "LineNr" > 565 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L383' > test-convert-is-idempotent-by-default< / a > /1" < / span > /imm32
< span id = "L566" class = "LineNr" > 566 < / span > 68/push < span class = "Constant" > " " < / span > /imm32
< span id = "L567" class = "LineNr" > 567 < / span > 68/push _test-output-stream/imm32
< span id = "L568" class = "LineNr" > 568 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L569" class = "LineNr" > 569 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / a > /disp32
< span id = "L570" class = "LineNr" > 570 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L571" class = "LineNr" > 571 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L572" class = "LineNr" > 572 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " == code 0x1 " , msg)< / span >
< span id = "L573" class = "LineNr" > 573 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L574" class = "LineNr" > 574 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L383' > test-convert-is-idempotent-by-default< / a > /2" < / span > /imm32
< span id = "L575" class = "LineNr" > 575 < / span > 68/push < span class = "Constant" > " == code 0x1 " < / span > /imm32
< span id = "L576" class = "LineNr" > 576 < / span > 68/push _test-output-stream/imm32
< span id = "L577" class = "LineNr" > 577 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L578" class = "LineNr" > 578 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / a > /disp32
< span id = "L579" class = "LineNr" > 579 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L580" class = "LineNr" > 580 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L581" class = "LineNr" > 581 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " " , msg)< / span >
< span id = "L582" class = "LineNr" > 582 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L583" class = "LineNr" > 583 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L383' > test-convert-is-idempotent-by-default< / a > /3" < / span > /imm32
< span id = "L584" class = "LineNr" > 584 < / span > 68/push < span class = "Constant" > " " < / span > /imm32
< span id = "L585" class = "LineNr" > 585 < / span > 68/push _test-output-stream/imm32
< span id = "L586" class = "LineNr" > 586 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L587" class = "LineNr" > 587 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / a > /disp32
< span id = "L588" class = "LineNr" > 588 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L589" class = "LineNr" > 589 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L590" class = "LineNr" > 590 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " 1 " , msg)< / span >
< span id = "L591" class = "LineNr" > 591 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L592" class = "LineNr" > 592 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L383' > test-convert-is-idempotent-by-default< / a > /4" < / span > /imm32
< span id = "L593" class = "LineNr" > 593 < / span > 68/push < span class = "Constant" > " 1 " < / span > /imm32
< span id = "L594" class = "LineNr" > 594 < / span > 68/push _test-output-stream/imm32
< span id = "L595" class = "LineNr" > 595 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L596" class = "LineNr" > 596 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / a > /disp32
< span id = "L597" class = "LineNr" > 597 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L598" class = "LineNr" > 598 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L599" class = "LineNr" > 599 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " " , msg)< / span >
< span id = "L600" class = "LineNr" > 600 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L601" class = "LineNr" > 601 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L383' > test-convert-is-idempotent-by-default< / a > /5" < / span > /imm32
< span id = "L602" class = "LineNr" > 602 < / span > 68/push < span class = "Constant" > " " < / span > /imm32
< span id = "L603" class = "LineNr" > 603 < / span > 68/push _test-output-stream/imm32
< span id = "L604" class = "LineNr" > 604 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L605" class = "LineNr" > 605 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / a > /disp32
< span id = "L606" class = "LineNr" > 606 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L607" class = "LineNr" > 607 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L608" class = "LineNr" > 608 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " 2 3 " , msg)< / span >
< span id = "L609" class = "LineNr" > 609 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L610" class = "LineNr" > 610 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L383' > test-convert-is-idempotent-by-default< / a > /6" < / span > /imm32
< span id = "L611" class = "LineNr" > 611 < / span > 68/push < span class = "Constant" > " 2 3 " < / span > /imm32
< span id = "L612" class = "LineNr" > 612 < / span > 68/push _test-output-stream/imm32
< span id = "L613" class = "LineNr" > 613 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L614" class = "LineNr" > 614 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / a > /disp32
< span id = "L615" class = "LineNr" > 615 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L616" class = "LineNr" > 616 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L617" class = "LineNr" > 617 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " == data 0x2 " , msg)< / span >
< span id = "L618" class = "LineNr" > 618 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L619" class = "LineNr" > 619 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L383' > test-convert-is-idempotent-by-default< / a > /7" < / span > /imm32
< span id = "L620" class = "LineNr" > 620 < / span > 68/push < span class = "Constant" > " == data 0x2 " < / span > /imm32
< span id = "L621" class = "LineNr" > 621 < / span > 68/push _test-output-stream/imm32
< span id = "L622" class = "LineNr" > 622 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L623" class = "LineNr" > 623 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / a > /disp32
< span id = "L624" class = "LineNr" > 624 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L625" class = "LineNr" > 625 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L626" class = "LineNr" > 626 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " 4 5/imm32 " , msg)< / span >
< span id = "L627" class = "LineNr" > 627 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L628" class = "LineNr" > 628 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L383' > test-convert-is-idempotent-by-default< / a > /8" < / span > /imm32
< span id = "L629" class = "LineNr" > 629 < / span > 68/push < span class = "Constant" > " 4 5/imm32 " < / span > /imm32
< span id = "L630" class = "LineNr" > 630 < / span > 68/push _test-output-stream/imm32
< span id = "L631" class = "LineNr" > 631 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L632" class = "LineNr" > 632 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / a > /disp32
< span id = "L633" class = "LineNr" > 633 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L634" class = "LineNr" > 634 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L635" class = "LineNr" > 635 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L636" class = "LineNr" > 636 < / 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 = "L637" class = "LineNr" > 637 < / span > 5d/pop-to-EBP
< span id = "L638" class = "LineNr" > 638 < / span > c3/return
< span id = "L639" class = "LineNr" > 639 < / span >
< span id = "L640" class = "LineNr" > 640 < / span > < span class = "subxTest" > test-convert-processes-string-literals< / span > :
< span id = "L641" class = "LineNr" > 641 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L642" class = "LineNr" > 642 < / span > 55/push-EBP
< span id = "L643" class = "LineNr" > 643 < / 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 = "L644" class = "LineNr" > 644 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L645" class = "LineNr" > 645 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-input-stream)< / span >
< span id = "L646" class = "LineNr" > 646 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L647" class = "LineNr" > 647 < / span > 68/push _test-input-stream/imm32
< span id = "L648" class = "LineNr" > 648 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L649" class = "LineNr" > 649 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L650" class = "LineNr" > 650 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L651" class = "LineNr" > 651 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L652" class = "LineNr" > 652 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-input-buffered-file+4)< / span >
< span id = "L653" class = "LineNr" > 653 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L654" class = "LineNr" > 654 < / span > b8/copy-to-EAX _test-input-buffered-file/imm32
< span id = "L655" class = "LineNr" > 655 < / span > 05/add-to-EAX 4/imm32
< span id = "L656" class = "LineNr" > 656 < / span > 50/push-EAX
< span id = "L657" class = "LineNr" > 657 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L658" class = "LineNr" > 658 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L659" class = "LineNr" > 659 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L660" class = "LineNr" > 660 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L661" class = "LineNr" > 661 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-stream)< / span >
< span id = "L662" class = "LineNr" > 662 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L663" class = "LineNr" > 663 < / span > 68/push _test-output-stream/imm32
< span id = "L664" class = "LineNr" > 664 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L665" class = "LineNr" > 665 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L666" class = "LineNr" > 666 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L667" class = "LineNr" > 667 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L668" class = "LineNr" > 668 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-buffered-file+4)< / span >
< span id = "L669" class = "LineNr" > 669 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L670" class = "LineNr" > 670 < / span > b8/copy-to-EAX _test-output-buffered-file/imm32
< span id = "L671" class = "LineNr" > 671 < / span > 05/add-to-EAX 4/imm32
< span id = "L672" class = "LineNr" > 672 < / span > 50/push-EAX
< span id = "L673" class = "LineNr" > 673 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L674" class = "LineNr" > 674 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L675" class = "LineNr" > 675 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L676" class = "LineNr" > 676 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L677" class = "LineNr" > 677 < / span > < span class = "subxComment" > # initialize input (meta comments in parens)< / span >
< span id = "L678" class = "LineNr" > 678 < / span > < span class = "subxComment" > # == code (new segment)< / span >
< span id = "L679" class = "LineNr" > 679 < / span > < span class = "subxComment" > # 1 " a" /x< / span >
< span id = "L680" class = "LineNr" > 680 < / span > < span class = "subxComment" > # 2 " bc" /y< / span >
< span id = "L681" class = "LineNr" > 681 < / span > 68/push < span class = "Constant" > " == code 0x1\n" < / span > /imm32
< span id = "L682" class = "LineNr" > 682 < / span > 68/push _test-input-stream/imm32
< span id = "L683" class = "LineNr" > 683 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L684" class = "LineNr" > 684 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L685" class = "LineNr" > 685 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L686" class = "LineNr" > 686 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L687" class = "LineNr" > 687 < / span > < span class = "subxS1Comment" > # . write(_test-input-stream, " 1 \" a\" /x\n" )< / span >
< span id = "L688" class = "LineNr" > 688 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L689" class = "LineNr" > 689 < / span > 68/push < span class = "Constant" > " 1 \" < / span > a\< span class = "Constant" > " /x\n" < / span > /imm32
< span id = "L690" class = "LineNr" > 690 < / span > 68/push _test-input-stream/imm32
< span id = "L691" class = "LineNr" > 691 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L692" class = "LineNr" > 692 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L693" class = "LineNr" > 693 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L694" class = "LineNr" > 694 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L695" class = "LineNr" > 695 < / span > < span class = "subxS1Comment" > # . write(_test-input-stream, " 2 \" bc\" /y\n" )< / span >
< span id = "L696" class = "LineNr" > 696 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L697" class = "LineNr" > 697 < / span > 68/push < span class = "Constant" > " 2 \" < / span > bc\< span class = "Constant" > " /y\n" < / span > /imm32
< span id = "L698" class = "LineNr" > 698 < / span > 68/push _test-input-stream/imm32
< span id = "L699" class = "LineNr" > 699 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L700" class = "LineNr" > 700 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L701" class = "LineNr" > 701 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L702" class = "LineNr" > 702 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L703" class = "LineNr" > 703 < / span > < span class = "subxComment" > # convert(_test-input-buffered-file, _test-output-buffered-file)< / span >
< span id = "L704" class = "LineNr" > 704 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L705" class = "LineNr" > 705 < / span > 68/push _test-output-buffered-file/imm32
< span id = "L706" class = "LineNr" > 706 < / span > 68/push _test-input-buffered-file/imm32
< span id = "L707" class = "LineNr" > 707 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L708" class = "LineNr" > 708 < / span > e8/call < a href = 'dquotes.subx.html#L83' > convert< / a > /disp32
< span id = "L709" class = "LineNr" > 709 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L710" class = "LineNr" > 710 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L711" class = "LineNr" > 711 < / span > < span class = "subxS1Comment" > # . flush(_test-output-buffered-file)< / span >
< span id = "L712" class = "LineNr" > 712 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L713" class = "LineNr" > 713 < / span > 68/push _test-output-buffered-file/imm32
< span id = "L714" class = "LineNr" > 714 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L715" class = "LineNr" > 715 < / span > e8/call < a href = '../064write-byte.subx.html#L79' > flush< / a > /disp32
< span id = "L716" class = "LineNr" > 716 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L717" class = "LineNr" > 717 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L718" class = "LineNr" > 718 < / span > < span class = "subxComment" > # check output< / span >
< span id = "L719" class = "LineNr" > 719 < / span > < span class = "subxComment" > # == code 0x1< / span >
< span id = "L720" class = "LineNr" > 720 < / span > < span class = "subxComment" > # 1 _string1/x< / span >
< span id = "L721" class = "LineNr" > 721 < / span > < span class = "subxComment" > # 2 _string2/y< / span >
< span id = "L722" class = "LineNr" > 722 < / span > < span class = "subxComment" > # == data< / span >
< span id = "L723" class = "LineNr" > 723 < / span > < span class = "subxComment" > # _string1:< / span >
< span id = "L724" class = "LineNr" > 724 < / span > < span class = "subxComment" > # 1/imm32 61/a< / span >
< span id = "L725" class = "LineNr" > 725 < / span > < span class = "subxComment" > # _string2:< / span >
< span id = "L726" class = "LineNr" > 726 < / span > < span class = "subxComment" > # 2/imm32 62/b 63/c< / span >
< span id = "L727" class = "LineNr" > 727 < / span > < span class = "subxComment" > # We don't care right now what exactly happens to comments. Trailing spaces are also minor details.< / span >
< span id = "L728" class = "LineNr" > 728 < / span > < span class = "subxComment" > #< / span >
< span id = "L729" class = "LineNr" > 729 < / span > < span class = "subxComment" > # Open question: how to make this check more robust.< / span >
< span id = "L730" class = "LineNr" > 730 < / span > < span class = "subxComment" > # We don't actually care what the auto-generated string variables are< / span >
< span id = "L731" class = "LineNr" > 731 < / span > < span class = "subxComment" > # called. We just want to make sure instructions using string literals< / span >
< span id = "L732" class = "LineNr" > 732 < / span > < span class = "subxComment" > # switch to a string variable with the right value.< / span >
< span id = "L733" class = "LineNr" > 733 < / span > < span class = "subxComment" > # (Modifying string literals completely off the radar for now.)< / span >
< span id = "L734" class = "Folded" > 734 < / span > < span class = "Folded" > +-- 33 lines: #? # dump output ---------------------------------------------------------------------------------------------------------------------------< / span >
< span id = "L767" class = "LineNr" > 767 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " == code 0x1 " , msg)< / span >
< span id = "L768" class = "LineNr" > 768 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L769" class = "LineNr" > 769 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L640' > test-convert-processes-string-literals< / a > /0" < / span > /imm32
< span id = "L770" class = "LineNr" > 770 < / span > 68/push < span class = "Constant" > " == code 0x1 " < / span > /imm32
< span id = "L771" class = "LineNr" > 771 < / span > 68/push _test-output-stream/imm32
< span id = "L772" class = "LineNr" > 772 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L773" class = "LineNr" > 773 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / a > /disp32
< span id = "L774" class = "LineNr" > 774 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L775" class = "LineNr" > 775 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L776" class = "LineNr" > 776 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " 1 _string1/x " , msg)< / span >
< span id = "L777" class = "LineNr" > 777 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L778" class = "LineNr" > 778 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L640' > test-convert-processes-string-literals< / a > /1" < / span > /imm32
< span id = "L779" class = "LineNr" > 779 < / span > 68/push < span class = "Constant" > " 1 _string1/x " < / span > /imm32
< span id = "L780" class = "LineNr" > 780 < / span > 68/push _test-output-stream/imm32
< span id = "L781" class = "LineNr" > 781 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L782" class = "LineNr" > 782 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / a > /disp32
< span id = "L783" class = "LineNr" > 783 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L784" class = "LineNr" > 784 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L785" class = "LineNr" > 785 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " 2 _string2/y " , msg)< / span >
< span id = "L786" class = "LineNr" > 786 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L787" class = "LineNr" > 787 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L640' > test-convert-processes-string-literals< / a > /2" < / span > /imm32
< span id = "L788" class = "LineNr" > 788 < / span > 68/push < span class = "Constant" > " 2 _string2/y " < / span > /imm32
< span id = "L789" class = "LineNr" > 789 < / span > 68/push _test-output-stream/imm32
< span id = "L790" class = "LineNr" > 790 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L791" class = "LineNr" > 791 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / a > /disp32
< span id = "L792" class = "LineNr" > 792 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L793" class = "LineNr" > 793 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L794" class = "LineNr" > 794 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " == data" , msg)< / span >
< span id = "L795" class = "LineNr" > 795 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L796" class = "LineNr" > 796 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L640' > test-convert-processes-string-literals< / a > /3" < / span > /imm32
< span id = "L797" class = "LineNr" > 797 < / span > 68/push < span class = "Constant" > " == data" < / span > /imm32
< span id = "L798" class = "LineNr" > 798 < / span > 68/push _test-output-stream/imm32
< span id = "L799" class = "LineNr" > 799 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L800" class = "LineNr" > 800 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / a > /disp32
< span id = "L801" class = "LineNr" > 801 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L802" class = "LineNr" > 802 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L803" class = "LineNr" > 803 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " _string1: " , msg)< / span >
< span id = "L804" class = "LineNr" > 804 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L805" class = "LineNr" > 805 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L640' > test-convert-processes-string-literals< / a > /4" < / span > /imm32
< span id = "L806" class = "LineNr" > 806 < / span > 68/push < span class = "Constant" > " _string1:" < / span > /imm32
< span id = "L807" class = "LineNr" > 807 < / span > 68/push _test-output-stream/imm32
< span id = "L808" class = "LineNr" > 808 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L809" class = "LineNr" > 809 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / a > /disp32
< span id = "L810" class = "LineNr" > 810 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L811" class = "LineNr" > 811 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L812" class = "LineNr" > 812 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " 1/imm32 61/a " , msg)< / span >
< span id = "L813" class = "LineNr" > 813 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L814" class = "LineNr" > 814 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L640' > test-convert-processes-string-literals< / a > /5" < / span > /imm32
< span id = "L815" class = "LineNr" > 815 < / span > 68/push < span class = "Constant" > " 0x00000001/imm32 61/a " < / span > /imm32
< span id = "L816" class = "LineNr" > 816 < / span > 68/push _test-output-stream/imm32
< span id = "L817" class = "LineNr" > 817 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L818" class = "LineNr" > 818 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / a > /disp32
< span id = "L819" class = "LineNr" > 819 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L820" class = "LineNr" > 820 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L821" class = "LineNr" > 821 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " _string2: " , msg)< / span >
< span id = "L822" class = "LineNr" > 822 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L823" class = "LineNr" > 823 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L640' > test-convert-processes-string-literals< / a > /6" < / span > /imm32
< span id = "L824" class = "LineNr" > 824 < / span > 68/push < span class = "Constant" > " _string2:" < / span > /imm32
< span id = "L825" class = "LineNr" > 825 < / span > 68/push _test-output-stream/imm32
< span id = "L826" class = "LineNr" > 826 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L827" class = "LineNr" > 827 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-equal< / 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 > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L830" class = "LineNr" > 830 < / span > < span class = "subxS1Comment" > # . check-next-stream-line-equal(_test-output-stream, " 2/imm32 62/b 63/c " , 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 = 'dquotes.subx.html#L640' > test-convert-processes-string-literals< / a > /7" < / span > /imm32
< span id = "L833" class = "LineNr" > 833 < / span > 68/push < span class = "Constant" > " 0x00000002/imm32 62/b 63/c " < / span > /imm32
< span id = "L834" class = "LineNr" > 834 < / span > 68/push _test-output-stream/imm32
< span id = "L835" class = "LineNr" > 835 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L836" class = "LineNr" > 836 < / span > e8/call < a href = '../058stream-equal.subx.html#L563' > check-next-stream-line-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 = "subxS1Comment" > # . epilog< / span >
< span id = "L840" class = "LineNr" > 840 < / 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 = "L841" class = "LineNr" > 841 < / span > 5d/pop-to-EBP
< span id = "L842" class = "LineNr" > 842 < / span > c3/return
< span id = "L843" class = "LineNr" > 843 < / span >
< span id = "L844" class = "LineNr" > 844 < / span > < span class = "subxComment" > # generate the data segment contents byte by byte for a given slice< / span >
< span id = "L845" class = "LineNr" > 845 < / span > < span class = "subxFunction" > emit-string-literal-data< / span > : < span class = "subxComment" > # out : (address stream), word : (address slice)< / span >
< span id = "L846" class = "LineNr" > 846 < / span > < span class = "subxComment" > # pseudocode< / span >
< span id = "L847" class = "LineNr" > 847 < / span > < span class = "subxComment" > # len = string-length-at-start-of-slice(word-> start, word-> end)< / span >
< span id = "L848" class = "LineNr" > 848 < / span > < span class = "subxComment" > # print(out, " #{len}/imm32 " )< / span >
< span id = "L849" class = "LineNr" > 849 < / span > < span class = "subxComment" > # curr = word-> start< / span >
< span id = "L850" class = "LineNr" > 850 < / span > < span class = "subxComment" > # ++curr # skip '" '< / span >
< span id = "L851" class = "LineNr" > 851 < / span > < span class = "subxComment" > # while true< / span >
< span id = "L852" class = "LineNr" > 852 < / span > < span class = "subxComment" > # if (curr > = word-> end) break< / span >
< span id = "L853" class = "LineNr" > 853 < / span > < span class = "subxComment" > # c = *curr< / span >
< span id = "L854" class = "LineNr" > 854 < / span > < span class = "subxComment" > # if (c == '" ') break< / span >
2019-07-25 07:08:23 +00:00
< span id = "L855" class = "LineNr" > 855 < / span > < span class = "subxComment" > # if (c == '\') {< / span >
< span id = "L856" class = "LineNr" > 856 < / span > < span class = "subxComment" > # ++curr< / span >
< span id = "L857" class = "LineNr" > 857 < / span > < span class = "subxComment" > # c = *curr< / span >
< span id = "L858" class = "LineNr" > 858 < / span > < span class = "subxComment" > # if (c == 'n')< / span >
< span id = "L859" class = "LineNr" > 859 < / span > < span class = "subxComment" > # c = newline< / span >
< span id = "L860" class = "LineNr" > 860 < / span > < span class = "subxComment" > # }< / span >
< span id = "L861" class = "LineNr" > 861 < / span > < span class = "subxComment" > # append-byte-hex(out, c)< / span >
< span id = "L862" class = "LineNr" > 862 < / span > < span class = "subxComment" > # if c is alphanumeric:< / span >
< span id = "L863" class = "LineNr" > 863 < / span > < span class = "subxComment" > # write(out, " /" )< / span >
< span id = "L864" class = "LineNr" > 864 < / span > < span class = "subxComment" > # append-byte(out, c)< / span >
< span id = "L865" class = "LineNr" > 865 < / span > < span class = "subxComment" > # write(out, " " )< / span >
< span id = "L866" class = "LineNr" > 866 < / span > < span class = "subxComment" > # ++curr< / span >
< span id = "L867" class = "LineNr" > 867 < / span > < span class = "subxComment" > #< / span >
< span id = "L868" class = "LineNr" > 868 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L869" class = "LineNr" > 869 < / span > 55/push-EBP
< span id = "L870" class = "LineNr" > 870 < / 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 = "L871" class = "LineNr" > 871 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L872" class = "LineNr" > 872 < / span > 50/push-EAX
< span id = "L873" class = "LineNr" > 873 < / span > 51/push-ECX
< span id = "L874" class = "LineNr" > 874 < / span > 52/push-EDX
< span id = "L875" class = "LineNr" > 875 < / span > 56/push-ESI
< span id = "L876" class = "LineNr" > 876 < / span > < span class = "subxComment" > # ESI = word< / span >
< span id = "L877" class = "LineNr" > 877 < / 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 = "L878" class = "LineNr" > 878 < / span > < span class = "subxComment" > # curr/EDX = word-> start< / span >
< span id = "L879" class = "LineNr" > 879 < / 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 = "L880" class = "LineNr" > 880 < / span > < span class = "subxComment" > # max/ESI = word-> end< / span >
< span id = "L881" class = "LineNr" > 881 < / span > 8b/copy 1/mod/*+disp8 6/rm32/ESI < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 6/r32/ESI 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ESI+4) to ESI< / span >
< span id = "L882" class = "LineNr" > 882 < / span > < span class = "Constant" > $emit-string-literal-data:emit-length< / span > :
< span id = "L883" class = "LineNr" > 883 < / span > < span class = "subxComment" > # len/EAX = string-length-at-start-of-slice(word-> start, word-> end)< / span >
< span id = "L884" class = "LineNr" > 884 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L885" class = "LineNr" > 885 < / span > 56/push-ESI
< span id = "L886" class = "LineNr" > 886 < / span > 52/push-EDX
< span id = "L887" class = "LineNr" > 887 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L888" class = "LineNr" > 888 < / span > e8/call < a href = 'dquotes.subx.html#L2599' > string-length-at-start-of-slice< / a > /disp32
< span id = "L889" class = "LineNr" > 889 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L890" class = "LineNr" > 890 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L891" class = "LineNr" > 891 < / span > < span class = "subxComment" > # print(out, " #{len}/imm32 " )< / span >
< span id = "L892" class = "LineNr" > 892 < / span > < span class = "subxS1Comment" > # . print-int32(out, len)< / span >
< span id = "L893" class = "LineNr" > 893 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L894" class = "LineNr" > 894 < / span > 50/push-EAX
< span id = "L895" class = "LineNr" > 895 < / 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 = "L896" class = "LineNr" > 896 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L897" class = "LineNr" > 897 < / span > e8/call < a href = '../066print-int.subx.html#L179' > print-int32< / a > /disp32
< span id = "L898" class = "LineNr" > 898 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L899" class = "LineNr" > 899 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L900" class = "LineNr" > 900 < / span > < span class = "subxS1Comment" > # . write(out, " /imm32 " )< / span >
< span id = "L901" class = "LineNr" > 901 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L902" class = "LineNr" > 902 < / span > 68/push < span class = "Constant" > " /imm32 " < / span > /imm32
< span id = "L903" class = "LineNr" > 903 < / 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 = "L904" class = "LineNr" > 904 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L905" class = "LineNr" > 905 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L906" class = "LineNr" > 906 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L907" class = "LineNr" > 907 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L908" class = "LineNr" > 908 < / span > < span class = "Constant" > $emit-string-literal-data:loop-init< / span > :
< span id = "L909" class = "LineNr" > 909 < / span > < span class = "subxComment" > # ++curr # skip initial '" '< / span >
< span id = "L910" class = "LineNr" > 910 < / span > 42/increment-EDX
< span id = "L911" class = "LineNr" > 911 < / span > < span class = "subxComment" > # c/ECX = 0< / span >
< span id = "L912" class = "LineNr" > 912 < / 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 = "L913" class = "LineNr" > 913 < / span > < span class = "Constant" > $emit-string-literal-data:loop< / span > :
< span id = "L914" class = "LineNr" > 914 < / span > < span class = "subxComment" > # if (curr > = max) break< / span >
< span id = "L915" class = "LineNr" > 915 < / span > 39/compare 3/mod/direct 2/rm32/EDX < 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" > # compare EDX with ESI< / span >
< span id = "L916" class = "LineNr" > 916 < / span > 0f 83/jump-if-greater-or-equal-unsigned $emit-string-literal-data:end/disp32
< span id = "L917" class = "LineNr" > 917 < / span > < span class = "subxComment" > # CL = *curr< / span >
< span id = "L918" class = "LineNr" > 918 < / span > 8a/copy-byte 0/mod/indirect 2/rm32/EDX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 1/r32/CL < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "subxComment" > # copy byte at *EDX to CL< / span >
< span id = "L919" class = "LineNr" > 919 < / span > < span class = "subxComment" > # if (c == '" ') break< / span >
< span id = "L920" class = "LineNr" > 920 < / 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 > 0x22/imm32/dquote < span class = "subxComment" > # compare ECX< / span >
< span id = "L921" class = "LineNr" > 921 < / span > 74/jump-if-equal $emit-string-literal-data:end/disp8
< span id = "L922" class = "LineNr" > 922 < / span > < span class = "subxComment" > # if (c != '\') goto emit< / span >
< span id = "L923" class = "LineNr" > 923 < / 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 > 0x5c/imm32/backslash < span class = "subxComment" > # compare ECX< / span >
< span id = "L924" class = "LineNr" > 924 < / span > 75/jump-if-not-equal $emit-string-literal-data:emit/disp8
< span id = "L925" class = "LineNr" > 925 < / span > < span class = "subxComment" > # ++curr< / span >
< span id = "L926" class = "LineNr" > 926 < / span > 42/increment-EDX
< span id = "L927" class = "LineNr" > 927 < / span > < span class = "subxComment" > # if (curr > = max) break< / span >
< span id = "L928" class = "LineNr" > 928 < / span > 39/compare 3/mod/direct 2/rm32/EDX < 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" > # compare EDX with ESI< / span >
< span id = "L929" class = "LineNr" > 929 < / span > 73/jump-if-greater-or-equal-unsigned $emit-string-literal-data:end/disp8
< span id = "L930" class = "LineNr" > 930 < / span > < span class = "subxComment" > # c = *curr< / span >
< span id = "L931" class = "LineNr" > 931 < / span > 8a/copy-byte 0/mod/indirect 2/rm32/EDX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 1/r32/CL < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "subxComment" > # copy byte at *EDX to CL< / span >
< span id = "L932" class = "LineNr" > 932 < / span > < span class = "subxComment" > # if (c == 'n') c = newline< / span >
< span id = "L933" class = "LineNr" > 933 < / 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 > 0x6e/imm32/n < span class = "subxComment" > # compare ECX< / span >
< span id = "L934" class = "LineNr" > 934 < / span > 75/jump-if-not-equal $emit-string-literal-data:emit/disp8
< span id = "L935" class = "LineNr" > 935 < / span > b9/copy-to-ECX 0x0a/imm32/newline
< span id = "L936" class = "LineNr" > 936 < / span > < span class = "Constant" > $emit-string-literal-data:emit< / span > :
< span id = "L937" class = "LineNr" > 937 < / span > < span class = "subxComment" > # append-byte-hex(out, CL)< / span >
2019-07-14 16:42:36 +00:00
< span id = "L938" class = "LineNr" > 938 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L939" class = "LineNr" > 939 < / span > 51/push-ECX
2019-07-25 07:08:23 +00:00
< span id = "L940" class = "LineNr" > 940 < / 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 = "L941" class = "LineNr" > 941 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L942" class = "LineNr" > 942 < / span > e8/call < a href = '../066print-int.subx.html#L20' > append-byte-hex< / a > /disp32
< span id = "L943" class = "LineNr" > 943 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L944" class = "LineNr" > 944 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L945" class = "LineNr" > 945 < / span > < span class = "subxComment" > # if (is-alphanumeric?(*curr)) print(out, " /#{*curr}" )< / span >
< span id = "L946" class = "LineNr" > 946 < / span > < span class = "subxS1Comment" > # . EAX = is-alphanumeric?(CL)< / span >
< span id = "L947" class = "LineNr" > 947 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L948" class = "LineNr" > 948 < / span > 51/push-ECX
< span id = "L949" class = "LineNr" > 949 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L950" class = "LineNr" > 950 < / span > e8/call < a href = 'dquotes.subx.html#L995' > is-alphanumeric?< / a > /disp32
< span id = "L951" class = "LineNr" > 951 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L952" class = "LineNr" > 952 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L953" class = "LineNr" > 953 < / span > < span class = "subxS1Comment" > # . if (EAX == 0) goto char-done< / span >
< span id = "L954" class = "LineNr" > 954 < / span > 3d/compare-EAX-and 0/imm32
< span id = "L955" class = "LineNr" > 955 < / span > 74/jump-if-equal $emit-string-literal-data:char-done/disp8
< span id = "L956" class = "LineNr" > 956 < / span > < span class = "subxS1Comment" > # . write(out, " /" )< / span >
< span id = "L957" class = "LineNr" > 957 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L958" class = "LineNr" > 958 < / span > 68/push < span class = "SpecialChar" > < a href = 'dquotes.subx.html#L2725' > Slash< / a > < / span > /imm32
< span id = "L959" class = "LineNr" > 959 < / 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 = "L960" class = "LineNr" > 960 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L961" class = "LineNr" > 961 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L962" class = "LineNr" > 962 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L963" class = "LineNr" > 963 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L964" class = "LineNr" > 964 < / span > < span class = "subxS1Comment" > # . append-byte(out, *curr)< / span >
2019-07-14 16:42:36 +00:00
< span id = "L965" class = "LineNr" > 965 < / span > < span class = "subxS2Comment" > # . . push args< / span >
2019-07-25 07:08:23 +00:00
< span id = "L966" class = "LineNr" > 966 < / span > 51/push-ECX
2019-07-14 16:42:36 +00:00
< span id = "L967" class = "LineNr" > 967 < / 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 = "L968" class = "LineNr" > 968 < / span > < span class = "subxS2Comment" > # . . call< / span >
2019-07-25 07:08:23 +00:00
< span id = "L969" class = "LineNr" > 969 < / span > e8/call < a href = '../064write-byte.subx.html#L212' > append-byte< / a > /disp32
2019-07-14 16:42:36 +00:00
< span id = "L970" class = "LineNr" > 970 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L971" class = "LineNr" > 971 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
2019-07-25 07:08:23 +00:00
< span id = "L972" class = "LineNr" > 972 < / span > < span class = "Constant" > $emit-string-literal-data:char-done< / span > :
< span id = "L973" class = "LineNr" > 973 < / span > < span class = "subxComment" > # write(out, " " )< / span >
< span id = "L974" class = "LineNr" > 974 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L975" class = "LineNr" > 975 < / span > 68/push < span class = "SpecialChar" > < a href = 'dquotes.subx.html#L2718' > Space< / a > < / span > /imm32
< span id = "L976" class = "LineNr" > 976 < / 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 = "L977" class = "LineNr" > 977 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L978" class = "LineNr" > 978 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L979" class = "LineNr" > 979 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L980" class = "LineNr" > 980 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L981" class = "LineNr" > 981 < / span > < span class = "subxComment" > # ++curr< / span >
< span id = "L982" class = "LineNr" > 982 < / span > 42/increment-EDX
< span id = "L983" class = "LineNr" > 983 < / span > e9/jump $emit-string-literal-data:loop/disp32
< span id = "L984" class = "LineNr" > 984 < / span > < span class = "Constant" > $emit-string-literal-data:end< / span > :
< span id = "L985" class = "LineNr" > 985 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L986" class = "LineNr" > 986 < / span > 5e/pop-to-ESI
< span id = "L987" class = "LineNr" > 987 < / span > 5a/pop-to-EDX
< span id = "L988" class = "LineNr" > 988 < / span > 59/pop-to-ECX
< span id = "L989" class = "LineNr" > 989 < / span > 58/pop-to-EAX
< span id = "L990" class = "LineNr" > 990 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L991" class = "LineNr" > 991 < / 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 = "L992" class = "LineNr" > 992 < / span > 5d/pop-to-EBP
< span id = "L993" class = "LineNr" > 993 < / span > c3/return
< span id = "L994" class = "LineNr" > 994 < / span >
< span id = "L995" class = "LineNr" > 995 < / span > < span class = "subxFunction" > is-alphanumeric?< / span > : < span class = "subxComment" > # c : int -> EAX : boolean< / span >
< span id = "L996" class = "LineNr" > 996 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L997" class = "LineNr" > 997 < / span > 55/push-EBP
< span id = "L998" class = "LineNr" > 998 < / 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 = "L999" class = "LineNr" > 999 < / span > < span class = "subxComment" > # EAX = c< / span >
< span id = "L1000" class = "LineNr" > 1000 < / 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 = "L1001" class = "LineNr" > 1001 < / span > < span class = "subxComment" > # if (EAX < '0') return false< / span >
< span id = "L1002" class = "LineNr" > 1002 < / span > 3d/compare-EAX-with 0x30/imm32/0
< span id = "L1003" class = "LineNr" > 1003 < / span > 7c/jump-if-lesser $is-alphanumeric?:false/disp8
< span id = "L1004" class = "LineNr" > 1004 < / span > < span class = "subxComment" > # if (EAX < = '9') return true< / span >
< span id = "L1005" class = "LineNr" > 1005 < / span > 3d/compare-EAX-with 0x39/imm32/9
< span id = "L1006" class = "LineNr" > 1006 < / span > 7e/jump-if-lesser-or-equal $is-alphanumeric?:true/disp8
< span id = "L1007" class = "LineNr" > 1007 < / span > < span class = "subxComment" > # if (EAX < 'A') return false< / span >
< span id = "L1008" class = "LineNr" > 1008 < / span > 3d/compare-EAX-with 0x41/imm32/A
< span id = "L1009" class = "LineNr" > 1009 < / span > 7c/jump-if-lesser $is-alphanumeric?:false/disp8
< span id = "L1010" class = "LineNr" > 1010 < / span > < span class = "subxComment" > # if (EAX < = 'Z') return true< / span >
< span id = "L1011" class = "LineNr" > 1011 < / span > 3d/compare-EAX-with 0x5a/imm32/Z
< span id = "L1012" class = "LineNr" > 1012 < / span > 7e/jump-if-lesser-or-equal $is-alphanumeric?:true/disp8
< span id = "L1013" class = "LineNr" > 1013 < / span > < span class = "subxComment" > # if (EAX < 'a') return false< / span >
< span id = "L1014" class = "LineNr" > 1014 < / span > 3d/compare-EAX-with 0x61/imm32/a
< span id = "L1015" class = "LineNr" > 1015 < / span > 7c/jump-if-lesser $is-alphanumeric?:false/disp8
< span id = "L1016" class = "LineNr" > 1016 < / span > < span class = "subxComment" > # if (EAX < = 'z') return true< / span >
< span id = "L1017" class = "LineNr" > 1017 < / span > 3d/compare-EAX-with 0x7a/imm32/z
< span id = "L1018" class = "LineNr" > 1018 < / span > 7e/jump-if-lesser-or-equal $is-alphanumeric?:true/disp8
< span id = "L1019" class = "LineNr" > 1019 < / span > < span class = "subxComment" > # return false< / span >
< span id = "L1020" class = "LineNr" > 1020 < / span > < span class = "Constant" > $is-alphanumeric?:false< / span > :
< span id = "L1021" class = "LineNr" > 1021 < / span > b8/copy-to-EAX 0/imm32/false
< span id = "L1022" class = "LineNr" > 1022 < / span > eb/jump $is-alphanumeric?:end/disp8
< span id = "L1023" class = "LineNr" > 1023 < / span > < span class = "Constant" > $is-alphanumeric?:true< / span > :
< span id = "L1024" class = "LineNr" > 1024 < / span > b8/copy-to-EAX 1/imm32/true
< span id = "L1025" class = "LineNr" > 1025 < / span > < span class = "Constant" > $is-alphanumeric?:end< / span > :
< span id = "L1026" class = "LineNr" > 1026 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L1027" class = "LineNr" > 1027 < / 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 = "L1028" class = "LineNr" > 1028 < / span > 5d/pop-to-EBP
< span id = "L1029" class = "LineNr" > 1029 < / span > c3/return
< span id = "L1030" class = "LineNr" > 1030 < / span >
< span id = "L1031" class = "LineNr" > 1031 < / span > < span class = "subxTest" > test-emit-string-literal-data< / span > :
< span id = "L1032" class = "LineNr" > 1032 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L1033" class = "LineNr" > 1033 < / span > 55/push-EBP
< span id = "L1034" class = "LineNr" > 1034 < / 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 = "L1035" class = "LineNr" > 1035 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L1036" class = "LineNr" > 1036 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-stream)< / span >
< span id = "L1037" class = "LineNr" > 1037 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1038" class = "LineNr" > 1038 < / span > 68/push _test-output-stream/imm32
< span id = "L1039" class = "LineNr" > 1039 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1040" class = "LineNr" > 1040 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1041" class = "LineNr" > 1041 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1042" class = "LineNr" > 1042 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1043" class = "LineNr" > 1043 < / span > < span class = "subxComment" > # var slice/ECX = '" abc" /d'< / span >
< span id = "L1044" class = "LineNr" > 1044 < / span > 68/push < a href = 'dquotes.subx.html#L2734' > _test-slice-abc-limit< / a > /imm32
< span id = "L1045" class = "LineNr" > 1045 < / span > 68/push < a href = 'dquotes.subx.html#L2731' > _test-slice-abc< / a > /imm32
< span id = "L1046" class = "LineNr" > 1046 < / 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 = "L1047" class = "LineNr" > 1047 < / span > < span class = "subxComment" > # emit-string-literal-data(_test-output-stream, slice)< / span >
< span id = "L1048" class = "LineNr" > 1048 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1049" class = "LineNr" > 1049 < / span > 51/push-ECX
< span id = "L1050" class = "LineNr" > 1050 < / span > 68/push _test-output-stream/imm32
< span id = "L1051" class = "LineNr" > 1051 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1052" class = "LineNr" > 1052 < / span > e8/call < a href = 'dquotes.subx.html#L845' > emit-string-literal-data< / a > /disp32
< span id = "L1053" class = "LineNr" > 1053 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1054" class = "LineNr" > 1054 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1055" class = "Folded" > 1055 < / span > < span class = "Folded" > +-- 26 lines: #? # dump output ---------------------------------------------------------------------------------------------------------------------------< / span >
< span id = "L1081" class = "LineNr" > 1081 < / span > < span class = "subxS1Comment" > # . check-stream-equal(_test-output-stream, " 3/imm32 61/a 62/b 63/c " , msg)< / span >
< span id = "L1082" class = "LineNr" > 1082 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1083" class = "LineNr" > 1083 < / span > 68/push < span class = "Constant" > " F - test-emit-string-literal-data" < / span > /imm32
< span id = "L1084" class = "LineNr" > 1084 < / span > 68/push < span class = "Constant" > " 0x00000003/imm32 61/a 62/b 63/c " < / span > /imm32
< span id = "L1085" class = "LineNr" > 1085 < / span > 68/push _test-output-stream/imm32
< span id = "L1086" class = "LineNr" > 1086 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1087" class = "LineNr" > 1087 < / span > e8/call < a href = '../058stream-equal.subx.html#L193' > check-stream-equal< / a > /disp32
< span id = "L1088" class = "LineNr" > 1088 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1089" class = "LineNr" > 1089 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1090" class = "LineNr" > 1090 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L1091" class = "LineNr" > 1091 < / 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 = "L1092" class = "LineNr" > 1092 < / span > 5d/pop-to-EBP
< span id = "L1093" class = "LineNr" > 1093 < / span > c3/return
< span id = "L1094" class = "LineNr" > 1094 < / span >
< span id = "L1095" class = "LineNr" > 1095 < / span > < span class = "subxTest" > test-emit-string-literal-data-empty< / span > :
< span id = "L1096" class = "LineNr" > 1096 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L1097" class = "LineNr" > 1097 < / span > 55/push-EBP
< span id = "L1098" class = "LineNr" > 1098 < / 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 = "L1099" class = "LineNr" > 1099 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L1100" class = "LineNr" > 1100 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-stream)< / span >
< span id = "L1101" class = "LineNr" > 1101 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1102" class = "LineNr" > 1102 < / span > 68/push _test-output-stream/imm32
< span id = "L1103" class = "LineNr" > 1103 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1104" class = "LineNr" > 1104 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1105" class = "LineNr" > 1105 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1106" class = "LineNr" > 1106 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1107" class = "LineNr" > 1107 < / span > < span class = "subxComment" > # var slice/ECX = '" " '< / span >
< span id = "L1108" class = "LineNr" > 1108 < / span > 68/push 0/imm32/end
< span id = "L1109" class = "LineNr" > 1109 < / span > 68/push 0/imm32/start
< span id = "L1110" class = "LineNr" > 1110 < / 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 = "L1111" class = "LineNr" > 1111 < / span > < span class = "subxComment" > # emit-string-literal-data(_test-output-stream, slice)< / span >
< span id = "L1112" class = "LineNr" > 1112 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1113" class = "LineNr" > 1113 < / span > 51/push-ECX
< span id = "L1114" class = "LineNr" > 1114 < / span > 68/push _test-output-stream/imm32
< span id = "L1115" class = "LineNr" > 1115 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1116" class = "LineNr" > 1116 < / span > e8/call < a href = 'dquotes.subx.html#L845' > emit-string-literal-data< / a > /disp32
< span id = "L1117" class = "LineNr" > 1117 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1118" class = "LineNr" > 1118 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1119" class = "Folded" > 1119 < / span > < span class = "Folded" > +-- 26 lines: #? # dump output ---------------------------------------------------------------------------------------------------------------------------< / span >
< span id = "L1145" class = "LineNr" > 1145 < / span > < span class = "subxS1Comment" > # . check-stream-equal(_test-output-stream, " 0/imm32 " , msg)< / span >
< span id = "L1146" class = "LineNr" > 1146 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1147" class = "LineNr" > 1147 < / span > 68/push < span class = "Constant" > " F - test-emit-string-literal-data-empty" < / span > /imm32
< span id = "L1148" class = "LineNr" > 1148 < / span > 68/push < span class = "Constant" > " 0x00000000/imm32 " < / span > /imm32
< span id = "L1149" class = "LineNr" > 1149 < / span > 68/push _test-output-stream/imm32
< span id = "L1150" class = "LineNr" > 1150 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1151" class = "LineNr" > 1151 < / span > e8/call < a href = '../058stream-equal.subx.html#L193' > check-stream-equal< / a > /disp32
< span id = "L1152" class = "LineNr" > 1152 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1153" class = "LineNr" > 1153 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1154" class = "LineNr" > 1154 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L1155" class = "LineNr" > 1155 < / 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 = "L1156" class = "LineNr" > 1156 < / span > 5d/pop-to-EBP
< span id = "L1157" class = "LineNr" > 1157 < / span > c3/return
< span id = "L1158" class = "LineNr" > 1158 < / span >
< span id = "L1159" class = "LineNr" > 1159 < / span > < span class = "subxComment" > # just to keep things simple< / span >
< span id = "L1160" class = "LineNr" > 1160 < / span > < span class = "subxTest" > test-emit-string-literal-data-no-metadata-for-non-alphanumerics< / span > :
< span id = "L1161" class = "LineNr" > 1161 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L1162" class = "LineNr" > 1162 < / span > 55/push-EBP
< span id = "L1163" class = "LineNr" > 1163 < / 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 = "L1164" class = "LineNr" > 1164 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L1165" class = "LineNr" > 1165 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-stream)< / span >
< span id = "L1166" class = "LineNr" > 1166 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1167" class = "LineNr" > 1167 < / span > 68/push _test-output-stream/imm32
< span id = "L1168" class = "LineNr" > 1168 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1169" class = "LineNr" > 1169 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1170" class = "LineNr" > 1170 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1171" class = "LineNr" > 1171 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1172" class = "LineNr" > 1172 < / span > < span class = "subxComment" > # var slice/ECX = '" a b" '< / span >
< span id = "L1173" class = "LineNr" > 1173 < / span > 68/push < a href = 'dquotes.subx.html#L2738' > _test-slice-a-space-b-limit< / a > /imm32
< span id = "L1174" class = "LineNr" > 1174 < / span > 68/push < a href = 'dquotes.subx.html#L2736' > _test-slice-a-space-b< / a > /imm32
< span id = "L1175" class = "LineNr" > 1175 < / 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 = "L1176" class = "LineNr" > 1176 < / span > < span class = "subxComment" > # emit-string-literal-data(_test-output-stream, slice)< / span >
< span id = "L1177" class = "LineNr" > 1177 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1178" class = "LineNr" > 1178 < / span > 51/push-ECX
< span id = "L1179" class = "LineNr" > 1179 < / span > 68/push _test-output-stream/imm32
< span id = "L1180" class = "LineNr" > 1180 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1181" class = "LineNr" > 1181 < / span > e8/call < a href = 'dquotes.subx.html#L845' > emit-string-literal-data< / a > /disp32
< span id = "L1182" class = "LineNr" > 1182 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1183" class = "LineNr" > 1183 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1184" class = "Folded" > 1184 < / span > < span class = "Folded" > +-- 26 lines: #? # dump output ---------------------------------------------------------------------------------------------------------------------------< / span >
< span id = "L1210" class = "LineNr" > 1210 < / span > < span class = "subxS1Comment" > # . check-stream-equal(_test-output-stream, " 3/imm32 61/a 20 62/b " , msg) # ideally we'd like to say '20/space' but that requires managing names for codepoints< / span >
< span id = "L1211" class = "LineNr" > 1211 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1212" class = "LineNr" > 1212 < / span > 68/push < span class = "Constant" > " F - test-emit-string-literal-data-no-metadata-for-non-alphanumerics" < / span > /imm32
< span id = "L1213" class = "LineNr" > 1213 < / span > 68/push < span class = "Constant" > " 0x00000003/imm32 61/a 20 62/b " < / span > /imm32
< span id = "L1214" class = "LineNr" > 1214 < / span > 68/push _test-output-stream/imm32
< span id = "L1215" class = "LineNr" > 1215 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1216" class = "LineNr" > 1216 < / span > e8/call < a href = '../058stream-equal.subx.html#L193' > check-stream-equal< / a > /disp32
< span id = "L1217" class = "LineNr" > 1217 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1218" class = "LineNr" > 1218 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1219" class = "LineNr" > 1219 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L1220" class = "LineNr" > 1220 < / 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 = "L1221" class = "LineNr" > 1221 < / span > 5d/pop-to-EBP
< span id = "L1222" class = "LineNr" > 1222 < / span > c3/return
< span id = "L1223" class = "LineNr" > 1223 < / span >
< span id = "L1224" class = "LineNr" > 1224 < / span > < span class = "subxTest" > test-emit-string-literal-data-handles-escape-sequences< / span > :
< span id = "L1225" class = "LineNr" > 1225 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L1226" class = "LineNr" > 1226 < / span > 55/push-EBP
< span id = "L1227" class = "LineNr" > 1227 < / 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 = "L1228" class = "LineNr" > 1228 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L1229" class = "LineNr" > 1229 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-stream)< / span >
< span id = "L1230" class = "LineNr" > 1230 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1231" class = "LineNr" > 1231 < / span > 68/push _test-output-stream/imm32
< span id = "L1232" class = "LineNr" > 1232 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1233" class = "LineNr" > 1233 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1234" class = "LineNr" > 1234 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1235" class = "LineNr" > 1235 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1236" class = "LineNr" > 1236 < / span > < span class = "subxComment" > # var slice/ECX = '" a\" b" '< / span >
< span id = "L1237" class = "LineNr" > 1237 < / span > 68/push < a href = 'dquotes.subx.html#L2742' > _test-slice-a-dquote-b-limit< / a > /imm32
< span id = "L1238" class = "LineNr" > 1238 < / span > 68/push < a href = 'dquotes.subx.html#L2740' > _test-slice-a-dquote-b< / a > /imm32
< span id = "L1239" class = "LineNr" > 1239 < / 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 = "L1240" class = "LineNr" > 1240 < / span > < span class = "subxComment" > # emit-string-literal-data(_test-output-stream, slice)< / span >
< span id = "L1241" class = "LineNr" > 1241 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1242" class = "LineNr" > 1242 < / span > 51/push-ECX
< span id = "L1243" class = "LineNr" > 1243 < / span > 68/push _test-output-stream/imm32
< span id = "L1244" class = "LineNr" > 1244 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1245" class = "LineNr" > 1245 < / span > e8/call < a href = 'dquotes.subx.html#L845' > emit-string-literal-data< / a > /disp32
< span id = "L1246" class = "LineNr" > 1246 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1247" class = "LineNr" > 1247 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1248" class = "Folded" > 1248 < / span > < span class = "Folded" > +-- 26 lines: #? # dump output ---------------------------------------------------------------------------------------------------------------------------< / span >
< span id = "L1274" class = "LineNr" > 1274 < / span > < span class = "subxS1Comment" > # . check-stream-equal(_test-output-stream, " 3/imm32 61/a 22 62/b " , msg)< / span >
< span id = "L1275" class = "LineNr" > 1275 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1276" class = "LineNr" > 1276 < / span > 68/push < span class = "Constant" > " F - test-emit-string-literal-data-handles-escape-sequences" < / span > /imm32
< span id = "L1277" class = "LineNr" > 1277 < / span > 68/push < span class = "Constant" > " 0x00000003/imm32 61/a 22 62/b " < / span > /imm32
< span id = "L1278" class = "LineNr" > 1278 < / span > 68/push _test-output-stream/imm32
< span id = "L1279" class = "LineNr" > 1279 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1280" class = "LineNr" > 1280 < / span > e8/call < a href = '../058stream-equal.subx.html#L193' > check-stream-equal< / a > /disp32
< span id = "L1281" class = "LineNr" > 1281 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1282" class = "LineNr" > 1282 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1283" class = "LineNr" > 1283 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L1284" class = "LineNr" > 1284 < / 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 = "L1285" class = "LineNr" > 1285 < / span > 5d/pop-to-EBP
< span id = "L1286" class = "LineNr" > 1286 < / span > c3/return
< span id = "L1287" class = "LineNr" > 1287 < / span >
< span id = "L1288" class = "LineNr" > 1288 < / span > < span class = "subxTest" > test-emit-string-literal-data-handles-newline-escape< / span > :
< span id = "L1289" class = "LineNr" > 1289 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L1290" class = "LineNr" > 1290 < / span > 55/push-EBP
< span id = "L1291" class = "LineNr" > 1291 < / 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 = "L1292" class = "LineNr" > 1292 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L1293" class = "LineNr" > 1293 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-stream)< / span >
< span id = "L1294" class = "LineNr" > 1294 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1295" class = "LineNr" > 1295 < / span > 68/push _test-output-stream/imm32
< span id = "L1296" class = "LineNr" > 1296 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1297" class = "LineNr" > 1297 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1298" class = "LineNr" > 1298 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1299" class = "LineNr" > 1299 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1300" class = "LineNr" > 1300 < / span > < span class = "subxComment" > # var slice/ECX = '" a\nb" '< / span >
< span id = "L1301" class = "LineNr" > 1301 < / span > 68/push < a href = 'dquotes.subx.html#L2746' > _test-slice-a-newline-b-limit< / a > /imm32
< span id = "L1302" class = "LineNr" > 1302 < / span > 68/push < a href = 'dquotes.subx.html#L2744' > _test-slice-a-newline-b< / a > /imm32
< span id = "L1303" class = "LineNr" > 1303 < / 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 = "L1304" class = "LineNr" > 1304 < / span > < span class = "subxComment" > # emit-string-literal-data(_test-output-stream, slice)< / span >
< span id = "L1305" class = "LineNr" > 1305 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1306" class = "LineNr" > 1306 < / span > 51/push-ECX
< span id = "L1307" class = "LineNr" > 1307 < / span > 68/push _test-output-stream/imm32
< span id = "L1308" class = "LineNr" > 1308 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1309" class = "LineNr" > 1309 < / span > e8/call < a href = 'dquotes.subx.html#L845' > emit-string-literal-data< / a > /disp32
< span id = "L1310" class = "LineNr" > 1310 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1311" class = "LineNr" > 1311 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1312" class = "Folded" > 1312 < / span > < span class = "Folded" > +-- 26 lines: #? # dump output ---------------------------------------------------------------------------------------------------------------------------< / span >
< span id = "L1338" class = "LineNr" > 1338 < / span > < span class = "subxS1Comment" > # . check-stream-equal(_test-output-stream, " 3/imm32 61/a 0a 62/b " , msg)< / span >
< span id = "L1339" class = "LineNr" > 1339 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1340" class = "LineNr" > 1340 < / span > 68/push < span class = "Constant" > " F - test-emit-string-literal-data-handles-newline-escape" < / span > /imm32
< span id = "L1341" class = "LineNr" > 1341 < / span > 68/push < span class = "Constant" > " 0x00000003/imm32 61/a 0a 62/b " < / span > /imm32
< span id = "L1342" class = "LineNr" > 1342 < / span > 68/push _test-output-stream/imm32
< span id = "L1343" class = "LineNr" > 1343 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1344" class = "LineNr" > 1344 < / span > e8/call < a href = '../058stream-equal.subx.html#L193' > check-stream-equal< / a > /disp32
< span id = "L1345" class = "LineNr" > 1345 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1346" class = "LineNr" > 1346 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1347" class = "LineNr" > 1347 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L1348" class = "LineNr" > 1348 < / 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 = "L1349" class = "LineNr" > 1349 < / span > 5d/pop-to-EBP
< span id = "L1350" class = "LineNr" > 1350 < / span > c3/return
< span id = "L1351" class = "LineNr" > 1351 < / span >
< span id = "L1352" class = "LineNr" > 1352 < / span > < span class = "subxComment" > # emit everything from a word except the initial datum< / span >
< span id = "L1353" class = "LineNr" > 1353 < / span > < span class = "subxFunction" > emit-metadata< / span > : < span class = "subxComment" > # out : (address buffered-file), word : (address slice)< / span >
< span id = "L1354" class = "LineNr" > 1354 < / span > < span class = "subxComment" > # pseudocode< / span >
< span id = "L1355" class = "LineNr" > 1355 < / span > < span class = "subxComment" > # var slice = {0, word-> end}< / span >
< span id = "L1356" class = "LineNr" > 1356 < / span > < span class = "subxComment" > # curr = word-> start< / span >
< span id = "L1357" class = "LineNr" > 1357 < / span > < span class = "subxComment" > # if *curr == '" '< / span >
< span id = "L1358" class = "LineNr" > 1358 < / span > < span class = "subxComment" > # curr = skip-string-in-slice(curr, word-> end)< / span >
< span id = "L1359" class = "LineNr" > 1359 < / span > < span class = "subxComment" > # else< / span >
< span id = "L1360" class = "LineNr" > 1360 < / span > < span class = "subxComment" > # while true< / span >
< span id = "L1361" class = "LineNr" > 1361 < / span > < span class = "subxComment" > # if curr == word-> end< / span >
< span id = "L1362" class = "LineNr" > 1362 < / span > < span class = "subxComment" > # return< / span >
< span id = "L1363" class = "LineNr" > 1363 < / span > < span class = "subxComment" > # if *curr == '/'< / span >
< span id = "L1364" class = "LineNr" > 1364 < / span > < span class = "subxComment" > # break< / span >
< span id = "L1365" class = "LineNr" > 1365 < / span > < span class = "subxComment" > # ++curr< / span >
< span id = "L1366" class = "LineNr" > 1366 < / span > < span class = "subxComment" > # slice-> start = curr< / span >
< span id = "L1367" class = "LineNr" > 1367 < / span > < span class = "subxComment" > # write-slice-buffered(out, slice)< / span >
< span id = "L1368" class = "LineNr" > 1368 < / span > < span class = "subxComment" > #< / span >
< span id = "L1369" class = "LineNr" > 1369 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L1370" class = "LineNr" > 1370 < / span > 55/push-EBP
< span id = "L1371" class = "LineNr" > 1371 < / 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 = "L1372" class = "LineNr" > 1372 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L1373" class = "LineNr" > 1373 < / span > 50/push-EAX
< span id = "L1374" class = "LineNr" > 1374 < / span > 51/push-ECX
< span id = "L1375" class = "LineNr" > 1375 < / span > 52/push-EDX
< span id = "L1376" class = "LineNr" > 1376 < / span > 53/push-EBX
< span id = "L1377" class = "LineNr" > 1377 < / span > 56/push-ESI
< span id = "L1378" class = "LineNr" > 1378 < / span > < span class = "subxComment" > # ESI = word< / span >
< span id = "L1379" class = "LineNr" > 1379 < / 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 = "L1380" class = "LineNr" > 1380 < / span > < span class = "subxComment" > # curr/ECX = word-> start< / span >
< span id = "L1381" class = "LineNr" > 1381 < / 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 = "L1382" class = "LineNr" > 1382 < / span > < span class = "subxComment" > # end/EDX = word-> end< / span >
< span id = "L1383" class = "LineNr" > 1383 < / span > 8b/copy 1/mod/*+disp8 6/rm32/ESI < 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 *(ESI+4) to EDX< / span >
< span id = "L1384" class = "LineNr" > 1384 < / span > < span class = "subxComment" > # var slice/EBX = {0, end}< / span >
< span id = "L1385" class = "LineNr" > 1385 < / span > 52/push-EDX
< span id = "L1386" class = "LineNr" > 1386 < / span > 68/push 0/imm32
< span id = "L1387" class = "LineNr" > 1387 < / 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 = "L1388" class = "LineNr" > 1388 < / span > < span class = "subxComment" > # EAX = 0< / span >
< span id = "L1389" class = "LineNr" > 1389 < / span > b8/copy-to-EAX 0/imm32
< span id = "L1390" class = "LineNr" > 1390 < / span > < span class = "Constant" > $emit-metadata:check-for-string-literal< / span > :
< span id = "L1391" class = "LineNr" > 1391 < / span > < span class = "subxH1Comment" > # - if (*curr == '" ') curr = skip-string-in-slice(curr, end)< / span >
< span id = "L1392" class = "LineNr" > 1392 < / span > 8a/copy-byte 0/mod/indirect 1/rm32/ECX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/AL < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "subxComment" > # copy byte at *ECX to AL< / span >
< span id = "L1393" class = "LineNr" > 1393 < / span > 3d/compare-EAX-and 0x22/imm32/dquote
< span id = "L1394" class = "LineNr" > 1394 < / span > 75/jump-if-not-equal $emit-metadata:skip-datum-loop/disp8
< span id = "L1395" class = "LineNr" > 1395 < / span > < span class = "Constant" > $emit-metadata:skip-string-literal< / span > :
< span id = "L1396" class = "LineNr" > 1396 < / span > < span class = "subxS1Comment" > # . EAX = skip-string-in-slice(curr, end)< / span >
< span id = "L1397" class = "LineNr" > 1397 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1398" class = "LineNr" > 1398 < / span > 52/push-EDX
< span id = "L1399" class = "LineNr" > 1399 < / span > 51/push-ECX
< span id = "L1400" class = "LineNr" > 1400 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1401" class = "LineNr" > 1401 < / span > e8/call < a href = 'dquotes.subx.html#L2415' > skip-string-in-slice< / a > /disp32
< span id = "L1402" class = "LineNr" > 1402 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1403" class = "LineNr" > 1403 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1404" class = "LineNr" > 1404 < / span > < span class = "subxS1Comment" > # . curr = EAX< / span >
< span id = "L1405" class = "LineNr" > 1405 < / 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 = "L1406" class = "LineNr" > 1406 < / span > eb/jump $emit-metadata:emit/disp8
< span id = "L1407" class = "LineNr" > 1407 < / span > < span class = "Constant" > $emit-metadata:skip-datum-loop< / span > :
< span id = "L1408" class = "LineNr" > 1408 < / span > < span class = "subxH1Comment" > # - otherwise scan for '/'< / span >
< span id = "L1409" class = "LineNr" > 1409 < / span > < span class = "subxComment" > # if (curr == end) return< / span >
< span id = "L1410" class = "LineNr" > 1410 < / 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 and EDX< / span >
< span id = "L1411" class = "LineNr" > 1411 < / span > 74/jump-if-equal $emit-metadata:end/disp8
< span id = "L1412" class = "LineNr" > 1412 < / span > < span class = "subxComment" > # if (*curr == '/') break< / span >
< span id = "L1413" class = "LineNr" > 1413 < / span > 8a/copy-byte 0/mod/indirect 1/rm32/ECX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/AL < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "subxComment" > # copy byte at *ECX to AL< / span >
< span id = "L1414" class = "LineNr" > 1414 < / span > 3d/compare-EAX-and 0x2f/imm32/slash
< span id = "L1415" class = "LineNr" > 1415 < / span > 74/jump-if-equal $emit-metadata:emit/disp8
< span id = "L1416" class = "LineNr" > 1416 < / span > < span class = "subxComment" > # ++curr< / span >
< span id = "L1417" class = "LineNr" > 1417 < / span > 41/increment-ECX
< span id = "L1418" class = "LineNr" > 1418 < / span > eb/jump $emit-metadata:skip-datum-loop/disp8
< span id = "L1419" class = "LineNr" > 1419 < / span > < span class = "Constant" > $emit-metadata:emit< / span > :
< span id = "L1420" class = "LineNr" > 1420 < / span > < span class = "subxComment" > # slice-> start = ECX< / span >
< span id = "L1421" class = "LineNr" > 1421 < / span > 89/copy 0/mod/indirect 3/rm32/EBX < 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 *EBX< / span >
< span id = "L1422" class = "LineNr" > 1422 < / span > < span class = "subxComment" > # write-slice-buffered(out, slice)< / span >
< span id = "L1423" class = "LineNr" > 1423 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1424" class = "LineNr" > 1424 < / span > 53/push-EBX
< span id = "L1425" class = "LineNr" > 1425 < / 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 = "L1426" class = "LineNr" > 1426 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1427" class = "LineNr" > 1427 < / span > e8/call < a href = '../072slice.subx.html#L878' > write-slice-buffered< / a > /disp32
< span id = "L1428" class = "LineNr" > 1428 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1429" class = "LineNr" > 1429 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "Normal" > . < / span > < span class = "subxComment" > # add to ESP< / span >
< span id = "L1430" class = "LineNr" > 1430 < / span > < span class = "Constant" > $emit-metadata:end< / span > :
< span id = "L1431" class = "LineNr" > 1431 < / span > < span class = "subxS1Comment" > # . reclaim locals< / span >
< span id = "L1432" class = "LineNr" > 1432 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "Normal" > . < / span > < span class = "subxComment" > # add to ESP< / span >
< span id = "L1433" class = "LineNr" > 1433 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L1434" class = "LineNr" > 1434 < / span > 5e/pop-to-ESI
< span id = "L1435" class = "LineNr" > 1435 < / span > 5b/pop-to-EBX
< span id = "L1436" class = "LineNr" > 1436 < / span > 5a/pop-to-EDX
< span id = "L1437" class = "LineNr" > 1437 < / span > 59/pop-to-ECX
< span id = "L1438" class = "LineNr" > 1438 < / span > 58/pop-to-EAX
< span id = "L1439" class = "LineNr" > 1439 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L1440" class = "LineNr" > 1440 < / 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 = "L1441" class = "LineNr" > 1441 < / span > 5d/pop-to-EBP
< span id = "L1442" class = "LineNr" > 1442 < / span > c3/return
< span id = "L1443" class = "LineNr" > 1443 < / span >
< span id = "L1444" class = "LineNr" > 1444 < / span > < span class = "subxTest" > test-emit-metadata< / span > :
< span id = "L1445" class = "LineNr" > 1445 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L1446" class = "LineNr" > 1446 < / span > 55/push-EBP
< span id = "L1447" class = "LineNr" > 1447 < / 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 = "L1448" class = "LineNr" > 1448 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L1449" class = "LineNr" > 1449 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-stream)< / span >
< span id = "L1450" class = "LineNr" > 1450 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1451" class = "LineNr" > 1451 < / span > 68/push _test-output-stream/imm32
< span id = "L1452" class = "LineNr" > 1452 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1453" class = "LineNr" > 1453 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1454" class = "LineNr" > 1454 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1455" class = "LineNr" > 1455 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1456" class = "LineNr" > 1456 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-buffered-file+4)< / span >
< span id = "L1457" class = "LineNr" > 1457 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1458" class = "LineNr" > 1458 < / span > b8/copy-to-EAX _test-output-buffered-file/imm32
< span id = "L1459" class = "LineNr" > 1459 < / span > 05/add-to-EAX 4/imm32
< span id = "L1460" class = "LineNr" > 1460 < / span > 50/push-EAX
< span id = "L1461" class = "LineNr" > 1461 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1462" class = "LineNr" > 1462 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1463" class = "LineNr" > 1463 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1464" class = "LineNr" > 1464 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1465" class = "LineNr" > 1465 < / span > < span class = "subxComment" > # (EAX..ECX) = " abc/def" < / span >
< span id = "L1466" class = "LineNr" > 1466 < / span > b8/copy-to-EAX < span class = "Constant" > " abc/def" < / span > /imm32
< span id = "L1467" class = "LineNr" > 1467 < / span > 8b/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 *EAX to ECX< / span >
< span id = "L1468" class = "LineNr" > 1468 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 0/base/EAX 1/index/ECX < span class = "Normal" > . < / span > 1/r32/ECX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy EAX+ECX+4 to ECX< / span >
< span id = "L1469" class = "LineNr" > 1469 < / span > 05/add-to-EAX 4/imm32
< span id = "L1470" class = "LineNr" > 1470 < / span > < span class = "subxComment" > # var slice/ECX = {EAX, ECX}< / span >
< span id = "L1471" class = "LineNr" > 1471 < / span > 51/push-ECX
< span id = "L1472" class = "LineNr" > 1472 < / span > 50/push-EAX
< span id = "L1473" class = "LineNr" > 1473 < / 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 = "L1474" class = "LineNr" > 1474 < / span > < span class = "subxComment" > # emit-metadata(_test-output-buffered-file, slice)< / span >
< span id = "L1475" class = "LineNr" > 1475 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1476" class = "LineNr" > 1476 < / span > 51/push-ECX
< span id = "L1477" class = "LineNr" > 1477 < / span > 68/push _test-output-buffered-file/imm32
< span id = "L1478" class = "LineNr" > 1478 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1479" class = "LineNr" > 1479 < / span > e8/call < a href = 'dquotes.subx.html#L1353' > emit-metadata< / a > /disp32
< span id = "L1480" class = "LineNr" > 1480 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1481" class = "LineNr" > 1481 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1482" class = "LineNr" > 1482 < / span > < span class = "subxComment" > # flush(_test-output-buffered-file)< / span >
< span id = "L1483" class = "LineNr" > 1483 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1484" class = "LineNr" > 1484 < / span > 68/push _test-output-buffered-file/imm32
< span id = "L1485" class = "LineNr" > 1485 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1486" class = "LineNr" > 1486 < / span > e8/call < a href = '../064write-byte.subx.html#L79' > flush< / a > /disp32
< span id = "L1487" class = "LineNr" > 1487 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1488" class = "LineNr" > 1488 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1489" class = "LineNr" > 1489 < / span > < span class = "subxComment" > # check-stream-equal(_test-output-stream, " /def" , msg) # important that there's no leading space< / span >
< span id = "L1490" class = "LineNr" > 1490 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1491" class = "LineNr" > 1491 < / span > 68/push < span class = "Constant" > " F - test-emit-metadata" < / span > /imm32
< span id = "L1492" class = "LineNr" > 1492 < / span > 68/push < span class = "Constant" > " /def" < / span > /imm32
< span id = "L1493" class = "LineNr" > 1493 < / span > 68/push _test-output-stream/imm32
< span id = "L1494" class = "LineNr" > 1494 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1495" class = "LineNr" > 1495 < / span > e8/call < a href = '../058stream-equal.subx.html#L193' > check-stream-equal< / a > /disp32
< span id = "L1496" class = "LineNr" > 1496 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1497" class = "LineNr" > 1497 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1498" class = "LineNr" > 1498 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L1499" class = "LineNr" > 1499 < / 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 = "L1500" class = "LineNr" > 1500 < / span > 5d/pop-to-EBP
< span id = "L1501" class = "LineNr" > 1501 < / span > c3/return
< span id = "L1502" class = "LineNr" > 1502 < / span >
< span id = "L1503" class = "LineNr" > 1503 < / span > < span class = "subxTest" > test-emit-metadata-none< / span > :
< span id = "L1504" class = "LineNr" > 1504 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L1505" class = "LineNr" > 1505 < / span > 55/push-EBP
< span id = "L1506" class = "LineNr" > 1506 < / 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 = "L1507" class = "LineNr" > 1507 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L1508" class = "LineNr" > 1508 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-stream)< / span >
< span id = "L1509" class = "LineNr" > 1509 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1510" class = "LineNr" > 1510 < / span > 68/push _test-output-stream/imm32
< span id = "L1511" class = "LineNr" > 1511 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1512" class = "LineNr" > 1512 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1513" class = "LineNr" > 1513 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1514" class = "LineNr" > 1514 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1515" class = "LineNr" > 1515 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-buffered-file+4)< / span >
< span id = "L1516" class = "LineNr" > 1516 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1517" class = "LineNr" > 1517 < / span > b8/copy-to-EAX _test-output-buffered-file/imm32
< span id = "L1518" class = "LineNr" > 1518 < / span > 05/add-to-EAX 4/imm32
< span id = "L1519" class = "LineNr" > 1519 < / span > 50/push-EAX
< span id = "L1520" class = "LineNr" > 1520 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1521" class = "LineNr" > 1521 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1522" class = "LineNr" > 1522 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1523" class = "LineNr" > 1523 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1524" class = "LineNr" > 1524 < / span > < span class = "subxComment" > # (EAX..ECX) = " abc" < / span >
< span id = "L1525" class = "LineNr" > 1525 < / span > b8/copy-to-EAX < span class = "Constant" > " abc" < / span > /imm32
< span id = "L1526" class = "LineNr" > 1526 < / span > 8b/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 *EAX to ECX< / span >
< span id = "L1527" class = "LineNr" > 1527 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 0/base/EAX 1/index/ECX < span class = "Normal" > . < / span > 1/r32/ECX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy EAX+ECX+4 to ECX< / span >
< span id = "L1528" class = "LineNr" > 1528 < / span > 05/add-to-EAX 4/imm32
< span id = "L1529" class = "LineNr" > 1529 < / span > < span class = "subxComment" > # var slice/ECX = {EAX, ECX}< / span >
< span id = "L1530" class = "LineNr" > 1530 < / span > 51/push-ECX
< span id = "L1531" class = "LineNr" > 1531 < / span > 50/push-EAX
< span id = "L1532" class = "LineNr" > 1532 < / 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 = "L1533" class = "LineNr" > 1533 < / span > < span class = "subxComment" > # emit-metadata(_test-output-buffered-file, slice)< / span >
< span id = "L1534" class = "LineNr" > 1534 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1535" class = "LineNr" > 1535 < / span > 51/push-ECX
< span id = "L1536" class = "LineNr" > 1536 < / span > 68/push _test-output-buffered-file/imm32
< span id = "L1537" class = "LineNr" > 1537 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1538" class = "LineNr" > 1538 < / span > e8/call < a href = 'dquotes.subx.html#L1353' > emit-metadata< / a > /disp32
< span id = "L1539" class = "LineNr" > 1539 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1540" class = "LineNr" > 1540 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1541" class = "LineNr" > 1541 < / span > < span class = "subxComment" > # flush(_test-output-buffered-file)< / span >
< span id = "L1542" class = "LineNr" > 1542 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1543" class = "LineNr" > 1543 < / span > 68/push _test-output-buffered-file/imm32
< span id = "L1544" class = "LineNr" > 1544 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1545" class = "LineNr" > 1545 < / span > e8/call < a href = '../064write-byte.subx.html#L79' > flush< / a > /disp32
< span id = "L1546" class = "LineNr" > 1546 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1547" class = "LineNr" > 1547 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1548" class = "LineNr" > 1548 < / span > < span class = "subxComment" > # check-stream-equal(_test-output-stream, " " , msg)< / span >
< span id = "L1549" class = "LineNr" > 1549 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1550" class = "LineNr" > 1550 < / span > 68/push < span class = "Constant" > " F - test-emit-metadata-none" < / span > /imm32
< span id = "L1551" class = "LineNr" > 1551 < / span > 68/push < span class = "Constant" > " " < / span > /imm32
< span id = "L1552" class = "LineNr" > 1552 < / span > 68/push _test-output-stream/imm32
< span id = "L1553" class = "LineNr" > 1553 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1554" class = "LineNr" > 1554 < / span > e8/call < a href = '../058stream-equal.subx.html#L193' > check-stream-equal< / a > /disp32
< span id = "L1555" class = "LineNr" > 1555 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1556" class = "LineNr" > 1556 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1557" class = "LineNr" > 1557 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L1558" class = "LineNr" > 1558 < / 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 = "L1559" class = "LineNr" > 1559 < / span > 5d/pop-to-EBP
< span id = "L1560" class = "LineNr" > 1560 < / span > c3/return
< span id = "L1561" class = "LineNr" > 1561 < / span >
< span id = "L1562" class = "LineNr" > 1562 < / span > < span class = "subxTest" > test-emit-metadata-multiple< / span > :
< span id = "L1563" class = "LineNr" > 1563 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L1564" class = "LineNr" > 1564 < / span > 55/push-EBP
< span id = "L1565" class = "LineNr" > 1565 < / 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 = "L1566" class = "LineNr" > 1566 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L1567" class = "LineNr" > 1567 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-stream)< / span >
< span id = "L1568" class = "LineNr" > 1568 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1569" class = "LineNr" > 1569 < / span > 68/push _test-output-stream/imm32
< span id = "L1570" class = "LineNr" > 1570 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1571" class = "LineNr" > 1571 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1572" class = "LineNr" > 1572 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1573" class = "LineNr" > 1573 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1574" class = "LineNr" > 1574 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-buffered-file+4)< / span >
< span id = "L1575" class = "LineNr" > 1575 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1576" class = "LineNr" > 1576 < / span > b8/copy-to-EAX _test-output-buffered-file/imm32
< span id = "L1577" class = "LineNr" > 1577 < / span > 05/add-to-EAX 4/imm32
< span id = "L1578" class = "LineNr" > 1578 < / span > 50/push-EAX
< span id = "L1579" class = "LineNr" > 1579 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1580" class = "LineNr" > 1580 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1581" class = "LineNr" > 1581 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1582" class = "LineNr" > 1582 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1583" class = "LineNr" > 1583 < / span > < span class = "subxComment" > # (EAX..ECX) = " abc/def/ghi" < / span >
< span id = "L1584" class = "LineNr" > 1584 < / span > b8/copy-to-EAX < span class = "Constant" > " abc/def/ghi" < / span > /imm32
< span id = "L1585" class = "LineNr" > 1585 < / span > 8b/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 *EAX to ECX< / span >
< span id = "L1586" class = "LineNr" > 1586 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 0/base/EAX 1/index/ECX < span class = "Normal" > . < / span > 1/r32/ECX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy EAX+ECX+4 to ECX< / span >
< span id = "L1587" class = "LineNr" > 1587 < / span > 05/add-to-EAX 4/imm32
< span id = "L1588" class = "LineNr" > 1588 < / span > < span class = "subxComment" > # var slice/ECX = {EAX, ECX}< / span >
< span id = "L1589" class = "LineNr" > 1589 < / span > 51/push-ECX
< span id = "L1590" class = "LineNr" > 1590 < / span > 50/push-EAX
< span id = "L1591" class = "LineNr" > 1591 < / 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 = "L1592" class = "LineNr" > 1592 < / span > < span class = "subxComment" > # emit-metadata(_test-output-buffered-file, slice)< / span >
< span id = "L1593" class = "LineNr" > 1593 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1594" class = "LineNr" > 1594 < / span > 51/push-ECX
< span id = "L1595" class = "LineNr" > 1595 < / span > 68/push _test-output-buffered-file/imm32
< span id = "L1596" class = "LineNr" > 1596 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1597" class = "LineNr" > 1597 < / span > e8/call < a href = 'dquotes.subx.html#L1353' > emit-metadata< / a > /disp32
< span id = "L1598" class = "LineNr" > 1598 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1599" class = "LineNr" > 1599 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1600" class = "LineNr" > 1600 < / span > < span class = "subxComment" > # flush(_test-output-buffered-file)< / span >
< span id = "L1601" class = "LineNr" > 1601 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1602" class = "LineNr" > 1602 < / span > 68/push _test-output-buffered-file/imm32
< span id = "L1603" class = "LineNr" > 1603 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1604" class = "LineNr" > 1604 < / span > e8/call < a href = '../064write-byte.subx.html#L79' > flush< / a > /disp32
< span id = "L1605" class = "LineNr" > 1605 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1606" class = "LineNr" > 1606 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1607" class = "LineNr" > 1607 < / span > < span class = "subxComment" > # check-stream-equal(_test-output-stream, " /def/ghi" , msg) # important that there's no leading space< / span >
< span id = "L1608" class = "LineNr" > 1608 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1609" class = "LineNr" > 1609 < / span > 68/push < span class = "Constant" > " F - test-emit-metadata-multiple" < / span > /imm32
< span id = "L1610" class = "LineNr" > 1610 < / span > 68/push < span class = "Constant" > " /def/ghi" < / span > /imm32
< span id = "L1611" class = "LineNr" > 1611 < / span > 68/push _test-output-stream/imm32
< span id = "L1612" class = "LineNr" > 1612 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1613" class = "LineNr" > 1613 < / span > e8/call < a href = '../058stream-equal.subx.html#L193' > check-stream-equal< / a > /disp32
< span id = "L1614" class = "LineNr" > 1614 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1615" class = "LineNr" > 1615 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1616" class = "LineNr" > 1616 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L1617" class = "LineNr" > 1617 < / 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 = "L1618" class = "LineNr" > 1618 < / span > 5d/pop-to-EBP
< span id = "L1619" class = "LineNr" > 1619 < / span > c3/return
< span id = "L1620" class = "LineNr" > 1620 < / span >
< span id = "L1621" class = "LineNr" > 1621 < / span > < span class = "subxTest" > test-emit-metadata-when-no-datum< / span > :
< span id = "L1622" class = "LineNr" > 1622 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L1623" class = "LineNr" > 1623 < / span > 55/push-EBP
< span id = "L1624" class = "LineNr" > 1624 < / 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 = "L1625" class = "LineNr" > 1625 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L1626" class = "LineNr" > 1626 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-stream)< / span >
< span id = "L1627" class = "LineNr" > 1627 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1628" class = "LineNr" > 1628 < / span > 68/push _test-output-stream/imm32
< span id = "L1629" class = "LineNr" > 1629 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1630" class = "LineNr" > 1630 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1631" class = "LineNr" > 1631 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1632" class = "LineNr" > 1632 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1633" class = "LineNr" > 1633 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-buffered-file+4)< / span >
< span id = "L1634" class = "LineNr" > 1634 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1635" class = "LineNr" > 1635 < / span > b8/copy-to-EAX _test-output-buffered-file/imm32
< span id = "L1636" class = "LineNr" > 1636 < / span > 05/add-to-EAX 4/imm32
< span id = "L1637" class = "LineNr" > 1637 < / span > 50/push-EAX
2019-07-14 16:42:36 +00:00
< span id = "L1638" class = "LineNr" > 1638 < / span > < span class = "subxS2Comment" > # . . call< / span >
2019-07-25 07:08:23 +00:00
< span id = "L1639" class = "LineNr" > 1639 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
2019-07-14 16:42:36 +00:00
< span id = "L1640" class = "LineNr" > 1640 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
2019-07-25 07:08:23 +00:00
< span id = "L1641" class = "LineNr" > 1641 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1642" class = "LineNr" > 1642 < / span > < span class = "subxComment" > # var slice/ECX = " /abc" < / span >
< span id = "L1643" class = "LineNr" > 1643 < / span > b8/copy-to-EAX < span class = "Constant" > " /abc" < / span > /imm32
< span id = "L1644" class = "LineNr" > 1644 < / span > < span class = "subxS1Comment" > # . push end/ECX< / span >
< span id = "L1645" class = "LineNr" > 1645 < / span > 8b/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 *EAX to ECX< / span >
< span id = "L1646" class = "LineNr" > 1646 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 0/base/EAX 1/index/ECX < span class = "Normal" > . < / span > 1/r32/ECX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy EAX+ECX+4 to ECX< / span >
< span id = "L1647" class = "LineNr" > 1647 < / span > 51/push-ECX
< span id = "L1648" class = "LineNr" > 1648 < / span > < span class = "subxS1Comment" > # . push curr/EAX< / span >
< span id = "L1649" class = "LineNr" > 1649 < / span > 05/add-to-EAX 4/imm32
< span id = "L1650" class = "LineNr" > 1650 < / span > 50/push-EAX
< span id = "L1651" class = "LineNr" > 1651 < / span > < span class = "subxS1Comment" > # . save stack pointer< / span >
< span id = "L1652" class = "LineNr" > 1652 < / 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 = "L1653" class = "LineNr" > 1653 < / span > < span class = "subxComment" > # emit-metadata(_test-output-buffered-file, slice)< / span >
< span id = "L1654" class = "LineNr" > 1654 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1655" class = "LineNr" > 1655 < / span > 51/push-ECX
< span id = "L1656" class = "LineNr" > 1656 < / span > 68/push _test-output-buffered-file/imm32
< span id = "L1657" class = "LineNr" > 1657 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1658" class = "LineNr" > 1658 < / span > e8/call < a href = 'dquotes.subx.html#L1353' > emit-metadata< / a > /disp32
< span id = "L1659" class = "LineNr" > 1659 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1660" class = "LineNr" > 1660 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1661" class = "LineNr" > 1661 < / span > < span class = "subxComment" > # flush(_test-output-buffered-file)< / span >
< span id = "L1662" class = "LineNr" > 1662 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1663" class = "LineNr" > 1663 < / span > 68/push _test-output-buffered-file/imm32
< span id = "L1664" class = "LineNr" > 1664 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1665" class = "LineNr" > 1665 < / span > e8/call < a href = '../064write-byte.subx.html#L79' > flush< / a > /disp32
< span id = "L1666" class = "LineNr" > 1666 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1667" class = "LineNr" > 1667 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1668" class = "LineNr" > 1668 < / span > < span class = "subxComment" > # check-stream-equal(_test-output-stream, " /abc" , msg) # nothing skipped< / span >
< span id = "L1669" class = "LineNr" > 1669 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1670" class = "LineNr" > 1670 < / span > 68/push < span class = "Constant" > " F - test-emit-metadata-when-no-datum" < / span > /imm32
< span id = "L1671" class = "LineNr" > 1671 < / span > 68/push < span class = "Constant" > " /abc" < / span > /imm32
< span id = "L1672" class = "LineNr" > 1672 < / span > 68/push _test-output-stream/imm32
< span id = "L1673" class = "LineNr" > 1673 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1674" class = "LineNr" > 1674 < / span > e8/call < a href = '../058stream-equal.subx.html#L193' > check-stream-equal< / a > /disp32
< span id = "L1675" class = "LineNr" > 1675 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1676" class = "LineNr" > 1676 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1677" class = "LineNr" > 1677 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L1678" class = "LineNr" > 1678 < / 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 = "L1679" class = "LineNr" > 1679 < / span > 5d/pop-to-EBP
< span id = "L1680" class = "LineNr" > 1680 < / span > c3/return
< span id = "L1681" class = "LineNr" > 1681 < / span >
< span id = "L1682" class = "LineNr" > 1682 < / span > < span class = "subxTest" > test-emit-metadata-in-string-literal< / span > :
< span id = "L1683" class = "LineNr" > 1683 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L1684" class = "LineNr" > 1684 < / span > 55/push-EBP
< span id = "L1685" class = "LineNr" > 1685 < / 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 = "L1686" class = "LineNr" > 1686 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L1687" class = "LineNr" > 1687 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-stream)< / span >
< span id = "L1688" class = "LineNr" > 1688 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1689" class = "LineNr" > 1689 < / span > 68/push _test-output-stream/imm32
< span id = "L1690" class = "LineNr" > 1690 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1691" class = "LineNr" > 1691 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1692" class = "LineNr" > 1692 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1693" class = "LineNr" > 1693 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1694" class = "LineNr" > 1694 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-output-buffered-file+4)< / span >
< span id = "L1695" class = "LineNr" > 1695 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1696" class = "LineNr" > 1696 < / span > b8/copy-to-EAX _test-output-buffered-file/imm32
< span id = "L1697" class = "LineNr" > 1697 < / span > 05/add-to-EAX 4/imm32
< span id = "L1698" class = "LineNr" > 1698 < / span > 50/push-EAX
< span id = "L1699" class = "LineNr" > 1699 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1700" class = "LineNr" > 1700 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1701" class = "LineNr" > 1701 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1702" class = "LineNr" > 1702 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1703" class = "LineNr" > 1703 < / span > < span class = "subxComment" > # var slice/ECX = " \" abc/def\" /ghi" < / span >
< span id = "L1704" class = "LineNr" > 1704 < / span > 68/push < a href = 'dquotes.subx.html#L2755' > _test-slice-literal-string-with-limit< / a > /imm32
< span id = "L1705" class = "LineNr" > 1705 < / span > 68/push < a href = 'dquotes.subx.html#L2749' > _test-slice-literal-string< / a > /imm32/start
< span id = "L1706" class = "LineNr" > 1706 < / 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 = "L1707" class = "LineNr" > 1707 < / span > < span class = "subxComment" > # emit-metadata(_test-output-buffered-file, slice)< / span >
< span id = "L1708" class = "LineNr" > 1708 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1709" class = "LineNr" > 1709 < / span > 51/push-ECX
< span id = "L1710" class = "LineNr" > 1710 < / span > 68/push _test-output-buffered-file/imm32
< span id = "L1711" class = "LineNr" > 1711 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1712" class = "LineNr" > 1712 < / span > e8/call < a href = 'dquotes.subx.html#L1353' > emit-metadata< / a > /disp32
< span id = "L1713" class = "LineNr" > 1713 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1714" class = "LineNr" > 1714 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1715" class = "LineNr" > 1715 < / span > < span class = "subxComment" > # flush(_test-output-buffered-file)< / span >
< span id = "L1716" class = "LineNr" > 1716 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1717" class = "LineNr" > 1717 < / span > 68/push _test-output-buffered-file/imm32
< span id = "L1718" class = "LineNr" > 1718 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1719" class = "LineNr" > 1719 < / span > e8/call < a href = '../064write-byte.subx.html#L79' > flush< / a > /disp32
< span id = "L1720" class = "LineNr" > 1720 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1721" class = "LineNr" > 1721 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1722" class = "Folded" > 1722 < / span > < span class = "Folded" > +-- 26 lines: #? # dump output ---------------------------------------------------------------------------------------------------------------------------< / span >
< span id = "L1748" class = "LineNr" > 1748 < / span > < span class = "subxComment" > # check-stream-equal(_test-output-stream, " /ghi" , msg) # important that there's no leading space< / span >
< span id = "L1749" class = "LineNr" > 1749 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1750" class = "LineNr" > 1750 < / span > 68/push < span class = "Constant" > " F - test-emit-metadata-in-string-literal" < / span > /imm32
< span id = "L1751" class = "LineNr" > 1751 < / span > 68/push < span class = "Constant" > " /ghi" < / span > /imm32
< span id = "L1752" class = "LineNr" > 1752 < / span > 68/push _test-output-stream/imm32
< span id = "L1753" class = "LineNr" > 1753 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1754" class = "LineNr" > 1754 < / span > e8/call < a href = '../058stream-equal.subx.html#L193' > check-stream-equal< / a > /disp32
< span id = "L1755" class = "LineNr" > 1755 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1756" class = "LineNr" > 1756 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1757" class = "LineNr" > 1757 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L1758" class = "LineNr" > 1758 < / 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 = "L1759" class = "LineNr" > 1759 < / span > 5d/pop-to-EBP
< span id = "L1760" class = "LineNr" > 1760 < / span > c3/return
< span id = "L1761" class = "LineNr" > 1761 < / span >
< span id = "L1762" class = "LineNr" > 1762 < / span > < span class = "subxComment" > # (re)compute the bounds of the next word in the line< / span >
< span id = "L1763" class = "LineNr" > 1763 < / span > < span class = "subxComment" > # return empty string on reaching end of file< / span >
< span id = "L1764" class = "LineNr" > 1764 < / span > < span class = "subxFunction" > next-word-or-string< / span > : < span class = "subxComment" > # line : (address stream byte), out : (address slice)< / span >
< span id = "L1765" class = "LineNr" > 1765 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L1766" class = "LineNr" > 1766 < / span > 55/push-EBP
< span id = "L1767" class = "LineNr" > 1767 < / 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 = "L1768" class = "LineNr" > 1768 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L1769" class = "LineNr" > 1769 < / span > 50/push-EAX
< span id = "L1770" class = "LineNr" > 1770 < / span > 51/push-ECX
< span id = "L1771" class = "LineNr" > 1771 < / span > 56/push-ESI
< span id = "L1772" class = "LineNr" > 1772 < / span > 57/push-EDI
< span id = "L1773" class = "LineNr" > 1773 < / span > < span class = "subxComment" > # ESI = line< / span >
< span id = "L1774" class = "LineNr" > 1774 < / 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 = "L1775" class = "LineNr" > 1775 < / span > < span class = "subxComment" > # EDI = out< / span >
< span id = "L1776" class = "LineNr" > 1776 < / span > 8b/copy 1/mod/*+disp8 5/rm32/EBP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 7/r32/EDI 0xc/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(EBP+12) to EDI< / span >
< span id = "L1777" class = "LineNr" > 1777 < / span > < span class = "subxComment" > # skip-chars-matching(line, ' ')< / span >
< span id = "L1778" class = "LineNr" > 1778 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1779" class = "LineNr" > 1779 < / span > 68/push 0x20/imm32/space
< span id = "L1780" class = "LineNr" > 1780 < / 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 = "L1781" class = "LineNr" > 1781 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1782" class = "LineNr" > 1782 < / span > e8/call < a href = '../073next-token.subx.html#L341' > skip-chars-matching< / a > /disp32
< span id = "L1783" class = "LineNr" > 1783 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1784" class = "LineNr" > 1784 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1785" class = "LineNr" > 1785 < / span > < span class = "Constant" > $next-word-or-string:check0< / span > :
< span id = "L1786" class = "LineNr" > 1786 < / span > < span class = "subxComment" > # if (line-> read > = line-> write) clear out and return< / span >
< span id = "L1787" class = "LineNr" > 1787 < / span > < span class = "subxS1Comment" > # . EAX = line-> read< / span >
< span id = "L1788" class = "LineNr" > 1788 < / span > 8b/copy 1/mod/*+disp8 6/rm32/ESI < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/EAX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ESI+4) to EAX< / span >
< span id = "L1789" class = "LineNr" > 1789 < / span > < span class = "subxS1Comment" > # . if (EAX < line-> write) goto next check< / span >
< span id = "L1790" class = "LineNr" > 1790 < / span > 3b/compare 0/mod/indirect 6/rm32/ESI < 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" > # compare EAX with *ESI< / span >
< span id = "L1791" class = "LineNr" > 1791 < / span > 7c/jump-if-lesser $next-word-or-string:check-for-comment/disp8
< span id = "L1792" class = "LineNr" > 1792 < / span > < span class = "subxS1Comment" > # . return out = {0, 0}< / span >
< span id = "L1793" class = "LineNr" > 1793 < / span > c7 0/subop/copy 0/mod/direct 7/rm32/EDI < 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" > # copy to *EDI< / span >
< span id = "L1794" class = "LineNr" > 1794 < / span > c7 0/subop/copy 1/mod/*+disp8 7/rm32/EDI < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/disp8 0/imm32 < span class = "subxComment" > # copy to *(EDI+4)< / span >
< span id = "L1795" class = "LineNr" > 1795 < / span > eb/jump $next-word-or-string:end/disp8
< span id = "L1796" class = "LineNr" > 1796 < / span > < span class = "Constant" > $next-word-or-string:check-for-comment< / span > :
< span id = "L1797" class = "LineNr" > 1797 < / span > < span class = "subxComment" > # out-> start = & line-> data[line-> read]< / span >
< span id = "L1798" class = "LineNr" > 1798 < / span > 8b/copy 1/mod/*+disp8 6/rm32/ESI < 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 *(ESI+4) to ECX< / span >
< span id = "L1799" class = "LineNr" > 1799 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 6/base/ESI 1/index/ECX < span class = "Normal" > . < / span > 0/r32/EAX 0xc/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy ESI+ECX+12 to EAX< / span >
< span id = "L1800" class = "LineNr" > 1800 < / span > 89/copy 0/mod/indirect 7/rm32/EDI < 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 *EDI< / span >
< span id = "L1801" class = "LineNr" > 1801 < / span > < span class = "subxComment" > # if line-> data[line-> read] == '#'< / span >
< span id = "L1802" class = "LineNr" > 1802 < / span > < span class = "subxS1Comment" > # . EAX = line-> data[line-> read]< / span >
< span id = "L1803" class = "LineNr" > 1803 < / 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 = "L1804" class = "LineNr" > 1804 < / span > 8a/copy-byte 1/mod/*+disp8 4/rm32/sib 6/base/ESI 1/index/ECX < span class = "Normal" > . < / span > 0/r32/AL 0xc/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy byte at *(ESI+ECX+12) to AL< / span >
< span id = "L1805" class = "LineNr" > 1805 < / span > < span class = "subxS1Comment" > # . compare< / span >
< span id = "L1806" class = "LineNr" > 1806 < / span > 3d/compare-EAX-and 0x23/imm32/pound
< span id = "L1807" class = "LineNr" > 1807 < / span > 75/jump-if-not-equal $next-word-or-string:check-for-string-literal/disp8
< span id = "L1808" class = "LineNr" > 1808 < / span > < span class = "Constant" > $next-word-or-string:comment< / span > :
< span id = "L1809" class = "LineNr" > 1809 < / span > < span class = "subxComment" > # out-> end = & line-> data[line-> write]< / span >
< span id = "L1810" class = "LineNr" > 1810 < / span > 8b/copy 0/mod/indirect 6/rm32/ESI < 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 *ESI to EAX< / span >
< span id = "L1811" class = "LineNr" > 1811 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 6/base/ESI 0/index/EAX < span class = "Normal" > . < / span > 0/r32/EAX 0xc/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy ESI+EAX+12 to EAX< / span >
< span id = "L1812" class = "LineNr" > 1812 < / span > 89/copy 1/mod/*+disp8 7/rm32/EDI < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/EAX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy EAX to *(EDI+4)< / span >
< span id = "L1813" class = "LineNr" > 1813 < / span > < span class = "subxComment" > # line-> read = line-> write # skip rest of line< / span >
< span id = "L1814" class = "LineNr" > 1814 < / span > 8b/copy 0/mod/indirect 6/rm32/ESI < 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 *ESI to EAX< / span >
< span id = "L1815" class = "LineNr" > 1815 < / span > 89/copy 1/mod/*+disp8 6/rm32/ESI < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/EAX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy EAX to *(ESI+4)< / span >
< span id = "L1816" class = "LineNr" > 1816 < / span > < span class = "subxComment" > # return< / span >
< span id = "L1817" class = "LineNr" > 1817 < / span > eb/jump $next-word-or-string:end/disp8
< span id = "L1818" class = "LineNr" > 1818 < / span > < span class = "Constant" > $next-word-or-string:check-for-string-literal< / span > :
< span id = "L1819" class = "LineNr" > 1819 < / span > < span class = "subxComment" > # if line-> data[line-> read] == '" '< / span >
< span id = "L1820" class = "LineNr" > 1820 < / span > < span class = "subxS1Comment" > # . EAX = line-> data[line-> read]< / span >
< span id = "L1821" class = "LineNr" > 1821 < / 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 = "L1822" class = "LineNr" > 1822 < / span > 8a/copy-byte 1/mod/*+disp8 4/rm32/sib 6/base/ESI 1/index/ECX < span class = "Normal" > . < / span > 0/r32/AL 0xc/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy byte at *(ESI+ECX+12) to AL< / span >
< span id = "L1823" class = "LineNr" > 1823 < / span > < span class = "subxS1Comment" > # . compare< / span >
< span id = "L1824" class = "LineNr" > 1824 < / span > 3d/compare-EAX-and 0x22/imm32/dquote
< span id = "L1825" class = "LineNr" > 1825 < / span > 75/jump-if-not-equal $next-word-or-string:regular-word/disp8
< span id = "L1826" class = "LineNr" > 1826 < / span > < span class = "Constant" > $next-word-or-string:string-literal< / span > :
< span id = "L1827" class = "LineNr" > 1827 < / span > < span class = "subxComment" > # skip-string(line)< / span >
< span id = "L1828" class = "LineNr" > 1828 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1829" class = "LineNr" > 1829 < / span > 56/push-ESI
< span id = "L1830" class = "LineNr" > 1830 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1831" class = "LineNr" > 1831 < / span > e8/call < a href = 'dquotes.subx.html#L2174' > skip-string< / a > /disp32
< span id = "L1832" class = "LineNr" > 1832 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1833" class = "LineNr" > 1833 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1834" class = "LineNr" > 1834 < / span > < span class = "subxComment" > # fall through< / span >
< span id = "L1835" class = "LineNr" > 1835 < / span > < span class = "Constant" > $next-word-or-string:regular-word< / span > :
< span id = "L1836" class = "LineNr" > 1836 < / span > < span class = "subxComment" > # skip-chars-not-matching-whitespace(line) # including trailing newline< / span >
< span id = "L1837" class = "LineNr" > 1837 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1838" class = "LineNr" > 1838 < / 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 = "L1839" class = "LineNr" > 1839 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1840" class = "LineNr" > 1840 < / span > e8/call < a href = '../073next-token.subx.html#L627' > skip-chars-not-matching-whitespace< / a > /disp32
< span id = "L1841" class = "LineNr" > 1841 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1842" class = "LineNr" > 1842 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1843" class = "LineNr" > 1843 < / span > < span class = "subxComment" > # out-> end = & line-> data[line-> read]< / span >
< span id = "L1844" class = "LineNr" > 1844 < / span > 8b/copy 1/mod/*+disp8 6/rm32/ESI < 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 *(ESI+4) to ECX< / span >
< span id = "L1845" class = "LineNr" > 1845 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 6/base/ESI 1/index/ECX < span class = "Normal" > . < / span > 0/r32/EAX 0xc/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy ESI+ECX+12 to EAX< / span >
< span id = "L1846" class = "LineNr" > 1846 < / span > 89/copy 1/mod/*+disp8 7/rm32/EDI < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/EAX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy EAX to *(EDI+4)< / span >
< span id = "L1847" class = "LineNr" > 1847 < / span > < span class = "Constant" > $next-word-or-string:end< / span > :
< span id = "L1848" class = "LineNr" > 1848 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L1849" class = "LineNr" > 1849 < / span > 5f/pop-to-EDI
< span id = "L1850" class = "LineNr" > 1850 < / span > 5e/pop-to-ESI
< span id = "L1851" class = "LineNr" > 1851 < / span > 59/pop-to-ECX
< span id = "L1852" class = "LineNr" > 1852 < / span > 58/pop-to-EAX
2019-07-14 16:42:36 +00:00
< span id = "L1853" class = "LineNr" > 1853 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L1854" class = "LineNr" > 1854 < / 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 = "L1855" class = "LineNr" > 1855 < / span > 5d/pop-to-EBP
< span id = "L1856" class = "LineNr" > 1856 < / span > c3/return
< span id = "L1857" class = "LineNr" > 1857 < / span >
2019-07-25 07:08:23 +00:00
< span id = "L1858" class = "LineNr" > 1858 < / span > < span class = "subxTest" > test-next-word-or-string< / span > :
2019-07-14 16:42:36 +00:00
< span id = "L1859" class = "LineNr" > 1859 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L1860" class = "LineNr" > 1860 < / span > 55/push-EBP
< span id = "L1861" class = "LineNr" > 1861 < / 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 = "L1862" class = "LineNr" > 1862 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L1863" class = "LineNr" > 1863 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-input-stream)< / span >
< span id = "L1864" class = "LineNr" > 1864 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1865" class = "LineNr" > 1865 < / span > 68/push _test-input-stream/imm32
< span id = "L1866" class = "LineNr" > 1866 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1867" class = "LineNr" > 1867 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1868" class = "LineNr" > 1868 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1869" class = "LineNr" > 1869 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1870" class = "LineNr" > 1870 < / span > < span class = "subxComment" > # var slice/ECX = {0, 0}< / span >
< span id = "L1871" class = "LineNr" > 1871 < / span > 68/push 0/imm32/end
< span id = "L1872" class = "LineNr" > 1872 < / span > 68/push 0/imm32/start
< span id = "L1873" class = "LineNr" > 1873 < / 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 >
2019-07-25 07:08:23 +00:00
< span id = "L1874" class = "LineNr" > 1874 < / span > < span class = "subxComment" > # write(_test-input-stream, " ab" )< / span >
2019-07-14 16:42:36 +00:00
< span id = "L1875" class = "LineNr" > 1875 < / span > < span class = "subxS2Comment" > # . . push args< / span >
2019-07-25 07:08:23 +00:00
< span id = "L1876" class = "LineNr" > 1876 < / span > 68/push < span class = "Constant" > " ab" < / span > /imm32
2019-07-14 16:42:36 +00:00
< span id = "L1877" class = "LineNr" > 1877 < / span > 68/push _test-input-stream/imm32
< span id = "L1878" class = "LineNr" > 1878 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1879" class = "LineNr" > 1879 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L1880" class = "LineNr" > 1880 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1881" class = "LineNr" > 1881 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1882" class = "LineNr" > 1882 < / span > < span class = "subxComment" > # next-word-or-string(_test-input-stream, slice)< / span >
< span id = "L1883" class = "LineNr" > 1883 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1884" class = "LineNr" > 1884 < / span > 51/push-ECX
< span id = "L1885" class = "LineNr" > 1885 < / span > 68/push _test-input-stream/imm32
2019-05-20 08:44:06 +00:00
< span id = "L1886" class = "LineNr" > 1886 < / span > < span class = "subxS2Comment" > # . . call< / span >
2019-07-25 07:08:23 +00:00
< span id = "L1887" class = "LineNr" > 1887 < / span > e8/call < a href = 'dquotes.subx.html#L1764' > next-word-or-string< / a > /disp32
2019-05-20 08:44:06 +00:00
< span id = "L1888" class = "LineNr" > 1888 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
2019-07-14 16:42:36 +00:00
< span id = "L1889" class = "LineNr" > 1889 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
2019-07-25 07:08:23 +00:00
< span id = "L1890" class = "LineNr" > 1890 < / span > < span class = "subxComment" > # check-ints-equal(_test-input-stream-> read, 4, msg)< / span >
2019-07-14 16:42:36 +00:00
< span id = "L1891" class = "LineNr" > 1891 < / span > < span class = "subxS2Comment" > # . . push args< / span >
2019-07-25 07:08:23 +00:00
< span id = "L1892" class = "LineNr" > 1892 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L1858' > test-next-word-or-string< / a > /updates-stream-read-correctly" < / span > /imm32
< span id = "L1893" class = "LineNr" > 1893 < / span > 68/push 4/imm32
2019-07-14 16:42:36 +00:00
< span id = "L1894" class = "LineNr" > 1894 < / span > b8/copy-to-EAX _test-input-stream/imm32
< span id = "L1895" class = "LineNr" > 1895 < / span > ff 6/subop/push 1/mod/*+disp8 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # push *(EAX+4)< / span >
< span id = "L1896" class = "LineNr" > 1896 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1897" class = "LineNr" > 1897 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L1898" class = "LineNr" > 1898 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1899" class = "LineNr" > 1899 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1900" class = "LineNr" > 1900 < / span > < span class = "subxComment" > # check-ints-equal(slice-> start - _test-input-stream-> data, 2, msg)< / span >
< span id = "L1901" class = "LineNr" > 1901 < / span > < span class = "subxS1Comment" > # . check-ints-equal(slice-> start - _test-input-stream, 14, msg)< / span >
< span id = "L1902" class = "LineNr" > 1902 < / span > < span class = "subxS2Comment" > # . . push args< / span >
2019-07-25 07:08:23 +00:00
< span id = "L1903" class = "LineNr" > 1903 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L1858' > test-next-word-or-string< / a > : start" < / span > /imm32
2019-07-14 16:42:36 +00:00
< span id = "L1904" class = "LineNr" > 1904 < / span > 68/push 0xe/imm32
< span id = "L1905" class = "LineNr" > 1905 < / span > < span class = "subxS2Comment" > # . . push slice-> start - _test-input-stream< / span >
< span id = "L1906" class = "LineNr" > 1906 < / 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 = "L1907" class = "LineNr" > 1907 < / span > 81 5/subop/subtract 3/mod/direct 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > _test-input-stream/imm32 < span class = "subxComment" > # subtract from EAX< / span >
< span id = "L1908" class = "LineNr" > 1908 < / span > 50/push-EAX
< span id = "L1909" class = "LineNr" > 1909 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1910" class = "LineNr" > 1910 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L1911" class = "LineNr" > 1911 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1912" class = "LineNr" > 1912 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
2019-07-25 07:08:23 +00:00
< span id = "L1913" class = "LineNr" > 1913 < / span > < span class = "subxComment" > # check-ints-equal(slice-> end - _test-input-stream-> data, 4, msg)< / span >
< span id = "L1914" class = "LineNr" > 1914 < / span > < span class = "subxS1Comment" > # . check-ints-equal(slice-> end - _test-input-stream, 16, msg)< / span >
2019-07-14 16:42:36 +00:00
< span id = "L1915" class = "LineNr" > 1915 < / span > < span class = "subxS2Comment" > # . . push args< / span >
2019-07-25 07:08:23 +00:00
< span id = "L1916" class = "LineNr" > 1916 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L1858' > test-next-word-or-string< / a > : end" < / span > /imm32
< span id = "L1917" class = "LineNr" > 1917 < / span > 68/push 0x10/imm32
2019-07-14 16:42:36 +00:00
< span id = "L1918" class = "LineNr" > 1918 < / span > < span class = "subxS2Comment" > # . . push slice-> end - _test-input-stream< / span >
< span id = "L1919" class = "LineNr" > 1919 < / span > 8b/copy 1/mod/*+disp8 1/rm32/ECX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/EAX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ECX+4) to EAX< / span >
< span id = "L1920" class = "LineNr" > 1920 < / span > 81 5/subop/subtract 3/mod/direct 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > _test-input-stream/imm32 < span class = "subxComment" > # subtract from EAX< / span >
< span id = "L1921" class = "LineNr" > 1921 < / span > 50/push-EAX
< span id = "L1922" class = "LineNr" > 1922 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1923" class = "LineNr" > 1923 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L1924" class = "LineNr" > 1924 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1925" class = "LineNr" > 1925 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1926" class = "LineNr" > 1926 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L1927" class = "LineNr" > 1927 < / 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 = "L1928" class = "LineNr" > 1928 < / span > 5d/pop-to-EBP
< span id = "L1929" class = "LineNr" > 1929 < / span > c3/return
< span id = "L1930" class = "LineNr" > 1930 < / span >
2019-07-25 07:08:23 +00:00
< span id = "L1931" class = "LineNr" > 1931 < / span > < span class = "subxTest" > test-next-word-or-string-returns-whole-comment< / span > :
2019-07-14 16:42:36 +00:00
< span id = "L1932" class = "LineNr" > 1932 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L1933" class = "LineNr" > 1933 < / span > 55/push-EBP
< span id = "L1934" class = "LineNr" > 1934 < / 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 = "L1935" class = "LineNr" > 1935 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L1936" class = "LineNr" > 1936 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-input-stream)< / span >
< span id = "L1937" class = "LineNr" > 1937 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1938" class = "LineNr" > 1938 < / span > 68/push _test-input-stream/imm32
< span id = "L1939" class = "LineNr" > 1939 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1940" class = "LineNr" > 1940 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L1941" class = "LineNr" > 1941 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1942" class = "LineNr" > 1942 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1943" class = "LineNr" > 1943 < / span > < span class = "subxComment" > # var slice/ECX = {0, 0}< / span >
< span id = "L1944" class = "LineNr" > 1944 < / span > 68/push 0/imm32/end
< span id = "L1945" class = "LineNr" > 1945 < / span > 68/push 0/imm32/start
< span id = "L1946" class = "LineNr" > 1946 < / 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 >
2019-07-25 07:08:23 +00:00
< span id = "L1947" class = "LineNr" > 1947 < / span > < span class = "subxComment" > # write(_test-input-stream, " # a" )< / span >
< span id = "L1948" class = "LineNr" > 1948 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1949" class = "LineNr" > 1949 < / span > 68/push < span class = "Constant" > " # a" < / span > /imm32
< span id = "L1950" class = "LineNr" > 1950 < / span > 68/push _test-input-stream/imm32
< span id = "L1951" class = "LineNr" > 1951 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1952" class = "LineNr" > 1952 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L1953" class = "LineNr" > 1953 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1954" class = "LineNr" > 1954 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1955" class = "LineNr" > 1955 < / span > < span class = "subxComment" > # next-word-or-string(_test-input-stream, slice)< / span >
< span id = "L1956" class = "LineNr" > 1956 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1957" class = "LineNr" > 1957 < / span > 51/push-ECX
< span id = "L1958" class = "LineNr" > 1958 < / span > 68/push _test-input-stream/imm32
< span id = "L1959" class = "LineNr" > 1959 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1960" class = "LineNr" > 1960 < / span > e8/call < a href = 'dquotes.subx.html#L1764' > next-word-or-string< / a > /disp32
< span id = "L1961" class = "LineNr" > 1961 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1962" class = "LineNr" > 1962 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1963" class = "LineNr" > 1963 < / span > < span class = "subxComment" > # check-ints-equal(_test-input-stream-> read, 5, msg)< / span >
< span id = "L1964" class = "LineNr" > 1964 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1965" class = "LineNr" > 1965 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L1931' > test-next-word-or-string-returns-whole-comment< / a > /updates-stream-read-correctly" < / span > /imm32
< span id = "L1966" class = "LineNr" > 1966 < / span > 68/push 5/imm32
< span id = "L1967" class = "LineNr" > 1967 < / span > b8/copy-to-EAX _test-input-stream/imm32
< span id = "L1968" class = "LineNr" > 1968 < / span > ff 6/subop/push 1/mod/*+disp8 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # push *(EAX+4)< / span >
< span id = "L1969" class = "LineNr" > 1969 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1970" class = "LineNr" > 1970 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L1971" class = "LineNr" > 1971 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1972" class = "LineNr" > 1972 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1973" class = "LineNr" > 1973 < / span > < span class = "subxComment" > # check-ints-equal(slice-> start - _test-input-stream-> data, 2, msg)< / span >
< span id = "L1974" class = "LineNr" > 1974 < / span > < span class = "subxS1Comment" > # . check-ints-equal(slice-> start - _test-input-stream, 14, msg)< / span >
< span id = "L1975" class = "LineNr" > 1975 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1976" class = "LineNr" > 1976 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L1931' > test-next-word-or-string-returns-whole-comment< / a > : start" < / span > /imm32
< span id = "L1977" class = "LineNr" > 1977 < / span > 68/push 0xe/imm32
< span id = "L1978" class = "LineNr" > 1978 < / span > < span class = "subxS2Comment" > # . . push slice-> start - _test-input-stream< / span >
< span id = "L1979" class = "LineNr" > 1979 < / 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 = "L1980" class = "LineNr" > 1980 < / span > 81 5/subop/subtract 3/mod/direct 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > _test-input-stream/imm32 < span class = "subxComment" > # subtract from EAX< / span >
< span id = "L1981" class = "LineNr" > 1981 < / span > 50/push-EAX
< span id = "L1982" class = "LineNr" > 1982 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1983" class = "LineNr" > 1983 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L1984" class = "LineNr" > 1984 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1985" class = "LineNr" > 1985 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1986" class = "LineNr" > 1986 < / span > < span class = "subxComment" > # check-ints-equal(slice-> end - _test-input-stream-> data, 5, msg)< / span >
< span id = "L1987" class = "LineNr" > 1987 < / span > < span class = "subxS1Comment" > # . check-ints-equal(slice-> end - _test-input-stream, 17, msg)< / span >
< span id = "L1988" class = "LineNr" > 1988 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L1989" class = "LineNr" > 1989 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L1931' > test-next-word-or-string-returns-whole-comment< / a > : end" < / span > /imm32
< span id = "L1990" class = "LineNr" > 1990 < / span > 68/push 0x11/imm32
< span id = "L1991" class = "LineNr" > 1991 < / span > < span class = "subxS2Comment" > # . . push slice-> end - _test-input-stream< / span >
< span id = "L1992" class = "LineNr" > 1992 < / span > 8b/copy 1/mod/*+disp8 1/rm32/ECX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/EAX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ECX+4) to EAX< / span >
< span id = "L1993" class = "LineNr" > 1993 < / span > 81 5/subop/subtract 3/mod/direct 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > _test-input-stream/imm32 < span class = "subxComment" > # subtract from EAX< / span >
< span id = "L1994" class = "LineNr" > 1994 < / span > 50/push-EAX
< span id = "L1995" class = "LineNr" > 1995 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L1996" class = "LineNr" > 1996 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L1997" class = "LineNr" > 1997 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L1998" class = "LineNr" > 1998 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L1999" class = "LineNr" > 1999 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2000" class = "LineNr" > 2000 < / 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 = "L2001" class = "LineNr" > 2001 < / span > 5d/pop-to-EBP
< span id = "L2002" class = "LineNr" > 2002 < / span > c3/return
< span id = "L2003" class = "LineNr" > 2003 < / span >
< span id = "L2004" class = "LineNr" > 2004 < / span > < span class = "subxTest" > test-next-word-or-string-returns-empty-string-on-eof< / span > :
< span id = "L2005" class = "LineNr" > 2005 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2006" class = "LineNr" > 2006 < / span > 55/push-EBP
< span id = "L2007" class = "LineNr" > 2007 < / 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 = "L2008" class = "LineNr" > 2008 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L2009" class = "LineNr" > 2009 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-input-stream)< / span >
< span id = "L2010" class = "LineNr" > 2010 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2011" class = "LineNr" > 2011 < / span > 68/push _test-input-stream/imm32
< span id = "L2012" class = "LineNr" > 2012 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2013" class = "LineNr" > 2013 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L2014" class = "LineNr" > 2014 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2015" class = "LineNr" > 2015 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2016" class = "LineNr" > 2016 < / span > < span class = "subxComment" > # var slice/ECX = {0, 0}< / span >
< span id = "L2017" class = "LineNr" > 2017 < / span > 68/push 0/imm32/end
< span id = "L2018" class = "LineNr" > 2018 < / span > 68/push 0/imm32/start
< span id = "L2019" class = "LineNr" > 2019 < / 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 = "L2020" class = "LineNr" > 2020 < / span > < span class = "subxComment" > # write nothing to _test-input-stream< / span >
< span id = "L2021" class = "LineNr" > 2021 < / span > < span class = "subxComment" > # next-word-or-string(_test-input-stream, slice)< / span >
< span id = "L2022" class = "LineNr" > 2022 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2023" class = "LineNr" > 2023 < / span > 51/push-ECX
< span id = "L2024" class = "LineNr" > 2024 < / span > 68/push _test-input-stream/imm32
< span id = "L2025" class = "LineNr" > 2025 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2026" class = "LineNr" > 2026 < / span > e8/call < a href = 'dquotes.subx.html#L1764' > next-word-or-string< / a > /disp32
< span id = "L2027" class = "LineNr" > 2027 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2028" class = "LineNr" > 2028 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2029" class = "LineNr" > 2029 < / span > < span class = "subxComment" > # check-ints-equal(slice-> end - slice-> start, 0, msg)< / span >
< span id = "L2030" class = "LineNr" > 2030 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2031" class = "LineNr" > 2031 < / span > 68/push < span class = "Constant" > " F - test-next-word-or-string-returns-empty-string-on-eof" < / span > /imm32
< span id = "L2032" class = "LineNr" > 2032 < / span > 68/push 0/imm32
< span id = "L2033" class = "LineNr" > 2033 < / span > < span class = "subxS2Comment" > # . . push slice-> end - slice-> start< / span >
< span id = "L2034" class = "LineNr" > 2034 < / span > 8b/copy 1/mod/*+disp8 1/rm32/ECX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/EAX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ECX+4) to EAX< / span >
< span id = "L2035" class = "LineNr" > 2035 < / span > 2b/subtract 0/mod/indirect 1/rm32/ECX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "subxComment" > # subtract *ECX from EAX< / span >
< span id = "L2036" class = "LineNr" > 2036 < / span > 50/push-EAX
< span id = "L2037" class = "LineNr" > 2037 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2038" class = "LineNr" > 2038 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2039" class = "LineNr" > 2039 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2040" class = "LineNr" > 2040 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2041" class = "LineNr" > 2041 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2042" class = "LineNr" > 2042 < / 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 = "L2043" class = "LineNr" > 2043 < / span > 5d/pop-to-EBP
< span id = "L2044" class = "LineNr" > 2044 < / span > c3/return
< span id = "L2045" class = "LineNr" > 2045 < / span >
< span id = "L2046" class = "LineNr" > 2046 < / span > < span class = "subxTest" > test-next-word-or-string-returns-whole-string< / span > :
< span id = "L2047" class = "LineNr" > 2047 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2048" class = "LineNr" > 2048 < / span > 55/push-EBP
< span id = "L2049" class = "LineNr" > 2049 < / 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 = "L2050" class = "LineNr" > 2050 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L2051" class = "LineNr" > 2051 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-input-stream)< / span >
< span id = "L2052" class = "LineNr" > 2052 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2053" class = "LineNr" > 2053 < / span > 68/push _test-input-stream/imm32
< span id = "L2054" class = "LineNr" > 2054 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2055" class = "LineNr" > 2055 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L2056" class = "LineNr" > 2056 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2057" class = "LineNr" > 2057 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2058" class = "LineNr" > 2058 < / span > < span class = "subxComment" > # var slice/ECX = {0, 0}< / span >
< span id = "L2059" class = "LineNr" > 2059 < / span > 68/push 0/imm32/end
< span id = "L2060" class = "LineNr" > 2060 < / span > 68/push 0/imm32/start
< span id = "L2061" class = "LineNr" > 2061 < / 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 = "L2062" class = "LineNr" > 2062 < / span > < span class = "subxComment" > # write(_test-input-stream, " \" a b\" /imm32 " )< / span >
< span id = "L2063" class = "LineNr" > 2063 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2064" class = "LineNr" > 2064 < / span > 68/push < span class = "Constant" > " \" < / span > a b\< span class = "Constant" > " /imm32 " < / span > /imm32
< span id = "L2065" class = "LineNr" > 2065 < / span > 68/push _test-input-stream/imm32
< span id = "L2066" class = "LineNr" > 2066 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2067" class = "LineNr" > 2067 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L2068" class = "LineNr" > 2068 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2069" class = "LineNr" > 2069 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2070" class = "LineNr" > 2070 < / span > < span class = "subxComment" > # next-word-or-string(_test-input-stream, slice)< / span >
< span id = "L2071" class = "LineNr" > 2071 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2072" class = "LineNr" > 2072 < / span > 51/push-ECX
< span id = "L2073" class = "LineNr" > 2073 < / span > 68/push _test-input-stream/imm32
< span id = "L2074" class = "LineNr" > 2074 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2075" class = "LineNr" > 2075 < / span > e8/call < a href = 'dquotes.subx.html#L1764' > next-word-or-string< / a > /disp32
< span id = "L2076" class = "LineNr" > 2076 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2077" class = "LineNr" > 2077 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2078" class = "LineNr" > 2078 < / span > < span class = "subxComment" > # check-ints-equal(slice-> start - _test-input-stream-> data, 1, msg)< / span >
< span id = "L2079" class = "LineNr" > 2079 < / span > < span class = "subxS1Comment" > # . check-ints-equal(slice-> start - _test-input-stream, 13, msg)< / span >
< span id = "L2080" class = "LineNr" > 2080 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2081" class = "LineNr" > 2081 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L2046' > test-next-word-or-string-returns-whole-string< / a > : start" < / span > /imm32
< span id = "L2082" class = "LineNr" > 2082 < / span > 68/push 0xd/imm32
< span id = "L2083" class = "LineNr" > 2083 < / span > < span class = "subxS2Comment" > # . . push slice-> start - _test-input-stream< / span >
< span id = "L2084" class = "LineNr" > 2084 < / 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 = "L2085" class = "LineNr" > 2085 < / span > 81 5/subop/subtract 3/mod/direct 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > _test-input-stream/imm32 < span class = "subxComment" > # subtract from EAX< / span >
< span id = "L2086" class = "LineNr" > 2086 < / span > 50/push-EAX
< span id = "L2087" class = "LineNr" > 2087 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2088" class = "LineNr" > 2088 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2089" class = "LineNr" > 2089 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2090" class = "LineNr" > 2090 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2091" class = "LineNr" > 2091 < / span > < span class = "subxComment" > # check-ints-equal(slice-> end - _test-input-stream-> data, 12, msg)< / span >
< span id = "L2092" class = "LineNr" > 2092 < / span > < span class = "subxS1Comment" > # . check-ints-equal(slice-> end - _test-input-stream, 24, msg)< / span >
< span id = "L2093" class = "LineNr" > 2093 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2094" class = "LineNr" > 2094 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L2046' > test-next-word-or-string-returns-whole-string< / a > : end" < / span > /imm32
< span id = "L2095" class = "LineNr" > 2095 < / span > 68/push 0x18/imm32
< span id = "L2096" class = "LineNr" > 2096 < / span > < span class = "subxS2Comment" > # . . push slice-> end - _test-input-stream< / span >
< span id = "L2097" class = "LineNr" > 2097 < / span > 8b/copy 1/mod/*+disp8 1/rm32/ECX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/EAX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ECX+4) to EAX< / span >
< span id = "L2098" class = "LineNr" > 2098 < / span > 81 5/subop/subtract 3/mod/direct 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > _test-input-stream/imm32 < span class = "subxComment" > # subtract from EAX< / span >
< span id = "L2099" class = "LineNr" > 2099 < / span > 50/push-EAX
< span id = "L2100" class = "LineNr" > 2100 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2101" class = "LineNr" > 2101 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2102" class = "LineNr" > 2102 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2103" class = "LineNr" > 2103 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2104" class = "LineNr" > 2104 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2105" class = "LineNr" > 2105 < / 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 = "L2106" class = "LineNr" > 2106 < / span > 5d/pop-to-EBP
< span id = "L2107" class = "LineNr" > 2107 < / span > c3/return
< span id = "L2108" class = "LineNr" > 2108 < / span >
< span id = "L2109" class = "LineNr" > 2109 < / span > < span class = "subxTest" > test-next-word-or-string-returns-string-with-escapes< / span > :
< span id = "L2110" class = "LineNr" > 2110 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2111" class = "LineNr" > 2111 < / span > 55/push-EBP
< span id = "L2112" class = "LineNr" > 2112 < / 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 = "L2113" class = "LineNr" > 2113 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L2114" class = "LineNr" > 2114 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-input-stream)< / span >
< span id = "L2115" class = "LineNr" > 2115 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2116" class = "LineNr" > 2116 < / span > 68/push _test-input-stream/imm32
< span id = "L2117" class = "LineNr" > 2117 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2118" class = "LineNr" > 2118 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L2119" class = "LineNr" > 2119 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2120" class = "LineNr" > 2120 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2121" class = "LineNr" > 2121 < / span > < span class = "subxComment" > # var slice/ECX = {0, 0}< / span >
< span id = "L2122" class = "LineNr" > 2122 < / span > 68/push 0/imm32/end
< span id = "L2123" class = "LineNr" > 2123 < / span > 68/push 0/imm32/start
< span id = "L2124" class = "LineNr" > 2124 < / 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 = "L2125" class = "LineNr" > 2125 < / span > < span class = "subxComment" > # write(_test-input-stream, " \" a\\\" b\" /x" )< / span >
< span id = "L2126" class = "LineNr" > 2126 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2127" class = "LineNr" > 2127 < / span > 68/push < span class = "Constant" > " \" < / span > a\\\< span class = "Constant" > " b\" < / span > /x" /imm32
< span id = "L2128" class = "LineNr" > 2128 < / span > 68/push _test-input-stream/imm32
< span id = "L2129" class = "LineNr" > 2129 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2130" class = "LineNr" > 2130 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L2131" class = "LineNr" > 2131 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2132" class = "LineNr" > 2132 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2133" class = "LineNr" > 2133 < / span > < span class = "subxComment" > # next-word-or-string(_test-input-stream, slice)< / span >
< span id = "L2134" class = "LineNr" > 2134 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2135" class = "LineNr" > 2135 < / span > 51/push-ECX
< span id = "L2136" class = "LineNr" > 2136 < / span > 68/push _test-input-stream/imm32
< span id = "L2137" class = "LineNr" > 2137 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2138" class = "LineNr" > 2138 < / span > e8/call < a href = 'dquotes.subx.html#L1764' > next-word-or-string< / a > /disp32
< span id = "L2139" class = "LineNr" > 2139 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2140" class = "LineNr" > 2140 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2141" class = "LineNr" > 2141 < / span > < span class = "subxComment" > # check-ints-equal(slice-> start - _test-input-stream-> data, 1, msg)< / span >
< span id = "L2142" class = "LineNr" > 2142 < / span > < span class = "subxS1Comment" > # . check-ints-equal(slice-> start - _test-input-stream, 13, msg)< / span >
< span id = "L2143" class = "LineNr" > 2143 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2144" class = "LineNr" > 2144 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L2109' > test-next-word-or-string-returns-string-with-escapes< / a > : start" < / span > /imm32
< span id = "L2145" class = "LineNr" > 2145 < / span > 68/push 0xd/imm32
< span id = "L2146" class = "LineNr" > 2146 < / span > < span class = "subxS2Comment" > # . . push slice-> start - _test-input-stream< / span >
< span id = "L2147" class = "LineNr" > 2147 < / 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 = "L2148" class = "LineNr" > 2148 < / span > 81 5/subop/subtract 3/mod/direct 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > _test-input-stream/imm32 < span class = "subxComment" > # subtract from EAX< / span >
< span id = "L2149" class = "LineNr" > 2149 < / span > 50/push-EAX
< span id = "L2150" class = "LineNr" > 2150 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2151" class = "LineNr" > 2151 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2152" class = "LineNr" > 2152 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2153" class = "LineNr" > 2153 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2154" class = "LineNr" > 2154 < / span > < span class = "subxComment" > # check-ints-equal(slice-> end - _test-input-stream-> data, 9, msg)< / span >
< span id = "L2155" class = "LineNr" > 2155 < / span > < span class = "subxS1Comment" > # . check-ints-equal(slice-> end - _test-input-stream, 21, msg)< / span >
< span id = "L2156" class = "LineNr" > 2156 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2157" class = "LineNr" > 2157 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L2109' > test-next-word-or-string-returns-string-with-escapes< / a > : end" < / span > /imm32
< span id = "L2158" class = "LineNr" > 2158 < / span > 68/push 0x15/imm32
< span id = "L2159" class = "LineNr" > 2159 < / span > < span class = "subxS2Comment" > # . . push slice-> end - _test-input-stream< / span >
< span id = "L2160" class = "LineNr" > 2160 < / span > 8b/copy 1/mod/*+disp8 1/rm32/ECX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/EAX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ECX+4) to EAX< / span >
< span id = "L2161" class = "LineNr" > 2161 < / span > 81 5/subop/subtract 3/mod/direct 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > _test-input-stream/imm32 < span class = "subxComment" > # subtract from EAX< / span >
< span id = "L2162" class = "LineNr" > 2162 < / span > 50/push-EAX
< span id = "L2163" class = "LineNr" > 2163 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2164" class = "LineNr" > 2164 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2165" class = "LineNr" > 2165 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2166" class = "LineNr" > 2166 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2167" class = "LineNr" > 2167 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2168" class = "LineNr" > 2168 < / 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 = "L2169" class = "LineNr" > 2169 < / span > 5d/pop-to-EBP
< span id = "L2170" class = "LineNr" > 2170 < / span > c3/return
< span id = "L2171" class = "LineNr" > 2171 < / span >
< span id = "L2172" class = "LineNr" > 2172 < / span > < span class = "subxComment" > # update line-> read to end of string literal surrounded by double quotes< / span >
< span id = "L2173" class = "LineNr" > 2173 < / span > < span class = "subxComment" > # line-> read must start out at a double-quote< / span >
< span id = "L2174" class = "LineNr" > 2174 < / span > < span class = "subxFunction" > skip-string< / span > : < span class = "subxComment" > # line : (address stream)< / span >
< span id = "L2175" class = "LineNr" > 2175 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2176" class = "LineNr" > 2176 < / span > 55/push-EBP
< span id = "L2177" class = "LineNr" > 2177 < / 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 = "L2178" class = "LineNr" > 2178 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L2179" class = "LineNr" > 2179 < / span > 50/push-EAX
< span id = "L2180" class = "LineNr" > 2180 < / span > 51/push-ECX
< span id = "L2181" class = "LineNr" > 2181 < / span > 52/push-EDX
< span id = "L2182" class = "LineNr" > 2182 < / span > < span class = "subxComment" > # ECX = line< / span >
< span id = "L2183" class = "LineNr" > 2183 < / span > 8b/copy 1/mod/*+disp8 5/rm32/EBP < 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 = "L2184" class = "LineNr" > 2184 < / span > < span class = "subxComment" > # EAX = skip-string-in-slice(& line-> data[line-> read], & line-> data[line-> write])< / span >
< span id = "L2185" class = "LineNr" > 2185 < / span > < span class = "subxS2Comment" > # . . push & line-> data[line-> write]< / span >
< span id = "L2186" class = "LineNr" > 2186 < / span > 8b/copy 1/mod/*+disp8 1/rm32/ECX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 2/r32/EDX 8/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy *(ECX+8) to EDX< / span >
< span id = "L2187" class = "LineNr" > 2187 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 1/base/ECX 2/index/EDX < span class = "Normal" > . < / span > 2/r32/EDX 0xc/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy ECX+EDX+12 to EDX< / span >
< span id = "L2188" class = "LineNr" > 2188 < / span > 52/push-EDX
< span id = "L2189" class = "LineNr" > 2189 < / span > < span class = "subxS2Comment" > # . . push & line-> data[line-> read]< / span >
< span id = "L2190" class = "LineNr" > 2190 < / span > 8b/copy 1/mod/*+disp8 1/rm32/ECX < 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 = "L2191" class = "LineNr" > 2191 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 1/base/ECX 2/index/EDX < span class = "Normal" > . < / span > 2/r32/EDX 0xc/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy ECX+EDX+12 to EDX< / span >
< span id = "L2192" class = "LineNr" > 2192 < / span > 52/push-EDX
< span id = "L2193" class = "LineNr" > 2193 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2194" class = "LineNr" > 2194 < / span > e8/call < a href = 'dquotes.subx.html#L2415' > skip-string-in-slice< / a > /disp32
< span id = "L2195" class = "LineNr" > 2195 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2196" class = "LineNr" > 2196 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2197" class = "LineNr" > 2197 < / span > < span class = "subxComment" > # line-> read = EAX - line-> data< / span >
< span id = "L2198" class = "LineNr" > 2198 < / span > 29/subtract 3/mod/direct 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" > # subtract ECX from EAX< / span >
< span id = "L2199" class = "LineNr" > 2199 < / span > 2d/subtract-from-EAX 0xc/imm32
< span id = "L2200" class = "LineNr" > 2200 < / span > 89/copy 1/mod/*+disp8 1/rm32/ECX < 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 = "L2201" class = "LineNr" > 2201 < / span > < span class = "Constant" > $skip-string:end< / span > :
< span id = "L2202" class = "LineNr" > 2202 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L2203" class = "LineNr" > 2203 < / span > 5a/pop-to-EDX
< span id = "L2204" class = "LineNr" > 2204 < / span > 59/pop-to-ECX
< span id = "L2205" class = "LineNr" > 2205 < / span > 58/pop-to-EAX
< span id = "L2206" class = "LineNr" > 2206 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2207" class = "LineNr" > 2207 < / 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 = "L2208" class = "LineNr" > 2208 < / span > 5d/pop-to-EBP
< span id = "L2209" class = "LineNr" > 2209 < / span > c3/return
< span id = "L2210" class = "LineNr" > 2210 < / span >
< span id = "L2211" class = "LineNr" > 2211 < / span > < span class = "subxTest" > test-skip-string< / span > :
< span id = "L2212" class = "LineNr" > 2212 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2213" class = "LineNr" > 2213 < / span > 55/push-EBP
< span id = "L2214" class = "LineNr" > 2214 < / 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 = "L2215" class = "LineNr" > 2215 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L2216" class = "LineNr" > 2216 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-input-stream)< / span >
< span id = "L2217" class = "LineNr" > 2217 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2218" class = "LineNr" > 2218 < / span > 68/push _test-input-stream/imm32
< span id = "L2219" class = "LineNr" > 2219 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2220" class = "LineNr" > 2220 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L2221" class = "LineNr" > 2221 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2222" class = "LineNr" > 2222 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2223" class = "LineNr" > 2223 < / span > < span class = "subxS1Comment" > # . write(_test-input-stream, " \" abc\" def" )< / span >
< span id = "L2224" class = "LineNr" > 2224 < / span > < span class = "subxS1Comment" > # . indices: 0123 45< / span >
< span id = "L2225" class = "LineNr" > 2225 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2226" class = "LineNr" > 2226 < / span > 68/push < span class = "Constant" > " \" < / span > abc\< span class = "Constant" > " def" < / span > /imm32
< span id = "L2227" class = "LineNr" > 2227 < / span > 68/push _test-input-stream/imm32
< span id = "L2228" class = "LineNr" > 2228 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2229" class = "LineNr" > 2229 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L2230" class = "LineNr" > 2230 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2231" class = "LineNr" > 2231 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2232" class = "LineNr" > 2232 < / span > < span class = "subxComment" > # precondition: line-> read == 0< / span >
< span id = "L2233" class = "LineNr" > 2233 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2234" class = "LineNr" > 2234 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L2211' > test-skip-string< / a > /precondition" < / span > /imm32
< span id = "L2235" class = "LineNr" > 2235 < / span > 68/push 0/imm32
< span id = "L2236" class = "LineNr" > 2236 < / span > b8/copy-to-EAX _test-input-stream/imm32
< span id = "L2237" class = "LineNr" > 2237 < / span > ff 6/subop/push 1/mod/*+disp8 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # push *(EAX+4)< / span >
< span id = "L2238" class = "LineNr" > 2238 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2239" class = "LineNr" > 2239 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2240" class = "LineNr" > 2240 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2241" class = "LineNr" > 2241 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2242" class = "LineNr" > 2242 < / span > < span class = "subxComment" > # skip-string(_test-input-stream)< / span >
< span id = "L2243" class = "LineNr" > 2243 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2244" class = "LineNr" > 2244 < / span > 68/push _test-input-stream/imm32
< span id = "L2245" class = "LineNr" > 2245 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2246" class = "LineNr" > 2246 < / span > e8/call < a href = 'dquotes.subx.html#L2174' > skip-string< / a > /disp32
< span id = "L2247" class = "LineNr" > 2247 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2248" class = "LineNr" > 2248 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2249" class = "LineNr" > 2249 < / span > < span class = "subxComment" > # check-ints-equal(line-> read, 5, msg)< / span >
2019-07-14 16:42:36 +00:00
< span id = "L2250" class = "LineNr" > 2250 < / span > < span class = "subxS2Comment" > # . . push args< / span >
2019-07-25 07:08:23 +00:00
< span id = "L2251" class = "LineNr" > 2251 < / span > 68/push < span class = "Constant" > " F - test-skip-string" < / span > /imm32
< span id = "L2252" class = "LineNr" > 2252 < / span > 68/push 5/imm32
< span id = "L2253" class = "LineNr" > 2253 < / span > b8/copy-to-EAX _test-input-stream/imm32
< span id = "L2254" class = "LineNr" > 2254 < / span > ff 6/subop/push 1/mod/*+disp8 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # push *(EAX+4)< / span >
< span id = "L2255" class = "LineNr" > 2255 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2256" class = "LineNr" > 2256 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2257" class = "LineNr" > 2257 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2258" class = "LineNr" > 2258 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2259" class = "LineNr" > 2259 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2260" class = "LineNr" > 2260 < / 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 = "L2261" class = "LineNr" > 2261 < / span > 5d/pop-to-EBP
< span id = "L2262" class = "LineNr" > 2262 < / span > c3/return
< span id = "L2263" class = "LineNr" > 2263 < / span >
< span id = "L2264" class = "LineNr" > 2264 < / span > < span class = "subxTest" > test-skip-string-ignores-spaces< / span > :
< span id = "L2265" class = "LineNr" > 2265 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2266" class = "LineNr" > 2266 < / span > 55/push-EBP
< span id = "L2267" class = "LineNr" > 2267 < / 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 = "L2268" class = "LineNr" > 2268 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L2269" class = "LineNr" > 2269 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-input-stream)< / span >
< span id = "L2270" class = "LineNr" > 2270 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2271" class = "LineNr" > 2271 < / span > 68/push _test-input-stream/imm32
< span id = "L2272" class = "LineNr" > 2272 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2273" class = "LineNr" > 2273 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L2274" class = "LineNr" > 2274 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2275" class = "LineNr" > 2275 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2276" class = "LineNr" > 2276 < / span > < span class = "subxS1Comment" > # . write(_test-input-stream, " \" a b\" /yz" )< / span >
< span id = "L2277" class = "LineNr" > 2277 < / span > < span class = "subxS1Comment" > # . indices: 0123 45< / span >
< span id = "L2278" class = "LineNr" > 2278 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2279" class = "LineNr" > 2279 < / span > 68/push < span class = "Constant" > " \" < / span > a b\< span class = "Constant" > " /yz" < / span > /imm32
< span id = "L2280" class = "LineNr" > 2280 < / span > 68/push _test-input-stream/imm32
< span id = "L2281" class = "LineNr" > 2281 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2282" class = "LineNr" > 2282 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L2283" class = "LineNr" > 2283 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2284" class = "LineNr" > 2284 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2285" class = "LineNr" > 2285 < / span > < span class = "subxComment" > # precondition: line-> read == 0< / span >
< span id = "L2286" class = "LineNr" > 2286 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2287" class = "LineNr" > 2287 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L2264' > test-skip-string-ignores-spaces< / a > /precondition" < / span > /imm32
< span id = "L2288" class = "LineNr" > 2288 < / span > 68/push 0/imm32
< span id = "L2289" class = "LineNr" > 2289 < / span > b8/copy-to-EAX _test-input-stream/imm32
< span id = "L2290" class = "LineNr" > 2290 < / span > ff 6/subop/push 1/mod/*+disp8 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # push *(EAX+4)< / span >
< span id = "L2291" class = "LineNr" > 2291 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2292" class = "LineNr" > 2292 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2293" class = "LineNr" > 2293 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2294" class = "LineNr" > 2294 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2295" class = "LineNr" > 2295 < / span > < span class = "subxComment" > # skip-string(_test-input-stream)< / span >
< span id = "L2296" class = "LineNr" > 2296 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2297" class = "LineNr" > 2297 < / span > 68/push _test-input-stream/imm32
< span id = "L2298" class = "LineNr" > 2298 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2299" class = "LineNr" > 2299 < / span > e8/call < a href = 'dquotes.subx.html#L2174' > skip-string< / a > /disp32
< span id = "L2300" class = "LineNr" > 2300 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2301" class = "LineNr" > 2301 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2302" class = "LineNr" > 2302 < / span > < span class = "subxComment" > # check-ints-equal(line-> read, 5, msg)< / span >
2019-07-14 16:42:36 +00:00
< span id = "L2303" class = "LineNr" > 2303 < / span > < span class = "subxS2Comment" > # . . push args< / span >
2019-07-25 07:08:23 +00:00
< span id = "L2304" class = "LineNr" > 2304 < / span > 68/push < span class = "Constant" > " F - test-skip-string-ignores-spaces" < / span > /imm32
< span id = "L2305" class = "LineNr" > 2305 < / span > 68/push 5/imm32
< span id = "L2306" class = "LineNr" > 2306 < / span > b8/copy-to-EAX _test-input-stream/imm32
< span id = "L2307" class = "LineNr" > 2307 < / span > ff 6/subop/push 1/mod/*+disp8 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # push *(EAX+4)< / span >
< span id = "L2308" class = "LineNr" > 2308 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2309" class = "LineNr" > 2309 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2310" class = "LineNr" > 2310 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2311" class = "LineNr" > 2311 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2312" class = "LineNr" > 2312 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2313" class = "LineNr" > 2313 < / 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 = "L2314" class = "LineNr" > 2314 < / span > 5d/pop-to-EBP
< span id = "L2315" class = "LineNr" > 2315 < / span > c3/return
< span id = "L2316" class = "LineNr" > 2316 < / span >
< span id = "L2317" class = "LineNr" > 2317 < / span > < span class = "subxTest" > test-skip-string-ignores-escapes< / span > :
< span id = "L2318" class = "LineNr" > 2318 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2319" class = "LineNr" > 2319 < / span > 55/push-EBP
< span id = "L2320" class = "LineNr" > 2320 < / 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 = "L2321" class = "LineNr" > 2321 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L2322" class = "LineNr" > 2322 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-input-stream)< / span >
< span id = "L2323" class = "LineNr" > 2323 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2324" class = "LineNr" > 2324 < / span > 68/push _test-input-stream/imm32
< span id = "L2325" class = "LineNr" > 2325 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2326" class = "LineNr" > 2326 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L2327" class = "LineNr" > 2327 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2328" class = "LineNr" > 2328 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2329" class = "LineNr" > 2329 < / span > < span class = "subxS1Comment" > # . write(_test-input-stream, " \" a\\\" b\" /yz" )< / span >
< span id = "L2330" class = "LineNr" > 2330 < / span > < span class = "subxS1Comment" > # . indices: 01 2 34 56< / span >
< span id = "L2331" class = "LineNr" > 2331 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2332" class = "LineNr" > 2332 < / span > 68/push < span class = "Constant" > " \" < / span > a\\\< span class = "Constant" > " b\" < / span > /yz" /imm32
< span id = "L2333" class = "LineNr" > 2333 < / span > 68/push _test-input-stream/imm32
< span id = "L2334" class = "LineNr" > 2334 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2335" class = "LineNr" > 2335 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L2336" class = "LineNr" > 2336 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2337" class = "LineNr" > 2337 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2338" class = "LineNr" > 2338 < / span > < span class = "subxComment" > # precondition: line-> read == 0< / span >
< span id = "L2339" class = "LineNr" > 2339 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2340" class = "LineNr" > 2340 < / span > 68/push < span class = "Constant" > " F - < a href = 'dquotes.subx.html#L2317' > test-skip-string-ignores-escapes< / a > /precondition" < / span > /imm32
< span id = "L2341" class = "LineNr" > 2341 < / span > 68/push 0/imm32
< span id = "L2342" class = "LineNr" > 2342 < / span > b8/copy-to-EAX _test-input-stream/imm32
< span id = "L2343" class = "LineNr" > 2343 < / span > ff 6/subop/push 1/mod/*+disp8 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # push *(EAX+4)< / span >
< span id = "L2344" class = "LineNr" > 2344 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2345" class = "LineNr" > 2345 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2346" class = "LineNr" > 2346 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2347" class = "LineNr" > 2347 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2348" class = "LineNr" > 2348 < / span > < span class = "subxComment" > # skip-string(_test-input-stream)< / span >
< span id = "L2349" class = "LineNr" > 2349 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2350" class = "LineNr" > 2350 < / span > 68/push _test-input-stream/imm32
< span id = "L2351" class = "LineNr" > 2351 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2352" class = "LineNr" > 2352 < / span > e8/call < a href = 'dquotes.subx.html#L2174' > skip-string< / a > /disp32
< span id = "L2353" class = "LineNr" > 2353 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2354" class = "LineNr" > 2354 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2355" class = "LineNr" > 2355 < / span > < span class = "subxComment" > # check-ints-equal(line-> read, 6, msg)< / span >
< span id = "L2356" class = "LineNr" > 2356 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2357" class = "LineNr" > 2357 < / span > 68/push < span class = "Constant" > " F - test-skip-string-ignores-escapes" < / span > /imm32
< span id = "L2358" class = "LineNr" > 2358 < / span > 68/push 6/imm32
< span id = "L2359" class = "LineNr" > 2359 < / span > b8/copy-to-EAX _test-input-stream/imm32
< span id = "L2360" class = "LineNr" > 2360 < / span > ff 6/subop/push 1/mod/*+disp8 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # push *(EAX+4)< / span >
< span id = "L2361" class = "LineNr" > 2361 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2362" class = "LineNr" > 2362 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2363" class = "LineNr" > 2363 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2364" class = "LineNr" > 2364 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2365" class = "LineNr" > 2365 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2366" class = "LineNr" > 2366 < / 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 = "L2367" class = "LineNr" > 2367 < / span > 5d/pop-to-EBP
< span id = "L2368" class = "LineNr" > 2368 < / span > c3/return
< span id = "L2369" class = "LineNr" > 2369 < / span >
< span id = "L2370" class = "LineNr" > 2370 < / span > < span class = "subxTest" > test-skip-string-works-from-mid-stream< / span > :
< span id = "L2371" class = "LineNr" > 2371 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2372" class = "LineNr" > 2372 < / span > 55/push-EBP
< span id = "L2373" class = "LineNr" > 2373 < / 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 = "L2374" class = "LineNr" > 2374 < / span > < span class = "subxComment" > # setup< / span >
< span id = "L2375" class = "LineNr" > 2375 < / span > < span class = "subxS1Comment" > # . clear-stream(_test-input-stream)< / span >
< span id = "L2376" class = "LineNr" > 2376 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2377" class = "LineNr" > 2377 < / span > 68/push _test-input-stream/imm32
< span id = "L2378" class = "LineNr" > 2378 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2379" class = "LineNr" > 2379 < / span > e8/call < a href = '../055stream.subx.html#L17' > clear-stream< / a > /disp32
< span id = "L2380" class = "LineNr" > 2380 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2381" class = "LineNr" > 2381 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2382" class = "LineNr" > 2382 < / span > < span class = "subxS1Comment" > # . write(_test-input-stream, " 0 \" a\\\" b\" /yz" )< / span >
< span id = "L2383" class = "LineNr" > 2383 < / span > < span class = "subxS1Comment" > # . indices: 01 2 34 56< / span >
< span id = "L2384" class = "LineNr" > 2384 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2385" class = "LineNr" > 2385 < / span > 68/push < span class = "Constant" > " 0 \" < / span > a\\\< span class = "Constant" > " b\" < / span > /yz" /imm32
< span id = "L2386" class = "LineNr" > 2386 < / span > 68/push _test-input-stream/imm32
< span id = "L2387" class = "LineNr" > 2387 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2388" class = "LineNr" > 2388 < / span > e8/call < a href = '../057write.subx.html#L24' > write< / a > /disp32
< span id = "L2389" class = "LineNr" > 2389 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2390" class = "LineNr" > 2390 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2391" class = "LineNr" > 2391 < / span > < span class = "subxComment" > # precondition: line-> read == 2< / span >
< span id = "L2392" class = "LineNr" > 2392 < / span > c7 0/subop/copy 1/mod/*+disp8 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/disp8 2/imm32 < span class = "subxComment" > # copy to *(EAX+4)< / span >
< span id = "L2393" class = "LineNr" > 2393 < / span > < span class = "subxComment" > # skip-string(_test-input-stream)< / span >
< span id = "L2394" class = "LineNr" > 2394 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2395" class = "LineNr" > 2395 < / span > 68/push _test-input-stream/imm32
< span id = "L2396" class = "LineNr" > 2396 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2397" class = "LineNr" > 2397 < / span > e8/call < a href = 'dquotes.subx.html#L2174' > skip-string< / a > /disp32
< span id = "L2398" class = "LineNr" > 2398 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2399" class = "LineNr" > 2399 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2400" class = "LineNr" > 2400 < / span > < span class = "subxComment" > # check-ints-equal(line-> read, 8, msg)< / span >
< span id = "L2401" class = "LineNr" > 2401 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2402" class = "LineNr" > 2402 < / span > 68/push < span class = "Constant" > " F - test-skip-string-works-from-mid-stream" < / span > /imm32
< span id = "L2403" class = "LineNr" > 2403 < / span > 68/push 8/imm32
< span id = "L2404" class = "LineNr" > 2404 < / span > b8/copy-to-EAX _test-input-stream/imm32
< span id = "L2405" class = "LineNr" > 2405 < / span > ff 6/subop/push 1/mod/*+disp8 0/rm32/EAX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # push *(EAX+4)< / span >
< span id = "L2406" class = "LineNr" > 2406 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2407" class = "LineNr" > 2407 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2408" class = "LineNr" > 2408 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2409" class = "LineNr" > 2409 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2410" class = "LineNr" > 2410 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2411" class = "LineNr" > 2411 < / 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 = "L2412" class = "LineNr" > 2412 < / span > 5d/pop-to-EBP
< span id = "L2413" class = "LineNr" > 2413 < / span > c3/return
< span id = "L2414" class = "LineNr" > 2414 < / span >
< span id = "L2415" class = "LineNr" > 2415 < / span > < span class = "subxFunction" > skip-string-in-slice< / span > : < span class = "subxComment" > # curr : (address byte), end : (address byte) -> new_curr/EAX< / span >
< span id = "L2416" class = "LineNr" > 2416 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2417" class = "LineNr" > 2417 < / span > 55/push-EBP
< span id = "L2418" class = "LineNr" > 2418 < / 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 = "L2419" class = "LineNr" > 2419 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L2420" class = "LineNr" > 2420 < / span > 51/push-ECX
< span id = "L2421" class = "LineNr" > 2421 < / span > 52/push-EDX
< span id = "L2422" class = "LineNr" > 2422 < / span > 53/push-EBX
< span id = "L2423" class = "LineNr" > 2423 < / span > < span class = "subxComment" > # ECX = curr< / span >
< span id = "L2424" class = "LineNr" > 2424 < / span > 8b/copy 1/mod/*+disp8 5/rm32/EBP < 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 = "L2425" class = "LineNr" > 2425 < / span > < span class = "subxComment" > # EDX = end< / span >
< span id = "L2426" class = "LineNr" > 2426 < / span > 8b/copy 1/mod/*+disp8 5/rm32/EBP < 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 = "L2427" class = "LineNr" > 2427 < / span > < span class = "subxComment" > # EAX = 0< / span >
< span id = "L2428" class = "LineNr" > 2428 < / 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 = "L2429" class = "LineNr" > 2429 < / span > < span class = "subxComment" > # skip initial dquote< / span >
< span id = "L2430" class = "LineNr" > 2430 < / span > 41/increment-ECX
< span id = "L2431" class = "LineNr" > 2431 < / span > < span class = "Constant" > $skip-string-in-slice:loop< / span > :
< span id = "L2432" class = "LineNr" > 2432 < / span > < span class = "subxComment" > # if (curr > = end) return curr< / span >
< span id = "L2433" class = "LineNr" > 2433 < / 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 = "L2434" class = "LineNr" > 2434 < / span > 73/jump-if-greater-unsigned-or-equal $skip-string-in-slice:return-curr/disp8
< span id = "L2435" class = "LineNr" > 2435 < / span > < span class = "subxComment" > # AL = *curr< / span >
< span id = "L2436" class = "LineNr" > 2436 < / span > 8a/copy-byte 0/mod/indirect 1/rm32/ECX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0/r32/AL < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "subxComment" > # copy byte at *ECX to AL< / span >
< span id = "L2437" class = "LineNr" > 2437 < / span > < span class = "Constant" > $skip-string-in-slice:dquote< / span > :
< span id = "L2438" class = "LineNr" > 2438 < / span > < span class = "subxComment" > # if (EAX == '" ') break< / span >
< span id = "L2439" class = "LineNr" > 2439 < / span > 3d/compare-EAX-and 0x22/imm32/double-quote
< span id = "L2440" class = "LineNr" > 2440 < / span > 74/jump-if-equal $skip-string-in-slice:break/disp8
< span id = "L2441" class = "LineNr" > 2441 < / span > < span class = "Constant" > $skip-string-in-slice:check-for-escape< / span > :
< span id = "L2442" class = "LineNr" > 2442 < / span > < span class = "subxComment" > # if (EAX == '\') escape next char< / span >
< span id = "L2443" class = "LineNr" > 2443 < / span > 3d/compare-EAX-and 0x5c/imm32/backslash
< span id = "L2444" class = "LineNr" > 2444 < / span > 75/jump-if-not-equal $skip-string-in-slice:continue/disp8
< span id = "L2445" class = "LineNr" > 2445 < / span > < span class = "Constant" > $skip-string-in-slice:escape< / span > :
< span id = "L2446" class = "LineNr" > 2446 < / span > 41/increment-ECX
< span id = "L2447" class = "LineNr" > 2447 < / span > < span class = "Constant" > $skip-string-in-slice:continue< / span > :
< span id = "L2448" class = "LineNr" > 2448 < / span > < span class = "subxComment" > # ++curr< / span >
< span id = "L2449" class = "LineNr" > 2449 < / span > 41/increment-ECX
< span id = "L2450" class = "LineNr" > 2450 < / span > eb/jump $skip-string-in-slice:loop/disp8
< span id = "L2451" class = "LineNr" > 2451 < / span > < span class = "Constant" > $skip-string-in-slice:break< / span > :
< span id = "L2452" class = "LineNr" > 2452 < / span > < span class = "subxComment" > # skip final dquote< / span >
< span id = "L2453" class = "LineNr" > 2453 < / span > 41/increment-ECX
< span id = "L2454" class = "LineNr" > 2454 < / span > < span class = "Constant" > $skip-string-in-slice:return-curr< / span > :
< span id = "L2455" class = "LineNr" > 2455 < / span > < span class = "subxComment" > # return curr< / span >
< span id = "L2456" class = "LineNr" > 2456 < / span > 89/copy 3/mod/direct 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 = "L2457" class = "LineNr" > 2457 < / span > < span class = "Constant" > $skip-string-in-slice:end< / span > :
< span id = "L2458" class = "LineNr" > 2458 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L2459" class = "LineNr" > 2459 < / span > 5b/pop-to-EBX
< span id = "L2460" class = "LineNr" > 2460 < / span > 5a/pop-to-EDX
< span id = "L2461" class = "LineNr" > 2461 < / span > 59/pop-to-ECX
< span id = "L2462" class = "LineNr" > 2462 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2463" class = "LineNr" > 2463 < / 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 = "L2464" class = "LineNr" > 2464 < / span > 5d/pop-to-EBP
< span id = "L2465" class = "LineNr" > 2465 < / span > c3/return
< span id = "L2466" class = "LineNr" > 2466 < / span >
< span id = "L2467" class = "LineNr" > 2467 < / span > < span class = "subxTest" > test-skip-string-in-slice< / span > :
< span id = "L2468" class = "LineNr" > 2468 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2469" class = "LineNr" > 2469 < / span > 55/push-EBP
< span id = "L2470" class = "LineNr" > 2470 < / 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 = "L2471" class = "LineNr" > 2471 < / span > < span class = "subxComment" > # setup: (EAX..ECX) = " \" abc\" def" < / span >
< span id = "L2472" class = "LineNr" > 2472 < / span > b8/copy-to-EAX < span class = "Constant" > " \" < / span > abc\< span class = "Constant" > " def" < / span > /imm32
< span id = "L2473" class = "LineNr" > 2473 < / span > 8b/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 *EAX to ECX< / span >
< span id = "L2474" class = "LineNr" > 2474 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 0/base/EAX 1/index/ECX < span class = "Normal" > . < / span > 1/r32/ECX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy EAX+ECX+4 to ECX< / span >
< span id = "L2475" class = "LineNr" > 2475 < / span > 05/add-to-EAX 4/imm32
< span id = "L2476" class = "LineNr" > 2476 < / span > < span class = "subxComment" > # EAX = skip-string-in-slice(EAX, ECX)< / span >
< span id = "L2477" class = "LineNr" > 2477 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2478" class = "LineNr" > 2478 < / span > 51/push-ECX
< span id = "L2479" class = "LineNr" > 2479 < / span > 50/push-EAX
< span id = "L2480" class = "LineNr" > 2480 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2481" class = "LineNr" > 2481 < / span > e8/call < a href = 'dquotes.subx.html#L2415' > skip-string-in-slice< / a > /disp32
< span id = "L2482" class = "LineNr" > 2482 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2483" class = "LineNr" > 2483 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2484" class = "LineNr" > 2484 < / span > < span class = "subxComment" > # check-ints-equal(ECX-EAX, 4, msg) # number of chars remaining after the string literal< / span >
< span id = "L2485" class = "LineNr" > 2485 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2486" class = "LineNr" > 2486 < / span > 68/push < span class = "Constant" > " F - test-skip-string-in-slice" < / span > /imm32
< span id = "L2487" class = "LineNr" > 2487 < / span > 68/push 4/imm32
< span id = "L2488" class = "LineNr" > 2488 < / span > < span class = "subxS2Comment" > # . . push ECX-EAX< / span >
< span id = "L2489" class = "LineNr" > 2489 < / span > 29/subtract 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" > # subtract EAX from ECX< / span >
< span id = "L2490" class = "LineNr" > 2490 < / span > 51/push-ECX
< span id = "L2491" class = "LineNr" > 2491 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2492" class = "LineNr" > 2492 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2493" class = "LineNr" > 2493 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2494" class = "LineNr" > 2494 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2495" class = "LineNr" > 2495 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2496" class = "LineNr" > 2496 < / 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 = "L2497" class = "LineNr" > 2497 < / span > 5d/pop-to-EBP
< span id = "L2498" class = "LineNr" > 2498 < / span > c3/return
< span id = "L2499" class = "LineNr" > 2499 < / span >
< span id = "L2500" class = "LineNr" > 2500 < / span > < span class = "subxTest" > test-skip-string-in-slice-ignores-spaces< / span > :
< span id = "L2501" class = "LineNr" > 2501 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2502" class = "LineNr" > 2502 < / span > 55/push-EBP
< span id = "L2503" class = "LineNr" > 2503 < / 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 = "L2504" class = "LineNr" > 2504 < / span > < span class = "subxComment" > # setup: (EAX..ECX) = " \" a b\" /yz" < / span >
< span id = "L2505" class = "LineNr" > 2505 < / span > b8/copy-to-EAX < span class = "Constant" > " \" < / span > a b\< span class = "Constant" > " /yz" < / span > /imm32
< span id = "L2506" class = "LineNr" > 2506 < / span > 8b/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 *EAX to ECX< / span >
< span id = "L2507" class = "LineNr" > 2507 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 0/base/EAX 1/index/ECX < span class = "Normal" > . < / span > 1/r32/ECX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy EAX+ECX+4 to ECX< / span >
< span id = "L2508" class = "LineNr" > 2508 < / span > 05/add-to-EAX 4/imm32
< span id = "L2509" class = "LineNr" > 2509 < / span > < span class = "subxComment" > # EAX = skip-string-in-slice(EAX, ECX)< / span >
< span id = "L2510" class = "LineNr" > 2510 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2511" class = "LineNr" > 2511 < / span > 51/push-ECX
< span id = "L2512" class = "LineNr" > 2512 < / span > 50/push-EAX
< span id = "L2513" class = "LineNr" > 2513 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2514" class = "LineNr" > 2514 < / span > e8/call < a href = 'dquotes.subx.html#L2415' > skip-string-in-slice< / a > /disp32
< span id = "L2515" class = "LineNr" > 2515 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2516" class = "LineNr" > 2516 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2517" class = "LineNr" > 2517 < / span > < span class = "subxComment" > # check-ints-equal(ECX-EAX, 3, msg) # number of chars remaining after the string literal< / span >
< span id = "L2518" class = "LineNr" > 2518 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2519" class = "LineNr" > 2519 < / span > 68/push < span class = "Constant" > " F - test-skip-string-in-slice-ignores-spaces" < / span > /imm32
< span id = "L2520" class = "LineNr" > 2520 < / span > 68/push 3/imm32
< span id = "L2521" class = "LineNr" > 2521 < / span > < span class = "subxS2Comment" > # . . push ECX-EAX< / span >
< span id = "L2522" class = "LineNr" > 2522 < / span > 29/subtract 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" > # subtract EAX from ECX< / span >
< span id = "L2523" class = "LineNr" > 2523 < / span > 51/push-ECX
< span id = "L2524" class = "LineNr" > 2524 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2525" class = "LineNr" > 2525 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2526" class = "LineNr" > 2526 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2527" class = "LineNr" > 2527 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2528" class = "LineNr" > 2528 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2529" class = "LineNr" > 2529 < / 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 = "L2530" class = "LineNr" > 2530 < / span > 5d/pop-to-EBP
< span id = "L2531" class = "LineNr" > 2531 < / span > c3/return
< span id = "L2532" class = "LineNr" > 2532 < / span >
< span id = "L2533" class = "LineNr" > 2533 < / span > < span class = "subxTest" > test-skip-string-in-slice-ignores-escapes< / span > :
< span id = "L2534" class = "LineNr" > 2534 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2535" class = "LineNr" > 2535 < / span > 55/push-EBP
< span id = "L2536" class = "LineNr" > 2536 < / 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 = "L2537" class = "LineNr" > 2537 < / span > < span class = "subxComment" > # setup: (EAX..ECX) = " \" a\\\" b\" /yz" < / span >
< span id = "L2538" class = "LineNr" > 2538 < / span > b8/copy-to-EAX < span class = "Constant" > " \" < / span > a\\\< span class = "Constant" > " b\" < / span > /yz" /imm32
< span id = "L2539" class = "LineNr" > 2539 < / span > 8b/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 *EAX to ECX< / span >
< span id = "L2540" class = "LineNr" > 2540 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 0/base/EAX 1/index/ECX < span class = "Normal" > . < / span > 1/r32/ECX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy EAX+ECX+4 to ECX< / span >
< span id = "L2541" class = "LineNr" > 2541 < / span > 05/add-to-EAX 4/imm32
< span id = "L2542" class = "LineNr" > 2542 < / span > < span class = "subxComment" > # EAX = skip-string-in-slice(EAX, ECX)< / span >
< span id = "L2543" class = "LineNr" > 2543 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2544" class = "LineNr" > 2544 < / span > 51/push-ECX
< span id = "L2545" class = "LineNr" > 2545 < / span > 50/push-EAX
< span id = "L2546" class = "LineNr" > 2546 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2547" class = "LineNr" > 2547 < / span > e8/call < a href = 'dquotes.subx.html#L2415' > skip-string-in-slice< / a > /disp32
< span id = "L2548" class = "LineNr" > 2548 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2549" class = "LineNr" > 2549 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2550" class = "LineNr" > 2550 < / span > < span class = "subxComment" > # check-ints-equal(ECX-EAX, 3, msg) # number of chars remaining after the string literal< / span >
< span id = "L2551" class = "LineNr" > 2551 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2552" class = "LineNr" > 2552 < / span > 68/push < span class = "Constant" > " F - test-skip-string-in-slice-ignores-escapes" < / span > /imm32
< span id = "L2553" class = "LineNr" > 2553 < / span > 68/push 3/imm32
< span id = "L2554" class = "LineNr" > 2554 < / span > < span class = "subxS2Comment" > # . . push ECX-EAX< / span >
< span id = "L2555" class = "LineNr" > 2555 < / span > 29/subtract 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" > # subtract EAX from ECX< / span >
< span id = "L2556" class = "LineNr" > 2556 < / span > 51/push-ECX
< span id = "L2557" class = "LineNr" > 2557 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2558" class = "LineNr" > 2558 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2559" class = "LineNr" > 2559 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2560" class = "LineNr" > 2560 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2561" class = "LineNr" > 2561 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2562" class = "LineNr" > 2562 < / 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 = "L2563" class = "LineNr" > 2563 < / span > 5d/pop-to-EBP
< span id = "L2564" class = "LineNr" > 2564 < / span > c3/return
< span id = "L2565" class = "LineNr" > 2565 < / span >
< span id = "L2566" class = "LineNr" > 2566 < / span > < span class = "subxTest" > test-skip-string-in-slice-stops-at-end< / span > :
< span id = "L2567" class = "LineNr" > 2567 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2568" class = "LineNr" > 2568 < / span > 55/push-EBP
< span id = "L2569" class = "LineNr" > 2569 < / 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 = "L2570" class = "LineNr" > 2570 < / span > < span class = "subxComment" > # setup: (EAX..ECX) = " \" abc" # unbalanced dquote< / span >
< span id = "L2571" class = "LineNr" > 2571 < / span > b8/copy-to-EAX < span class = "Constant" > " \" < / span > abc" /imm32
< span id = "L2572" class = "LineNr" > 2572 < / span > 8b/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 *EAX to ECX< / span >
< span id = "L2573" class = "LineNr" > 2573 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 0/base/EAX 1/index/ECX < span class = "Normal" > . < / span > 1/r32/ECX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy EAX+ECX+4 to ECX< / span >
< span id = "L2574" class = "LineNr" > 2574 < / span > 05/add-to-EAX 4/imm32
< span id = "L2575" class = "LineNr" > 2575 < / span > < span class = "subxComment" > # EAX = skip-string-in-slice(EAX, ECX)< / span >
< span id = "L2576" class = "LineNr" > 2576 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2577" class = "LineNr" > 2577 < / span > 51/push-ECX
< span id = "L2578" class = "LineNr" > 2578 < / span > 50/push-EAX
< span id = "L2579" class = "LineNr" > 2579 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2580" class = "LineNr" > 2580 < / span > e8/call < a href = 'dquotes.subx.html#L2415' > skip-string-in-slice< / a > /disp32
< span id = "L2581" class = "LineNr" > 2581 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2582" class = "LineNr" > 2582 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2583" class = "LineNr" > 2583 < / span > < span class = "subxComment" > # check-ints-equal(ECX-EAX, 0, msg) # skipped to end of slice< / span >
< span id = "L2584" class = "LineNr" > 2584 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2585" class = "LineNr" > 2585 < / span > 68/push < span class = "Constant" > " F - test-skip-string-in-slice-stops-at-end" < / span > /imm32
< span id = "L2586" class = "LineNr" > 2586 < / span > 68/push 0/imm32
< span id = "L2587" class = "LineNr" > 2587 < / span > < span class = "subxS2Comment" > # . . push ECX-EAX< / span >
< span id = "L2588" class = "LineNr" > 2588 < / span > 29/subtract 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" > # subtract EAX from ECX< / span >
< span id = "L2589" class = "LineNr" > 2589 < / span > 51/push-ECX
2019-07-14 16:42:36 +00:00
< span id = "L2590" class = "LineNr" > 2590 < / span > < span class = "subxS2Comment" > # . . call< / span >
2019-07-25 07:08:23 +00:00
< span id = "L2591" class = "LineNr" > 2591 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
2019-07-14 16:42:36 +00:00
< span id = "L2592" class = "LineNr" > 2592 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
2019-07-25 07:08:23 +00:00
< span id = "L2593" class = "LineNr" > 2593 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2594" class = "LineNr" > 2594 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2595" class = "LineNr" > 2595 < / 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 = "L2596" class = "LineNr" > 2596 < / span > 5d/pop-to-EBP
< span id = "L2597" class = "LineNr" > 2597 < / span > c3/return
< span id = "L2598" class = "LineNr" > 2598 < / span >
< span id = "L2599" class = "LineNr" > 2599 < / span > < span class = "subxFunction" > string-length-at-start-of-slice< / span > : < span class = "subxComment" > # curr : (address byte), end : (address byte) -> length/EAX< / span >
< span id = "L2600" class = "LineNr" > 2600 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2601" class = "LineNr" > 2601 < / span > 55/push-EBP
< span id = "L2602" class = "LineNr" > 2602 < / 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 = "L2603" class = "LineNr" > 2603 < / span > < span class = "subxS1Comment" > # . save registers< / span >
< span id = "L2604" class = "LineNr" > 2604 < / span > 51/push-ECX
< span id = "L2605" class = "LineNr" > 2605 < / span > 52/push-EDX
< span id = "L2606" class = "LineNr" > 2606 < / span > 53/push-EBX
< span id = "L2607" class = "LineNr" > 2607 < / span > < span class = "subxComment" > # ECX = curr< / span >
< span id = "L2608" class = "LineNr" > 2608 < / span > 8b/copy 1/mod/*+disp8 5/rm32/EBP < 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 = "L2609" class = "LineNr" > 2609 < / span > < span class = "subxComment" > # EDX = end< / span >
< span id = "L2610" class = "LineNr" > 2610 < / span > 8b/copy 1/mod/*+disp8 5/rm32/EBP < 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 = "L2611" class = "LineNr" > 2611 < / span > < span class = "subxComment" > # length/EAX = 0< / span >
< span id = "L2612" class = "LineNr" > 2612 < / 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 = "L2613" class = "LineNr" > 2613 < / span > < span class = "subxComment" > # EBX = 0< / span >
< span id = "L2614" class = "LineNr" > 2614 < / span > 31/xor 3/mod/direct 3/rm32/EBX < 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" > # clear EBX< / span >
< span id = "L2615" class = "LineNr" > 2615 < / span > < span class = "subxComment" > # skip initial dquote< / span >
< span id = "L2616" class = "LineNr" > 2616 < / span > 41/increment-ECX
< span id = "L2617" class = "LineNr" > 2617 < / span > < span class = "Constant" > $string-length-at-start-of-slice:loop< / span > :
< span id = "L2618" class = "LineNr" > 2618 < / span > < span class = "subxComment" > # if (curr > = end) return length< / span >
< span id = "L2619" class = "LineNr" > 2619 < / 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 = "L2620" class = "LineNr" > 2620 < / span > 73/jump-if-greater-unsigned-or-equal $string-length-at-start-of-slice:end/disp8
< span id = "L2621" class = "LineNr" > 2621 < / span > < span class = "subxComment" > # BL = *curr< / span >
< span id = "L2622" class = "LineNr" > 2622 < / span > 8a/copy-byte 0/mod/indirect 1/rm32/ECX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 3/r32/BL < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "subxComment" > # copy byte at *ECX to BL< / span >
< span id = "L2623" class = "LineNr" > 2623 < / span > < span class = "Constant" > $string-length-at-start-of-slice:dquote< / span > :
< span id = "L2624" class = "LineNr" > 2624 < / span > < span class = "subxComment" > # if (EBX == '" ') break< / span >
< span id = "L2625" class = "LineNr" > 2625 < / span > 81 7/subop/compare 3/mod/direct 3/rm32/EBX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0x22/imm32/dquote < span class = "subxComment" > # compare EBX< / span >
< span id = "L2626" class = "LineNr" > 2626 < / span > 74/jump-if-equal $string-length-at-start-of-slice:end/disp8
< span id = "L2627" class = "LineNr" > 2627 < / span > < span class = "Constant" > $string-length-at-start-of-slice:check-for-escape< / span > :
< span id = "L2628" class = "LineNr" > 2628 < / span > < span class = "subxComment" > # if (EBX == '\') escape next char< / span >
< span id = "L2629" class = "LineNr" > 2629 < / span > 81 7/subop/compare 3/mod/direct 3/rm32/EBX < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0x5c/imm32/backslash < span class = "subxComment" > # compare EBX< / span >
< span id = "L2630" class = "LineNr" > 2630 < / span > 75/jump-if-not-equal $string-length-at-start-of-slice:continue/disp8
< span id = "L2631" class = "LineNr" > 2631 < / span > < span class = "Constant" > $string-length-at-start-of-slice:escape< / span > :
< span id = "L2632" class = "LineNr" > 2632 < / span > < span class = "subxComment" > # increment curr but not result< / span >
< span id = "L2633" class = "LineNr" > 2633 < / span > 41/increment-ECX
< span id = "L2634" class = "LineNr" > 2634 < / span > < span class = "Constant" > $string-length-at-start-of-slice:continue< / span > :
< span id = "L2635" class = "LineNr" > 2635 < / span > < span class = "subxComment" > # ++result< / span >
< span id = "L2636" class = "LineNr" > 2636 < / span > 40/increment-EAX
< span id = "L2637" class = "LineNr" > 2637 < / span > < span class = "subxComment" > # ++curr< / span >
< span id = "L2638" class = "LineNr" > 2638 < / span > 41/increment-ECX
< span id = "L2639" class = "LineNr" > 2639 < / span > eb/jump $string-length-at-start-of-slice:loop/disp8
< span id = "L2640" class = "LineNr" > 2640 < / span > < span class = "Constant" > $string-length-at-start-of-slice:end< / span > :
< span id = "L2641" class = "LineNr" > 2641 < / span > < span class = "subxS1Comment" > # . restore registers< / span >
< span id = "L2642" class = "LineNr" > 2642 < / span > 5b/pop-to-EBX
< span id = "L2643" class = "LineNr" > 2643 < / span > 5a/pop-to-EDX
< span id = "L2644" class = "LineNr" > 2644 < / span > 59/pop-to-ECX
< span id = "L2645" class = "LineNr" > 2645 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2646" class = "LineNr" > 2646 < / 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 = "L2647" class = "LineNr" > 2647 < / span > 5d/pop-to-EBP
< span id = "L2648" class = "LineNr" > 2648 < / span > c3/return
< span id = "L2649" class = "LineNr" > 2649 < / span >
< span id = "L2650" class = "LineNr" > 2650 < / span > < span class = "subxTest" > test-string-length-at-start-of-slice< / span > :
< span id = "L2651" class = "LineNr" > 2651 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2652" class = "LineNr" > 2652 < / span > 55/push-EBP
< span id = "L2653" class = "LineNr" > 2653 < / 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 = "L2654" class = "LineNr" > 2654 < / span > < span class = "subxComment" > # setup: (EAX..ECX) = " \" abc\" def" < / span >
< span id = "L2655" class = "LineNr" > 2655 < / span > b8/copy-to-EAX < span class = "Constant" > " \" < / span > abc\< span class = "Constant" > " def" < / span > /imm32
< span id = "L2656" class = "LineNr" > 2656 < / span > 8b/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 *EAX to ECX< / span >
< span id = "L2657" class = "LineNr" > 2657 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 0/base/EAX 1/index/ECX < span class = "Normal" > . < / span > 1/r32/ECX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy EAX+ECX+4 to ECX< / span >
< span id = "L2658" class = "LineNr" > 2658 < / span > 05/add-to-EAX 4/imm32
< span id = "L2659" class = "LineNr" > 2659 < / span > < span class = "subxComment" > # EAX = string-length-at-start-of-slice(EAX, ECX)< / span >
< span id = "L2660" class = "LineNr" > 2660 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2661" class = "LineNr" > 2661 < / span > 51/push-ECX
< span id = "L2662" class = "LineNr" > 2662 < / span > 50/push-EAX
< span id = "L2663" class = "LineNr" > 2663 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2664" class = "LineNr" > 2664 < / span > e8/call < a href = 'dquotes.subx.html#L2599' > string-length-at-start-of-slice< / a > /disp32
< span id = "L2665" class = "LineNr" > 2665 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2666" class = "LineNr" > 2666 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2667" class = "LineNr" > 2667 < / span > < span class = "subxComment" > # check-ints-equal(EAX, 3, msg)< / span >
< span id = "L2668" class = "LineNr" > 2668 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2669" class = "LineNr" > 2669 < / span > 68/push < span class = "Constant" > " F - test-string-length-at-start-of-slice" < / span > /imm32
< span id = "L2670" class = "LineNr" > 2670 < / span > 68/push 3/imm32
< span id = "L2671" class = "LineNr" > 2671 < / span > 50/push-EAX
< span id = "L2672" class = "LineNr" > 2672 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2673" class = "LineNr" > 2673 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2674" class = "LineNr" > 2674 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2675" class = "LineNr" > 2675 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2676" class = "LineNr" > 2676 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2677" class = "LineNr" > 2677 < / 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 = "L2678" class = "LineNr" > 2678 < / span > 5d/pop-to-EBP
< span id = "L2679" class = "LineNr" > 2679 < / span > c3/return
< span id = "L2680" class = "LineNr" > 2680 < / span >
< span id = "L2681" class = "LineNr" > 2681 < / span > < span class = "subxTest" > test-string-length-at-start-of-slice-escaped< / span > :
< span id = "L2682" class = "LineNr" > 2682 < / span > < span class = "subxS1Comment" > # . prolog< / span >
< span id = "L2683" class = "LineNr" > 2683 < / span > 55/push-EBP
< span id = "L2684" class = "LineNr" > 2684 < / 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 = "L2685" class = "LineNr" > 2685 < / span > < span class = "subxComment" > # setup: (EAX..ECX) = " \" ab\\c\" def" < / span >
< span id = "L2686" class = "LineNr" > 2686 < / span > b8/copy-to-EAX < span class = "Constant" > " \" < / span > ab\\c\< span class = "Constant" > " def" < / span > /imm32
< span id = "L2687" class = "LineNr" > 2687 < / span > 8b/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 *EAX to ECX< / span >
< span id = "L2688" class = "LineNr" > 2688 < / span > 8d/copy-address 1/mod/*+disp8 4/rm32/sib 0/base/EAX 1/index/ECX < span class = "Normal" > . < / span > 1/r32/ECX 4/disp8 < span class = "Normal" > . < / span > < span class = "subxComment" > # copy EAX+ECX+4 to ECX< / span >
< span id = "L2689" class = "LineNr" > 2689 < / span > 05/add-to-EAX 4/imm32
< span id = "L2690" class = "LineNr" > 2690 < / span > < span class = "subxComment" > # EAX = string-length-at-start-of-slice(EAX, ECX)< / span >
< span id = "L2691" class = "LineNr" > 2691 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2692" class = "LineNr" > 2692 < / span > 51/push-ECX
< span id = "L2693" class = "LineNr" > 2693 < / span > 50/push-EAX
< span id = "L2694" class = "LineNr" > 2694 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2695" class = "LineNr" > 2695 < / span > e8/call < a href = 'dquotes.subx.html#L2599' > string-length-at-start-of-slice< / a > /disp32
< span id = "L2696" class = "LineNr" > 2696 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2697" class = "LineNr" > 2697 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 8/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2698" class = "LineNr" > 2698 < / span > < span class = "subxComment" > # check-ints-equal(EAX, 3, msg)< / span >
< span id = "L2699" class = "LineNr" > 2699 < / span > < span class = "subxS2Comment" > # . . push args< / span >
< span id = "L2700" class = "LineNr" > 2700 < / span > 68/push < span class = "Constant" > " F - test-string-length-at-start-of-slice-escaped" < / span > /imm32
< span id = "L2701" class = "LineNr" > 2701 < / span > 68/push 3/imm32
< span id = "L2702" class = "LineNr" > 2702 < / span > 50/push-EAX
< span id = "L2703" class = "LineNr" > 2703 < / span > < span class = "subxS2Comment" > # . . call< / span >
< span id = "L2704" class = "LineNr" > 2704 < / span > e8/call < a href = '../051test.subx.html#L24' > check-ints-equal< / a > /disp32
< span id = "L2705" class = "LineNr" > 2705 < / span > < span class = "subxS2Comment" > # . . discard args< / span >
< span id = "L2706" class = "LineNr" > 2706 < / span > 81 0/subop/add 3/mod/direct 4/rm32/ESP < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > < span class = "Normal" > . < / span > 0xc/imm32 < span class = "subxComment" > # add to ESP< / span >
< span id = "L2707" class = "LineNr" > 2707 < / span > < span class = "subxS1Comment" > # . epilog< / span >
< span id = "L2708" class = "LineNr" > 2708 < / 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 = "L2709" class = "LineNr" > 2709 < / span > 5d/pop-to-EBP
< span id = "L2710" class = "LineNr" > 2710 < / span > c3/return
< span id = "L2711" class = "LineNr" > 2711 < / span >
< span id = "L2712" class = "LineNr" > 2712 < / span > == data
< span id = "L2713" class = "LineNr" > 2713 < / span >
< span id = "L2714" class = "LineNr" > 2714 < / span > < span class = "SpecialChar" > Next-string-literal< / span > : < span class = "subxComment" > # tracks the next auto-generated variable name< / span >
< span id = "L2715" class = "LineNr" > 2715 < / span > 1/imm32
< span id = "L2716" class = "LineNr" > 2716 < / span >
< span id = "L2717" class = "LineNr" > 2717 < / span > < span class = "subxComment" > # length-prefixed string containing just a single space< / span >
< span id = "L2718" class = "LineNr" > 2718 < / span > < span class = "SpecialChar" > Space< / span > :
< span id = "L2719" class = "LineNr" > 2719 < / span > < span class = "subxComment" > # size< / span >
< span id = "L2720" class = "LineNr" > 2720 < / span > 1/imm32
< span id = "L2721" class = "LineNr" > 2721 < / span > < span class = "subxComment" > # data< / span >
< span id = "L2722" class = "LineNr" > 2722 < / span > 20/space
< span id = "L2723" class = "LineNr" > 2723 < / span >
< span id = "L2724" class = "LineNr" > 2724 < / span > < span class = "subxComment" > # length-prefixed string containing just a single slash< / span >
< span id = "L2725" class = "LineNr" > 2725 < / span > < span class = "SpecialChar" > Slash< / span > :
< span id = "L2726" class = "LineNr" > 2726 < / span > < span class = "subxComment" > # size< / span >
< span id = "L2727" class = "LineNr" > 2727 < / span > 1/imm32
< span id = "L2728" class = "LineNr" > 2728 < / span > < span class = "subxComment" > # data< / span >
< span id = "L2729" class = "LineNr" > 2729 < / span > 2f/slash
< span id = "L2730" class = "LineNr" > 2730 < / span >
< span id = "L2731" class = "LineNr" > 2731 < / span > < span class = "subxMinorFunction" > _test-slice-abc< / span > :
< span id = "L2732" class = "LineNr" > 2732 < / span > 22/dquote 61/a 62/b 63/c 22/dquote < span class = "subxComment" > # " abc" < / span >
< span id = "L2733" class = "LineNr" > 2733 < / span > 2f/slash 64/d
< span id = "L2734" class = "LineNr" > 2734 < / span > < span class = "subxMinorFunction" > _test-slice-abc-limit< / span > :
< span id = "L2735" class = "LineNr" > 2735 < / span >
< span id = "L2736" class = "LineNr" > 2736 < / span > < span class = "subxMinorFunction" > _test-slice-a-space-b< / span > :
< span id = "L2737" class = "LineNr" > 2737 < / span > 22/dquote 61/a 20/space 62/b 22/dquote < span class = "subxComment" > # " a b" < / span >
< span id = "L2738" class = "LineNr" > 2738 < / span > < span class = "subxMinorFunction" > _test-slice-a-space-b-limit< / span > :
< span id = "L2739" class = "LineNr" > 2739 < / span >
< span id = "L2740" class = "LineNr" > 2740 < / span > < span class = "subxMinorFunction" > _test-slice-a-dquote-b< / span > :
< span id = "L2741" class = "LineNr" > 2741 < / span > 22/dquote 61/a 5c/backslash 22/dquote 62/b 22/dquote < span class = "subxComment" > # " a\" b" < / span >
< span id = "L2742" class = "LineNr" > 2742 < / span > < span class = "subxMinorFunction" > _test-slice-a-dquote-b-limit< / span > :
< span id = "L2743" class = "LineNr" > 2743 < / span >
< span id = "L2744" class = "LineNr" > 2744 < / span > < span class = "subxMinorFunction" > _test-slice-a-newline-b< / span > :
< span id = "L2745" class = "LineNr" > 2745 < / span > 22/dquote 61/a 5c/backslash 6e/n 62/b 22/dquote < span class = "subxComment" > # " a\nb" < / span >
< span id = "L2746" class = "LineNr" > 2746 < / span > < span class = "subxMinorFunction" > _test-slice-a-newline-b-limit< / span > :
< span id = "L2747" class = "LineNr" > 2747 < / span >
< span id = "L2748" class = "LineNr" > 2748 < / span > < span class = "subxComment" > # " abc/def" /ghi< / span >
< span id = "L2749" class = "LineNr" > 2749 < / span > < span class = "subxMinorFunction" > _test-slice-literal-string< / span > :
< span id = "L2750" class = "LineNr" > 2750 < / span > 22/dquote
< span id = "L2751" class = "LineNr" > 2751 < / span > 61/a 62/b 63/c < span class = "subxComment" > # abc< / span >
< span id = "L2752" class = "LineNr" > 2752 < / span > 2f/slash 64/d 65/e 66/f < span class = "subxComment" > # /def< / span >
< span id = "L2753" class = "LineNr" > 2753 < / span > 22/dquote
< span id = "L2754" class = "LineNr" > 2754 < / span > 2f/slash 67/g 68/h 69/i < span class = "subxComment" > # /ghi< / span >
< span id = "L2755" class = "LineNr" > 2755 < / span > < span class = "subxMinorFunction" > _test-slice-literal-string-with-limit< / span > :
< span id = "L2756" class = "LineNr" > 2756 < / span >
< span id = "L2757" class = "LineNr" > 2757 < / span > < span class = "subxS2Comment" > # . . vim: nowrap:textwidth=0< / span >
2019-04-24 03:51:58 +00:00
< / pre >
< / body >
< / html >
<!-- vim: set foldmethod=manual : -->