diff options
Diffstat (limited to 'html/shell/infix.mu.html')
| -rw-r--r-- | html/shell/infix.mu.html | 30 |
1 files changed, 15 insertions, 15 deletions
diff --git a/html/shell/infix.mu.html b/html/shell/infix.mu.html index a38807a2..dc605e57 100644 --- a/html/shell/infix.mu.html +++ b/html/shell/infix.mu.html @@ -323,8 +323,8 @@ if ('onhashchange' in window) { <span id="L312" class="LineNr">312 </span> <span class="PreProc">var</span> buffer/<span class="muRegEdi">edi</span>: (addr <a href='../514gap-buffer.mu.html#L3'>gap-buffer</a>) <span class="Special"><-</span> address buffer-storage <span id="L313" class="LineNr">313 </span> <a href='../514gap-buffer.mu.html#L11'>initialize-gap-buffer</a> buffer, <span class="Constant">0x40</span>/max-symbol-size <span id="L314" class="LineNr">314 </span> <span class="muComment"># scan for first non-$</span> -<span id="L315" class="LineNr">315 </span> <span class="PreProc">var</span> g/eax: grapheme <span class="Special"><-</span> <a href='../403unicode.mu.html#L236'>read-grapheme</a> sym-data -<span id="L316" class="LineNr">316 </span> <a href='../514gap-buffer.mu.html#L440'>add-grapheme-at-gap</a> buffer, g +<span id="L315" class="LineNr">315 </span> <span class="PreProc">var</span> g/eax: code-point-utf8 <span class="Special"><-</span> <a href='../403unicode.mu.html#L229'>read-code-point-utf8</a> sym-data +<span id="L316" class="LineNr">316 </span> <a href='../514gap-buffer.mu.html#L440'>add-code-point-utf8-at-gap</a> buffer, g <span id="L317" class="LineNr">317 </span> <span class="Delimiter">{</span> <span id="L318" class="LineNr">318 </span> compare g, <span class="Constant">0x24</span>/dollar <span id="L319" class="LineNr">319 </span> <span class="PreProc">break-if-!=</span> @@ -334,28 +334,28 @@ if ('onhashchange' in window) { <span id="L323" class="LineNr">323 </span> <span class="PreProc">break-if-=</span> <span id="L324" class="LineNr">324 </span> <span class="PreProc">return</span> <span class="muComment"># symbol is all '$'s; do nothing</span> <span id="L325" class="LineNr">325 </span> <span class="Delimiter">}</span> -<span id="L326" class="LineNr">326 </span> g <span class="Special"><-</span> <a href='../403unicode.mu.html#L236'>read-grapheme</a> sym-data -<span id="L327" class="LineNr">327 </span> <a href='../514gap-buffer.mu.html#L440'>add-grapheme-at-gap</a> buffer, g +<span id="L326" class="LineNr">326 </span> g <span class="Special"><-</span> <a href='../403unicode.mu.html#L229'>read-code-point-utf8</a> sym-data +<span id="L327" class="LineNr">327 </span> <a href='../514gap-buffer.mu.html#L440'>add-code-point-utf8-at-gap</a> buffer, g <span id="L328" class="LineNr">328 </span> <span class="PreProc">loop</span> <span id="L329" class="LineNr">329 </span> <span class="Delimiter">}</span> <span id="L330" class="LineNr">330 </span> <span class="PreProc">var</span> tokenization-needed?: boolean -<span id="L331" class="LineNr">331 </span> <span class="PreProc">var</span> _operator-so-far?/eax: boolean <span class="Special"><-</span> <a href='infix.mu.html#L458'>operator-grapheme?</a> g +<span id="L331" class="LineNr">331 </span> <span class="PreProc">var</span> _operator-so-far?/eax: boolean <span class="Special"><-</span> <a href='infix.mu.html#L458'>operator-code-point-utf8?</a> g <span id="L332" class="LineNr">332 </span> <span class="PreProc">var</span> operator-so-far?/<span class="muRegEcx">ecx</span>: boolean <span class="Special"><-</span> copy _operator-so-far? <span id="L333" class="LineNr">333 </span> <span class="Delimiter">{</span> <span id="L334" class="LineNr">334 </span> <span class="PreProc">var</span> done?/eax: boolean <span class="Special"><-</span> <a href='../309stream.subx.html#L6'>stream-empty?</a> sym-data <span id="L335" class="LineNr">335 </span> compare done?, <span class="Constant">0</span>/false <span id="L336" class="LineNr">336 </span> <span class="PreProc">break-if-!=</span> -<span id="L337" class="LineNr">337 </span> <span class="PreProc">var</span> g/eax: grapheme <span class="Special"><-</span> <a href='../403unicode.mu.html#L236'>read-grapheme</a> sym-data +<span id="L337" class="LineNr">337 </span> <span class="PreProc">var</span> g/eax: code-point-utf8 <span class="Special"><-</span> <a href='../403unicode.mu.html#L229'>read-code-point-utf8</a> sym-data <span id="L338" class="LineNr">338 </span> <span class="Delimiter">{</span> -<span id="L339" class="LineNr">339 </span> <span class="PreProc">var</span> curr-operator?/eax: boolean <span class="Special"><-</span> <a href='infix.mu.html#L458'>operator-grapheme?</a> g +<span id="L339" class="LineNr">339 </span> <span class="PreProc">var</span> curr-operator?/eax: boolean <span class="Special"><-</span> <a href='infix.mu.html#L458'>operator-code-point-utf8?</a> g <span id="L340" class="LineNr">340 </span> compare curr-operator?, operator-so-far? <span id="L341" class="LineNr">341 </span> <span class="PreProc">break-if-=</span> <span id="L342" class="LineNr">342 </span> <span class="muComment"># state change; insert a space</span> -<span id="L343" class="LineNr">343 </span> <a href='../514gap-buffer.mu.html#L440'>add-grapheme-at-gap</a> buffer, <span class="Constant">0x20</span>/space +<span id="L343" class="LineNr">343 </span> <a href='../514gap-buffer.mu.html#L440'>add-code-point-utf8-at-gap</a> buffer, <span class="Constant">0x20</span>/space <span id="L344" class="LineNr">344 </span> operator-so-far? <span class="Special"><-</span> copy curr-operator? <span id="L345" class="LineNr">345 </span> copy-to tokenization-needed?, <span class="Constant">1</span>/true <span id="L346" class="LineNr">346 </span> <span class="Delimiter">}</span> -<span id="L347" class="LineNr">347 </span> <a href='../514gap-buffer.mu.html#L440'>add-grapheme-at-gap</a> buffer, g +<span id="L347" class="LineNr">347 </span> <a href='../514gap-buffer.mu.html#L440'>add-code-point-utf8-at-gap</a> buffer, g <span id="L348" class="LineNr">348 </span> <span class="PreProc">loop</span> <span id="L349" class="LineNr">349 </span> <span class="Delimiter">}</span> <span id="L350" class="LineNr">350 </span> compare tokenization-needed?, <span class="Constant">0</span>/false @@ -417,7 +417,7 @@ if ('onhashchange' in window) { <span id="L406" class="LineNr">406 </span> <span id="L407" class="LineNr">407 </span><span class="muComment"># helpers</span> <span id="L408" class="LineNr">408 </span> -<span id="L409" class="LineNr">409 </span><span class="muComment"># return true if x is composed entirely of operator graphemes, optionally prefixed with some '$'s</span> +<span id="L409" class="LineNr">409 </span><span class="muComment"># return true if x is composed entirely of operator code-point-utf8s, optionally prefixed with some '$'s</span> <span id="L410" class="LineNr">410 </span><span class="muComment"># some operator, some non-operator => pre-tokenized symbol; return false</span> <span id="L411" class="LineNr">411 </span><span class="muComment"># all '$'s => return false</span> <span id="L412" class="LineNr">412 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='infix.mu.html#L412'>operator-symbol?</a></span> _x: (addr <a href='cell.mu.html#L1'>cell</a>)<span class="PreProc"> -> </span>_/eax: boolean <span class="Delimiter">{</span> @@ -432,7 +432,7 @@ if ('onhashchange' in window) { <span id="L421" class="LineNr">421 </span> <span class="PreProc">var</span> _x-data/eax: (addr stream byte) <span class="Special"><-</span> <a href='../120allocate.subx.html#L235'>lookup</a> *x-data-ah <span id="L422" class="LineNr">422 </span> <span class="PreProc">var</span> x-data/<span class="muRegEsi">esi</span>: (addr stream byte) <span class="Special"><-</span> copy _x-data <span id="L423" class="LineNr">423 </span> <a href='../106stream.subx.html#L59'>rewind-stream</a> x-data -<span id="L424" class="LineNr">424 </span> <span class="PreProc">var</span> g/eax: grapheme <span class="Special"><-</span> <a href='../403unicode.mu.html#L236'>read-grapheme</a> x-data +<span id="L424" class="LineNr">424 </span> <span class="PreProc">var</span> g/eax: code-point-utf8 <span class="Special"><-</span> <a href='../403unicode.mu.html#L229'>read-code-point-utf8</a> x-data <span id="L425" class="LineNr">425 </span> <span class="muComment"># special case: '$' is reserved for gensyms, and can work with either</span> <span id="L426" class="LineNr">426 </span> <span class="muComment"># operator or non-operator symbols.</span> <span id="L427" class="LineNr">427 </span> <span class="Delimiter">{</span> @@ -445,12 +445,12 @@ if ('onhashchange' in window) { <span id="L434" class="LineNr">434 </span> <span class="muComment"># '$', '$$', '$$$', etc. are regular symbols</span> <span id="L435" class="LineNr">435 </span> <span class="PreProc">return</span> <span class="Constant">0</span>/false <span id="L436" class="LineNr">436 </span> <span class="Delimiter">}</span> -<span id="L437" class="LineNr">437 </span> g <span class="Special"><-</span> <a href='../403unicode.mu.html#L236'>read-grapheme</a> x-data +<span id="L437" class="LineNr">437 </span> g <span class="Special"><-</span> <a href='../403unicode.mu.html#L229'>read-code-point-utf8</a> x-data <span id="L438" class="LineNr">438 </span> <span class="PreProc">loop</span> <span id="L439" class="LineNr">439 </span> <span class="Delimiter">}</span> <span id="L440" class="LineNr">440 </span> <span class="Delimiter">{</span> <span id="L441" class="LineNr">441 </span> <span class="Delimiter">{</span> -<span id="L442" class="LineNr">442 </span> <span class="PreProc">var</span> result/eax: boolean <span class="Special"><-</span> <a href='infix.mu.html#L458'>operator-grapheme?</a> g +<span id="L442" class="LineNr">442 </span> <span class="PreProc">var</span> result/eax: boolean <span class="Special"><-</span> <a href='infix.mu.html#L458'>operator-code-point-utf8?</a> g <span id="L443" class="LineNr">443 </span> compare result, <span class="Constant">0</span>/false <span id="L444" class="LineNr">444 </span> <span class="PreProc">break-if-!=</span> <span id="L445" class="LineNr">445 </span> <span class="PreProc">return</span> <span class="Constant">0</span>/false @@ -460,13 +460,13 @@ if ('onhashchange' in window) { <span id="L449" class="LineNr">449 </span> compare done?, <span class="Constant">0</span>/false <span id="L450" class="LineNr">450 </span> <span class="Delimiter">}</span> <span id="L451" class="LineNr">451 </span> <span class="PreProc">break-if-!=</span> -<span id="L452" class="LineNr">452 </span> g <span class="Special"><-</span> <a href='../403unicode.mu.html#L236'>read-grapheme</a> x-data +<span id="L452" class="LineNr">452 </span> g <span class="Special"><-</span> <a href='../403unicode.mu.html#L229'>read-code-point-utf8</a> x-data <span id="L453" class="LineNr">453 </span> <span class="PreProc">loop</span> <span id="L454" class="LineNr">454 </span> <span class="Delimiter">}</span> <span id="L455" class="LineNr">455 </span> <span class="PreProc">return</span> <span class="Constant">1</span>/true <span id="L456" class="LineNr">456 </span><span class="Delimiter">}</span> <span id="L457" class="LineNr">457 </span> -<span id="L458" class="LineNr">458 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='infix.mu.html#L458'>operator-grapheme?</a></span> g: grapheme<span class="PreProc"> -> </span>_/eax: boolean <span class="Delimiter">{</span> +<span id="L458" class="LineNr">458 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='infix.mu.html#L458'>operator-code-point-utf8?</a></span> g: code-point-utf8<span class="PreProc"> -> </span>_/eax: boolean <span class="Delimiter">{</span> <span id="L459" class="LineNr">459 </span> <span class="muComment"># '$' is special and can be in either a symbol or operator; here we treat it as a symbol</span> <span id="L460" class="LineNr">460 </span> compare g, <span class="Constant">0x25</span>/percent <span id="L461" class="LineNr">461 </span> <span class="Delimiter">{</span> |