diff options
Diffstat (limited to 'html/apps/dquotes.subx.html')
-rw-r--r-- | html/apps/dquotes.subx.html | 52 |
1 files changed, 26 insertions, 26 deletions
diff --git a/html/apps/dquotes.subx.html b/html/apps/dquotes.subx.html index 71ed40a3..aeefeaf7 100644 --- a/html/apps/dquotes.subx.html +++ b/html/apps/dquotes.subx.html @@ -119,7 +119,7 @@ if ('onhashchange' in window) { <span id="L56" class="LineNr"> 56 </span> eb/jump $subx-dquotes-main:end/disp8 <span id="L57" class="LineNr"> 57 </span><span class="Constant">$subx-dquotes-main:interactive</span>: <span id="L58" class="LineNr"> 58 </span> <span class="subxH1Comment"># - otherwise convert stdin</span> -<span id="L59" class="LineNr"> 59 </span> <span class="subxComment"># var ed/eax : exit-descriptor</span> +<span id="L59" class="LineNr"> 59 </span> <span class="subxComment"># var ed/eax: exit-descriptor</span> <span id="L60" class="LineNr"> 60 </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="L61" class="LineNr"> 61 </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="L62" class="LineNr"> 62 </span> <span class="subxComment"># configure ed to really exit()</span> @@ -145,10 +145,10 @@ if ('onhashchange' in window) { <span id="L82" class="LineNr"> 82 </span><span class="subxComment"># line = words separated by ' ', maybe followed by comment starting with '#'</span> <span id="L83" class="LineNr"> 83 </span><span class="subxComment"># word = datum until '/', then 0 or more metadata separated by '/'</span> <span id="L84" class="LineNr"> 84 </span> -<span id="L85" class="LineNr"> 85 </span><span class="subxFunction">subx-dquotes</span>: <span class="subxComment"># in : (addr buffered-file), out : (addr buffered-file)</span> +<span id="L85" class="LineNr"> 85 </span><span class="subxFunction">subx-dquotes</span>: <span class="subxComment"># in: (addr buffered-file), out: (addr buffered-file)</span> <span id="L86" class="LineNr"> 86 </span> <span class="subxComment"># pseudocode:</span> -<span id="L87" class="LineNr"> 87 </span> <span class="subxComment"># var line : (stream byte 512)</span> -<span id="L88" class="LineNr"> 88 </span> <span class="subxComment"># var new-data-segment : (handle stream byte) = new-stream(Heap, Segment-size, 1)</span> +<span id="L87" class="LineNr"> 87 </span> <span class="subxComment"># var line: (stream byte 512)</span> +<span id="L88" class="LineNr"> 88 </span> <span class="subxComment"># var new-data-segment: (handle stream byte) = new-stream(Heap, Segment-size, 1)</span> <span id="L89" class="LineNr"> 89 </span> <span class="subxComment">#</span> <span id="L90" class="LineNr"> 90 </span> <span class="subxComment"># write(new-data-segment, "== data\n")</span> <span id="L91" class="LineNr"> 91 </span> <span class="subxComment"># # TODO: When it was originally written dquotes ran before assort, so</span> @@ -188,13 +188,13 @@ if ('onhashchange' in window) { <span id="L125" class="LineNr"> 125 </span> 53/push-ebx <span id="L126" class="LineNr"> 126 </span> 56/push-esi <span id="L127" class="LineNr"> 127 </span> 57/push-edi -<span id="L128" class="LineNr"> 128 </span> <span class="subxComment"># var line/ecx : (stream byte 512)</span> +<span id="L128" class="LineNr"> 128 </span> <span class="subxComment"># var line/ecx: (stream byte 512)</span> <span id="L129" class="LineNr"> 129 </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="L130" class="LineNr"> 130 </span> 68/push 0x200/imm32/length <span id="L131" class="LineNr"> 131 </span> 68/push 0/imm32/read <span id="L132" class="LineNr"> 132 </span> 68/push 0/imm32/write <span id="L133" class="LineNr"> 133 </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="L134" class="LineNr"> 134 </span> <span class="subxComment"># var word-slice/edx : slice</span> +<span id="L134" class="LineNr"> 134 </span> <span class="subxComment"># var word-slice/edx: slice</span> <span id="L135" class="LineNr"> 135 </span> 68/push 0/imm32/end <span id="L136" class="LineNr"> 136 </span> 68/push 0/imm32/start <span id="L137" class="LineNr"> 137 </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> @@ -261,9 +261,9 @@ if ('onhashchange' in window) { <span id="L198" class="LineNr"> 198 </span> 0f 85/jump-if-!= $subx-dquotes:next-line/disp32 <span id="L199" class="LineNr"> 199 </span><span class="Constant">$subx-dquotes:check-for-comment</span>: <span id="L200" class="LineNr"> 200 </span> <span class="subxComment"># if (slice-starts-with?(word-slice, "#")) continue</span> -<span id="L201" class="LineNr"> 201 </span> <span class="subxS1Comment"># . var start/esi : (addr byte) = word-slice->start</span> +<span id="L201" class="LineNr"> 201 </span> <span class="subxS1Comment"># . var start/esi: (addr byte) = word-slice->start</span> <span id="L202" class="LineNr"> 202 </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="L203" class="LineNr"> 203 </span> <span class="subxS1Comment"># . var c/eax : byte = *start</span> +<span id="L203" class="LineNr"> 203 </span> <span class="subxS1Comment"># . var c/eax: byte = *start</span> <span id="L204" class="LineNr"> 204 </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="L205" class="LineNr"> 205 </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="L206" class="LineNr"> 206 </span> <span class="subxS1Comment"># . if (c == '#') continue</span> @@ -350,7 +350,7 @@ if ('onhashchange' in window) { <span id="L287" class="LineNr"> 287 </span> <span id="L288" class="LineNr"> 288 </span><span class="subxComment"># Write out 'string-literal' in a new format to 'out-segment', assign it a new</span> <span id="L289" class="LineNr"> 289 </span><span class="subxComment"># label, and write the new label out to 'out'.</span> -<span id="L290" class="LineNr"> 290 </span><span class="subxFunction">process-string-literal</span>: <span class="subxComment"># string-literal : (addr slice), out : (addr buffered-file), out-segment : (addr stream byte)</span> +<span id="L290" class="LineNr"> 290 </span><span class="subxFunction">process-string-literal</span>: <span class="subxComment"># string-literal: (addr slice), out: (addr buffered-file), out-segment: (addr stream byte)</span> <span id="L291" class="LineNr"> 291 </span> <span class="subxComment"># pseudocode:</span> <span id="L292" class="LineNr"> 292 </span> <span class="subxComment"># print(out-segment, "_string#{Next-string-literal}:\n")</span> <span id="L293" class="LineNr"> 293 </span> <span class="subxComment"># emit-string-literal-data(out-segment, string-literal)</span> @@ -363,7 +363,7 @@ if ('onhashchange' in window) { <span id="L300" class="LineNr"> 300 </span> 89/copy 3/mod/direct 5/rm32/ebp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 4/r32/esp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="subxComment"># copy esp to ebp</span> <span id="L301" class="LineNr"> 301 </span> <span class="subxS1Comment"># . save registers</span> <span id="L302" class="LineNr"> 302 </span> 51/push-ecx -<span id="L303" class="LineNr"> 303 </span> <span class="subxComment"># var int32-stream/ecx : (stream byte 10) # number of decimal digits a 32-bit number can have</span> +<span id="L303" class="LineNr"> 303 </span> <span class="subxComment"># var int32-stream/ecx: (stream byte 10) # number of decimal digits a 32-bit number can have</span> <span id="L304" class="LineNr"> 304 </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="L305" class="LineNr"> 305 </span> 68/push 0xa/imm32/decimal-digits-in-32bit-number <span id="L306" class="LineNr"> 306 </span> 68/push 0/imm32/read @@ -852,7 +852,7 @@ if ('onhashchange' in window) { <span id="L846" class="LineNr"> 846 </span> c3/return <span id="L847" class="LineNr"> 847 </span> <span id="L848" class="LineNr"> 848 </span><span class="subxComment"># generate the data segment contents byte by byte for a given slice</span> -<span id="L849" class="LineNr"> 849 </span><span class="subxFunction">emit-string-literal-data</span>: <span class="subxComment"># out : (addr stream byte), word : (addr slice)</span> +<span id="L849" class="LineNr"> 849 </span><span class="subxFunction">emit-string-literal-data</span>: <span class="subxComment"># out: (addr stream byte), word: (addr slice)</span> <span id="L850" class="LineNr"> 850 </span> <span class="subxComment"># pseudocode</span> <span id="L851" class="LineNr"> 851 </span> <span class="subxComment"># len = string-length-at-start-of-slice(word->start, word->end)</span> <span id="L852" class="LineNr"> 852 </span> <span class="subxComment"># print(out, "#{len}/imm32 ")</span> @@ -891,14 +891,14 @@ if ('onhashchange' in window) { <span id="L885" class="LineNr"> 885 </span> 56/push-esi <span id="L886" class="LineNr"> 886 </span> <span class="subxComment"># esi = word</span> <span id="L887" class="LineNr"> 887 </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="L888" class="LineNr"> 888 </span> <span class="subxComment"># var idx/ebx : int = 0</span> +<span id="L888" class="LineNr"> 888 </span> <span class="subxComment"># var idx/ebx: int = 0</span> <span id="L889" class="LineNr"> 889 </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="L890" class="LineNr"> 890 </span> <span class="subxComment"># var curr/edx : (addr byte) = word->start</span> +<span id="L890" class="LineNr"> 890 </span> <span class="subxComment"># var curr/edx: (addr byte) = word->start</span> <span id="L891" class="LineNr"> 891 </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="L892" class="LineNr"> 892 </span> <span class="subxComment"># var max/esi : (addr byte) = word->end</span> +<span id="L892" class="LineNr"> 892 </span> <span class="subxComment"># var max/esi: (addr byte) = word->end</span> <span id="L893" class="LineNr"> 893 </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="L894" class="LineNr"> 894 </span><span class="Constant">$emit-string-literal-data:emit-length</span>: -<span id="L895" class="LineNr"> 895 </span> <span class="subxComment"># var len/eax : int = string-length-at-start-of-slice(word->start, word->end)</span> +<span id="L895" class="LineNr"> 895 </span> <span class="subxComment"># var len/eax: int = string-length-at-start-of-slice(word->start, word->end)</span> <span id="L896" class="LineNr"> 896 </span> <span class="subxS2Comment"># . . push args</span> <span id="L897" class="LineNr"> 897 </span> 56/push-esi <span id="L898" class="LineNr"> 898 </span> 52/push-edx @@ -926,7 +926,7 @@ if ('onhashchange' in window) { <span id="L920" class="LineNr"> 920 </span><span class="Constant">$emit-string-literal-data:loop-init</span>: <span id="L921" class="LineNr"> 921 </span> <span class="subxComment"># ++curr # skip initial '"'</span> <span id="L922" class="LineNr"> 922 </span> 42/increment-edx -<span id="L923" class="LineNr"> 923 </span> <span class="subxComment"># var c/ecx : byte = 0</span> +<span id="L923" class="LineNr"> 923 </span> <span class="subxComment"># var c/ecx: byte = 0</span> <span id="L924" class="LineNr"> 924 </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="L925" class="LineNr"> 925 </span><span class="Constant">$emit-string-literal-data:loop</span>: <span id="L926" class="LineNr"> 926 </span> <span class="subxComment"># if (curr >= max) break</span> @@ -961,7 +961,7 @@ if ('onhashchange' in window) { <span id="L955" class="LineNr"> 955 </span> <span class="subxS2Comment"># . . discard args</span> <span id="L956" class="LineNr"> 956 </span> 81 0/subop/add 3/mod/direct 4/rm32/esp <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> <span class="Normal"> . </span> 8/imm32 <span class="subxComment"># add to esp</span> <span id="L957" class="LineNr"> 957 </span> <span class="subxComment"># if (is-alphanumeric?(*curr)) print(out, "/#{*curr}")</span> -<span id="L958" class="LineNr"> 958 </span> <span class="subxS1Comment"># . var eax : boolean = is-alphanumeric?(CL)</span> +<span id="L958" class="LineNr"> 958 </span> <span class="subxS1Comment"># . var eax: boolean = is-alphanumeric?(CL)</span> <span id="L959" class="LineNr"> 959 </span> <span class="subxS2Comment"># . . push args</span> <span id="L960" class="LineNr"> 960 </span> 51/push-ecx <span id="L961" class="LineNr"> 961 </span> <span class="subxS2Comment"># . . call</span> @@ -1027,7 +1027,7 @@ if ('onhashchange' in window) { <span id="L1021" class="LineNr">1021 </span> 5d/pop-to-ebp <span id="L1022" class="LineNr">1022 </span> c3/return <span id="L1023" class="LineNr">1023 </span> -<span id="L1024" class="LineNr">1024 </span><span class="subxFunction">is-alphanumeric?</span>: <span class="subxComment"># c : int -> eax : boolean</span> +<span id="L1024" class="LineNr">1024 </span><span class="subxFunction">is-alphanumeric?</span>: <span class="subxComment"># c: int -> eax: boolean</span> <span id="L1025" class="LineNr">1025 </span> <span class="subxS1Comment"># . prologue</span> <span id="L1026" class="LineNr">1026 </span> 55/push-ebp <span id="L1027" class="LineNr">1027 </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> @@ -1260,9 +1260,9 @@ if ('onhashchange' in window) { <span id="L1379" class="LineNr">1379 </span> c3/return <span id="L1380" class="LineNr">1380 </span> <span id="L1381" class="LineNr">1381 </span><span class="subxComment"># emit everything from a word except the initial datum</span> -<span id="L1382" class="LineNr">1382 </span><span class="subxFunction">emit-metadata</span>: <span class="subxComment"># out : (addr buffered-file), word : (addr slice)</span> +<span id="L1382" class="LineNr">1382 </span><span class="subxFunction">emit-metadata</span>: <span class="subxComment"># out: (addr buffered-file), word: (addr slice)</span> <span id="L1383" class="LineNr">1383 </span> <span class="subxComment"># pseudocode</span> -<span id="L1384" class="LineNr">1384 </span> <span class="subxComment"># var slice : slice = {0, word->end}</span> +<span id="L1384" class="LineNr">1384 </span> <span class="subxComment"># var slice: slice = {0, word->end}</span> <span id="L1385" class="LineNr">1385 </span> <span class="subxComment"># curr = word->start</span> <span id="L1386" class="LineNr">1386 </span> <span class="subxComment"># if *curr == '"'</span> <span id="L1387" class="LineNr">1387 </span> <span class="subxComment"># curr = skip-string-in-slice(curr, word->end)</span> @@ -1287,11 +1287,11 @@ if ('onhashchange' in window) { <span id="L1406" class="LineNr">1406 </span> 56/push-esi <span id="L1407" class="LineNr">1407 </span> <span class="subxComment"># esi = word</span> <span id="L1408" class="LineNr">1408 </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="L1409" class="LineNr">1409 </span> <span class="subxComment"># var curr/ecx : (addr byte) = word->start</span> +<span id="L1409" class="LineNr">1409 </span> <span class="subxComment"># var curr/ecx: (addr byte) = word->start</span> <span id="L1410" class="LineNr">1410 </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="L1411" class="LineNr">1411 </span> <span class="subxComment"># var end/edx : (addr byte) = word->end</span> +<span id="L1411" class="LineNr">1411 </span> <span class="subxComment"># var end/edx: (addr byte) = word->end</span> <span id="L1412" class="LineNr">1412 </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="L1413" class="LineNr">1413 </span> <span class="subxComment"># var slice/ebx : slice = {0, end}</span> +<span id="L1413" class="LineNr">1413 </span> <span class="subxComment"># var slice/ebx: slice = {0, end}</span> <span id="L1414" class="LineNr">1414 </span> 52/push-edx <span id="L1415" class="LineNr">1415 </span> 68/push 0/imm32 <span id="L1416" class="LineNr">1416 </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> @@ -1634,7 +1634,7 @@ if ('onhashchange' in window) { <span id="L1778" class="LineNr">1778 </span> 5d/pop-to-ebp <span id="L1779" class="LineNr">1779 </span> c3/return <span id="L1780" class="LineNr">1780 </span> -<span id="L1781" class="LineNr">1781 </span><span class="subxFunction">string-length-at-start-of-slice</span>: <span class="subxComment"># curr : (addr byte), end : (addr byte) -> length/eax</span> +<span id="L1781" class="LineNr">1781 </span><span class="subxFunction">string-length-at-start-of-slice</span>: <span class="subxComment"># curr: (addr byte), end: (addr byte) -> length/eax</span> <span id="L1782" class="LineNr">1782 </span> <span class="subxS1Comment"># . prologue</span> <span id="L1783" class="LineNr">1783 </span> 55/push-ebp <span id="L1784" class="LineNr">1784 </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> @@ -1646,9 +1646,9 @@ if ('onhashchange' in window) { <span id="L1790" class="LineNr">1790 </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="L1791" class="LineNr">1791 </span> <span class="subxComment"># edx = end</span> <span id="L1792" class="LineNr">1792 </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="L1793" class="LineNr">1793 </span> <span class="subxComment"># var length/eax : int = 0</span> +<span id="L1793" class="LineNr">1793 </span> <span class="subxComment"># var length/eax: int = 0</span> <span id="L1794" class="LineNr">1794 </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="L1795" class="LineNr">1795 </span> <span class="subxComment"># var c/ebx : byte = 0</span> +<span id="L1795" class="LineNr">1795 </span> <span class="subxComment"># var c/ebx: byte = 0</span> <span id="L1796" class="LineNr">1796 </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="L1797" class="LineNr">1797 </span> <span class="subxComment"># skip initial dquote</span> <span id="L1798" class="LineNr">1798 </span> 41/increment-ecx |