about summary refs log tree commit diff stats
path: root/src/linit.c
blob: 5ca99760d49386a60eefdf8536815b8675e9ed4b (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
/*
** $Id: linit.c,v 1.14.1.1 2007/12/27 13:02:25 roberto Exp $
** Initialization of libraries for lua.c
** See Copyright Notice in lua.h
*/


#define linit_c
#define LUA_LIB

#include "lua.h"

#include "lualib.h"
#include "lauxlib.h"


static const luaL_Reg lualibs[] = {
  {"", luaopen_base},
  {LUA_TABLIBNAME, luaopen_table},
  {LUA_IOLIBNAME, luaopen_io},
  {LUA_OSLIBNAME, luaopen_os},
  {LUA_STRLIBNAME, luaopen_string},
  {LUA_MATHLIBNAME, luaopen_math},
  {LUA_CURSESLIBNAME, luaopen_curses},
  {LUA_SOCKETCORELIBNAME, luaopen_socket_core},
  {LUA_MIMECORELIBNAME, luaopen_mime_core},
  {LUA_SSLLIBNAME, luaopen_ssl_core},
  {LUA_SSLCONTEXTLIBNAME, luaopen_ssl_context},
  {LUA_SSLX509LIBNAME, luaopen_ssl_x509},
  {LUA_SSLCONFIGLIBNAME, luaopen_ssl_config},
  {NULL, NULL}
};


LUALIB_API void luaL_openlibs (lua_State *L) {
  const luaL_Reg *lib = lualibs;
  for (; lib->func; lib++) {
    lua_pushcfunction(L, lib->func);
    lua_pushstring(L, lib->name);
    lua_call(L, 1, 0);
  }
}
>365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624
<!DOCTYPE html>
<html>
<head>
<meta charset="UTF-8">
<title>Mu - shell/grapheme-stack.mu</title>
<meta name="Generator" content="Vim/8.2">
<meta name="plugin-version" content="vim8.1_v2">
<meta name="syntax" content="none">
<meta name="settings" content="number_lines,use_css,pre_wrap,no_foldcolumn,expand_tabs,line_ids,prevent_copy=,use_input_for_pc=fallback">
<meta name="colorscheme" content="minimal-light">
<style>
<!--
pre { white-space: pre-wrap; font-family: monospace; color: #000000; background-color: #ffffd7; }
body { font-size:12pt; font-family: monospace; color: #000000; background-color: #ffffd7; }
a { color:inherit; }
* { font-size:12pt; font-size: 1em; }
.PreProc { color: #c000c0; }
.muRegEbx { color: #5f00ff; }
.muRegEcx { color: #870000; }
.muRegEdx { color: #af5f00; }
.LineNr { }
.muRegEsi { color: #005faf; }
.muRegEdi { color: #00af00; }
.Constant { color: #008787; }
.muFunction { color: #af5f00; text-decoration: underline; }
.muTest { color: #5f8700; }
.Delimiter { color: #c000c0; }
.muComment { color: #005faf; }
.Special { color: #ff6060; }
-->
</style>

<script>
<!--

/* function to open any folds containing a jumped-to line before jumping to it */
function JumpToLine()
{
  var lineNum;
  lineNum = window.location.hash;
  lineNum = lineNum.substr(1); /* strip off '#' */

  if (lineNum.indexOf('L') == -1) {
    lineNum = 'L'+lineNum;
  }
  var lineElem = document.getElementById(lineNum);
  /* Always jump to new location even if the line was hidden inside a fold, or
   * we corrected the raw number to a line ID.
   */
  if (lineElem) {
    lineElem.scrollIntoView(true);
  }
  return true;
}
if ('onhashchange' in window) {
  window.onhashchange = JumpToLine;
}

-->
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/main/shell/grapheme-stack.mu'>https://github.com/akkartik/mu/blob/main/shell/grapheme-stack.mu</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr">  1 </span><span class="muComment"># grapheme stacks are the smallest unit of editable text</span>
<span id="L2" class="LineNr">  2 </span>
<span id="L3" class="LineNr">  3 </span><span class="PreProc">type</span> <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a> <span class="Delimiter">{</span>
<span id="L4" class="LineNr">  4 </span>  data: (handle array grapheme)
<span id="L5" class="LineNr">  5 </span>  top: int
<span id="L6" class="LineNr">  6 </span><span class="Delimiter">}</span>
<span id="L7" class="LineNr">  7 </span>
<span id="L8" class="LineNr">  8 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L8'>initialize-grapheme-stack</a></span> _self: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>), n: int <span class="Delimiter">{</span>
<span id="L9" class="LineNr">  9 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> copy _self
<span id="L10" class="LineNr"> 10 </span>  <span class="PreProc">var</span> d/<span class="muRegEdi">edi</span>: (addr handle array grapheme) <span class="Special">&lt;-</span> get self, data
<span id="L11" class="LineNr"> 11 </span>  populate d, n
<span id="L12" class="LineNr"> 12 </span>  <span class="PreProc">var</span> top/eax: (addr int) <span class="Special">&lt;-</span> get self, top
<span id="L13" class="LineNr"> 13 </span>  copy-to *top, <span class="Constant">0</span>
<span id="L14" class="LineNr"> 14 </span><span class="Delimiter">}</span>
<span id="L15" class="LineNr"> 15 </span>
<span id="L16" class="LineNr"> 16 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L16'>clear-grapheme-stack</a></span> _self: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Delimiter">{</span>
<span id="L17" class="LineNr"> 17 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> copy _self
<span id="L18" class="LineNr"> 18 </span>  <span class="PreProc">var</span> top/eax: (addr int) <span class="Special">&lt;-</span> get self, top
<span id="L19" class="LineNr"> 19 </span>  copy-to *top, <span class="Constant">0</span>
<span id="L20" class="LineNr"> 20 </span><span class="Delimiter">}</span>
<span id="L21" class="LineNr"> 21 </span>
<span id="L22" class="LineNr"> 22 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L22'>grapheme-stack-empty?</a></span> _self: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>)<span class="PreProc"> -&gt; </span>_/eax: boolean <span class="Delimiter">{</span>
<span id="L23" class="LineNr"> 23 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> copy _self
<span id="L24" class="LineNr"> 24 </span>  <span class="PreProc">var</span> top/eax: (addr int) <span class="Special">&lt;-</span> get self, top
<span id="L25" class="LineNr"> 25 </span>  compare *top, <span class="Constant">0</span>
<span id="L26" class="LineNr"> 26 </span>  <span class="Delimiter">{</span>
<span id="L27" class="LineNr"> 27 </span>    <span class="PreProc">break-if-!=</span>
<span id="L28" class="LineNr"> 28 </span>    <span class="PreProc">return</span> <span class="Constant">1</span>/true
<span id="L29" class="LineNr"> 29 </span>  <span class="Delimiter">}</span>
<span id="L30" class="LineNr"> 30 </span>  <span class="PreProc">return</span> <span class="Constant">0</span>/false
<span id="L31" class="LineNr"> 31 </span><span class="Delimiter">}</span>
<span id="L32" class="LineNr"> 32 </span>
<span id="L33" class="LineNr"> 33 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L33'>grapheme-stack-length</a></span> _self: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>)<span class="PreProc"> -&gt; </span>_/eax: int <span class="Delimiter">{</span>
<span id="L34" class="LineNr"> 34 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> copy _self
<span id="L35" class="LineNr"> 35 </span>  <span class="PreProc">var</span> top/eax: (addr int) <span class="Special">&lt;-</span> get self, top
<span id="L36" class="LineNr"> 36 </span>  <span class="PreProc">return</span> *top
<span id="L37" class="LineNr"> 37 </span><span class="Delimiter">}</span>
<span id="L38" class="LineNr"> 38 </span>
<span id="L39" class="LineNr"> 39 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a></span> _self: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>), _val: grapheme <span class="Delimiter">{</span>
<span id="L40" class="LineNr"> 40 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> copy _self
<span id="L41" class="LineNr"> 41 </span>  <span class="PreProc">var</span> top-addr/<span class="muRegEcx">ecx</span>: (addr int) <span class="Special">&lt;-</span> get self, top
<span id="L42" class="LineNr"> 42 </span>  <span class="PreProc">var</span> data-ah/<span class="muRegEdx">edx</span>: (addr handle array grapheme) <span class="Special">&lt;-</span> get self, data
<span id="L43" class="LineNr"> 43 </span>  <span class="PreProc">var</span> data/eax: (addr array grapheme) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *data-ah
<span id="L44" class="LineNr"> 44 </span>  <span class="PreProc">var</span> top/<span class="muRegEdx">edx</span>: int <span class="Special">&lt;-</span> copy *top-addr
<span id="L45" class="LineNr"> 45 </span>  <span class="PreProc">var</span> dest-addr/<span class="muRegEdx">edx</span>: (addr grapheme) <span class="Special">&lt;-</span> index data, top
<span id="L46" class="LineNr"> 46 </span>  <span class="PreProc">var</span> val/eax: grapheme <span class="Special">&lt;-</span> copy _val
<span id="L47" class="LineNr"> 47 </span>  copy-to *dest-addr, val
<span id="L48" class="LineNr"> 48 </span>  add-to *top-addr, <span class="Constant">1</span>
<span id="L49" class="LineNr"> 49 </span><span class="Delimiter">}</span>
<span id="L50" class="LineNr"> 50 </span>
<span id="L51" class="LineNr"> 51 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L51'>pop-grapheme-stack</a></span> _self: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>)<span class="PreProc"> -&gt; </span>_/eax: grapheme <span class="Delimiter">{</span>
<span id="L52" class="LineNr"> 52 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> copy _self
<span id="L53" class="LineNr"> 53 </span>  <span class="PreProc">var</span> top-addr/<span class="muRegEcx">ecx</span>: (addr int) <span class="Special">&lt;-</span> get self, top
<span id="L54" class="LineNr"> 54 </span>  <span class="Delimiter">{</span>
<span id="L55" class="LineNr"> 55 </span>    compare *top-addr, <span class="Constant">0</span>
<span id="L56" class="LineNr"> 56 </span>    <span class="PreProc">break-if-&gt;</span>
<span id="L57" class="LineNr"> 57 </span>    <span class="PreProc">return</span> <span class="Constant">-1</span>
<span id="L58" class="LineNr"> 58 </span>  <span class="Delimiter">}</span>
<span id="L59" class="LineNr"> 59 </span>  subtract-from *top-addr, <span class="Constant">1</span>
<span id="L60" class="LineNr"> 60 </span>  <span class="PreProc">var</span> data-ah/<span class="muRegEdx">edx</span>: (addr handle array grapheme) <span class="Special">&lt;-</span> get self, data
<span id="L61" class="LineNr"> 61 </span>  <span class="PreProc">var</span> data/eax: (addr array grapheme) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *data-ah
<span id="L62" class="LineNr"> 62 </span>  <span class="PreProc">var</span> top/<span class="muRegEdx">edx</span>: int <span class="Special">&lt;-</span> copy *top-addr
<span id="L63" class="LineNr"> 63 </span>  <span class="PreProc">var</span> result-addr/eax: (addr grapheme) <span class="Special">&lt;-</span> index data, top
<span id="L64" class="LineNr"> 64 </span>  <span class="PreProc">return</span> *result-addr
<span id="L65" class="LineNr"> 65 </span><span class="Delimiter">}</span>
<span id="L66" class="LineNr"> 66 </span>
<span id="L67" class="LineNr"> 67 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L67'>copy-grapheme-stack</a></span> _src: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>), dest: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Delimiter">{</span>
<span id="L68" class="LineNr"> 68 </span>  <span class="PreProc">var</span> src/<span class="muRegEsi">esi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> copy _src
<span id="L69" class="LineNr"> 69 </span>  <span class="PreProc">var</span> data-ah/<span class="muRegEdi">edi</span>: (addr handle array grapheme) <span class="Special">&lt;-</span> get src, data
<span id="L70" class="LineNr"> 70 </span>  <span class="PreProc">var</span> _data/eax: (addr array grapheme) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *data-ah
<span id="L71" class="LineNr"> 71 </span>  <span class="PreProc">var</span> data/<span class="muRegEdi">edi</span>: (addr array grapheme) <span class="Special">&lt;-</span> copy _data
<span id="L72" class="LineNr"> 72 </span>  <span class="PreProc">var</span> top-addr/<span class="muRegEcx">ecx</span>: (addr int) <span class="Special">&lt;-</span> get src, top
<span id="L73" class="LineNr"> 73 </span>  <span class="PreProc">var</span> i/eax: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
<span id="L74" class="LineNr"> 74 </span>  <span class="Delimiter">{</span>
<span id="L75" class="LineNr"> 75 </span>    compare i, *top-addr
<span id="L76" class="LineNr"> 76 </span>    <span class="PreProc">break-if-&gt;=</span>
<span id="L77" class="LineNr"> 77 </span>    <span class="PreProc">var</span> g/<span class="muRegEdx">edx</span>: (addr grapheme) <span class="Special">&lt;-</span> index data, i
<span id="L78" class="LineNr"> 78 </span>    <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> dest, *g
<span id="L79" class="LineNr"> 79 </span>    i <span class="Special">&lt;-</span> increment
<span id="L80" class="LineNr"> 80 </span>    <span class="PreProc">loop</span>
<span id="L81" class="LineNr"> 81 </span>  <span class="Delimiter">}</span>
<span id="L82" class="LineNr"> 82 </span><span class="Delimiter">}</span>
<span id="L83" class="LineNr"> 83 </span>
<span id="L84" class="LineNr"> 84 </span><span class="muComment"># dump stack to screen from bottom to top</span>
<span id="L85" class="LineNr"> 85 </span><span class="muComment"># hardcoded colors:</span>
<span id="L86" class="LineNr"> 86 </span><span class="muComment">#   matching paren</span>
<span id="L87" class="LineNr"> 87 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L87'>render-stack-from-bottom-wrapping-right-then-down</a></span> <a href='../500fake-screen.mu.html#L14'>screen</a>: (addr <a href='../500fake-screen.mu.html#L14'>screen</a>), _self: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>), xmin: int, ymin: int, xmax: int, ymax: int, _x: int, _y: int, <a href='gap-buffer.mu.html#L943'>highlight-matching-open-paren?</a>: boolean, open-paren-depth: int, color: int, background-color: int<span class="PreProc"> -&gt; </span>_/eax: int, _/<span class="muRegEcx">ecx</span>: int <span class="Delimiter">{</span>
<span id="L88" class="LineNr"> 88 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> copy _self
<span id="L89" class="LineNr"> 89 </span>  <span class="PreProc">var</span> matching-open-paren-index/<span class="muRegEdx">edx</span>: int <span class="Special">&lt;-</span> <a href='grapheme-stack.mu.html#L434'>get-matching-open-paren-index</a> self, <a href='gap-buffer.mu.html#L943'>highlight-matching-open-paren?</a>, open-paren-depth
<span id="L90" class="LineNr"> 90 </span>  <span class="PreProc">var</span> data-ah/<span class="muRegEdi">edi</span>: (addr handle array grapheme) <span class="Special">&lt;-</span> get self, data
<span id="L91" class="LineNr"> 91 </span>  <span class="PreProc">var</span> _data/eax: (addr array grapheme) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *data-ah
<span id="L92" class="LineNr"> 92 </span>  <span class="PreProc">var</span> data/<span class="muRegEdi">edi</span>: (addr array grapheme) <span class="Special">&lt;-</span> copy _data
<span id="L93" class="LineNr"> 93 </span>  <span class="PreProc">var</span> x/eax: int <span class="Special">&lt;-</span> copy _x
<span id="L94" class="LineNr"> 94 </span>  <span class="PreProc">var</span> y/<span class="muRegEcx">ecx</span>: int <span class="Special">&lt;-</span> copy _y
<span id="L95" class="LineNr"> 95 </span>  <span class="PreProc">var</span> top-addr/<span class="muRegEsi">esi</span>: (addr int) <span class="Special">&lt;-</span> get self, top
<span id="L96" class="LineNr"> 96 </span>  <span class="PreProc">var</span> i/<span class="muRegEbx">ebx</span>: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
<span id="L97" class="LineNr"> 97 </span>  <span class="Delimiter">{</span>
<span id="L98" class="LineNr"> 98 </span>    compare i, *top-addr
<span id="L99" class="LineNr"> 99 </span>    <span class="PreProc">break-if-&gt;=</span>
<span id="L100" class="LineNr">100 </span>    <span class="Delimiter">{</span>
<span id="L101" class="LineNr">101 </span>      <span class="PreProc">var</span> g/<span class="muRegEsi">esi</span>: (addr grapheme) <span class="Special">&lt;-</span> index data, i
<span id="L102" class="LineNr">102 </span>      <span class="PreProc">var</span> fg: int
<span id="L103" class="LineNr">103 </span>      <span class="Delimiter">{</span>
<span id="L104" class="LineNr">104 </span>        <span class="PreProc">var</span> tmp/eax: int <span class="Special">&lt;-</span> copy color
<span id="L105" class="LineNr">105 </span>        copy-to fg, tmp
<span id="L106" class="LineNr">106 </span>      <span class="Delimiter">}</span>
<span id="L107" class="LineNr">107 </span>      <span class="Delimiter">{</span>
<span id="L108" class="LineNr">108 </span>        compare i, matching-open-paren-index
<span id="L109" class="LineNr">109 </span>        <span class="PreProc">break-if-!=</span>
<span id="L110" class="LineNr">110 </span>        copy-to fg, <span class="Constant">0xf</span>/highlight
<span id="L111" class="LineNr">111 </span>      <span class="Delimiter">}</span>
<span id="L112" class="LineNr">112 </span>      x, y <span class="Special">&lt;-</span> <a href='../501draw-text.mu.html#L148'>render-grapheme</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, *g, xmin, ymin, xmax, ymax, x, y, fg, background-color
<span id="L113" class="LineNr">113 </span>    <span class="Delimiter">}</span>
<span id="L114" class="LineNr">114 </span>    i <span class="Special">&lt;-</span> increment
<span id="L115" class="LineNr">115 </span>    <span class="PreProc">loop</span>
<span id="L116" class="LineNr">116 </span>  <span class="Delimiter">}</span>
<span id="L117" class="LineNr">117 </span>  <span class="PreProc">return</span> x, y
<span id="L118" class="LineNr">118 </span><span class="Delimiter">}</span>
<span id="L119" class="LineNr">119 </span>
<span id="L120" class="LineNr">120 </span><span class="muComment"># helper for small words</span>
<span id="L121" class="LineNr">121 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L121'>render-stack-from-bottom</a></span> <a href='../500fake-screen.mu.html#L14'>screen</a>: (addr <a href='../500fake-screen.mu.html#L14'>screen</a>), self: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>), x: int, y: int, <a href='gap-buffer.mu.html#L943'>highlight-matching-open-paren?</a>: boolean, open-paren-depth: int<span class="PreProc"> -&gt; </span>_/eax: int <span class="Delimiter">{</span>
<span id="L122" class="LineNr">122 </span>  <span class="PreProc">var</span> _width/eax: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
<span id="L123" class="LineNr">123 </span>  <span class="PreProc">var</span> _height/<span class="muRegEcx">ecx</span>: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
<span id="L124" class="LineNr">124 </span>  _width, _height <span class="Special">&lt;-</span> <a href='../500fake-screen.mu.html#L86'>screen-size</a> <a href='../500fake-screen.mu.html#L14'>screen</a>
<span id="L125" class="LineNr">125 </span>  <span class="PreProc">var</span> width/<span class="muRegEdx">edx</span>: int <span class="Special">&lt;-</span> copy _width
<span id="L126" class="LineNr">126 </span>  <span class="PreProc">var</span> height/<span class="muRegEbx">ebx</span>: int <span class="Special">&lt;-</span> copy _height
<span id="L127" class="LineNr">127 </span>  <span class="PreProc">var</span> x2/eax: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
<span id="L128" class="LineNr">128 </span>  <span class="PreProc">var</span> y2/<span class="muRegEcx">ecx</span>: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
<span id="L129" class="LineNr">129 </span>  x2, y2 <span class="Special">&lt;-</span> <a href='grapheme-stack.mu.html#L87'>render-stack-from-bottom-wrapping-right-then-down</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, self, x, y, width, height, x, y, <a href='gap-buffer.mu.html#L943'>highlight-matching-open-paren?</a>, open-paren-depth, <span class="Constant">3</span>/fg=cyan, <span class="Constant">0xc5</span>/bg=blue-bg
<span id="L130" class="LineNr">130 </span>  <span class="PreProc">return</span> x2  <span class="muComment"># y2? yolo</span>
<span id="L131" class="LineNr">131 </span><span class="Delimiter">}</span>
<span id="L132" class="LineNr">132 </span>
<span id="L133" class="LineNr">133 </span><span class="muComment"># dump stack to screen from top to bottom</span>
<span id="L134" class="LineNr">134 </span><span class="muComment"># optionally render a 'cursor' with the top grapheme</span>
<span id="L135" class="LineNr">135 </span><span class="muComment"># hard-coded colors:</span>
<span id="L136" class="LineNr">136 </span><span class="muComment">#   matching paren</span>
<span id="L137" class="LineNr">137 </span><span class="muComment">#   cursor</span>
<span id="L138" class="LineNr">138 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L138'>render-stack-from-top-wrapping-right-then-down</a></span> <a href='../500fake-screen.mu.html#L14'>screen</a>: (addr <a href='../500fake-screen.mu.html#L14'>screen</a>), _self: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>), xmin: int, ymin: int, xmax: int, ymax: int, _x: int, _y: int, render-cursor?: boolean, color: int, background-color: int<span class="PreProc"> -&gt; </span>_/eax: int, _/<span class="muRegEcx">ecx</span>: int <span class="Delimiter">{</span>
<span id="L139" class="LineNr">139 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> copy _self
<span id="L140" class="LineNr">140 </span>  <span class="PreProc">var</span> matching-close-paren-index/<span class="muRegEdx">edx</span>: int <span class="Special">&lt;-</span> <a href='grapheme-stack.mu.html#L378'>get-matching-close-paren-index</a> self, render-cursor?
<span id="L141" class="LineNr">141 </span>  <span class="PreProc">var</span> data-ah/eax: (addr handle array grapheme) <span class="Special">&lt;-</span> get self, data
<span id="L142" class="LineNr">142 </span>  <span class="PreProc">var</span> _data/eax: (addr array grapheme) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *data-ah
<span id="L143" class="LineNr">143 </span>  <span class="PreProc">var</span> data/<span class="muRegEdi">edi</span>: (addr array grapheme) <span class="Special">&lt;-</span> copy _data
<span id="L144" class="LineNr">144 </span>  <span class="PreProc">var</span> x/eax: int <span class="Special">&lt;-</span> copy _x
<span id="L145" class="LineNr">145 </span>  <span class="PreProc">var</span> y/<span class="muRegEcx">ecx</span>: int <span class="Special">&lt;-</span> copy _y
<span id="L146" class="LineNr">146 </span>  <span class="PreProc">var</span> top-addr/<span class="muRegEbx">ebx</span>: (addr int) <span class="Special">&lt;-</span> get self, top
<span id="L147" class="LineNr">147 </span>  <span class="PreProc">var</span> i/<span class="muRegEbx">ebx</span>: int <span class="Special">&lt;-</span> copy *top-addr
<span id="L148" class="LineNr">148 </span>  i <span class="Special">&lt;-</span> decrement
<span id="L149" class="LineNr">149 </span>  <span class="muComment"># if render-cursor?, peel off first iteration</span>
<span id="L150" class="LineNr">150 </span>  <span class="Delimiter">{</span>
<span id="L151" class="LineNr">151 </span>    compare render-cursor?, <span class="Constant">0</span>/false
<span id="L152" class="LineNr">152 </span>    <span class="PreProc">break-if-=</span>
<span id="L153" class="LineNr">153 </span>    compare i, <span class="Constant">0</span>
<span id="L154" class="LineNr">154 </span>    <span class="PreProc">break-if-&lt;</span>
<span id="L155" class="LineNr">155 </span>    <span class="PreProc">var</span> g/<span class="muRegEsi">esi</span>: (addr grapheme) <span class="Special">&lt;-</span> index data, i
<span id="L156" class="LineNr">156 </span>    x, y <span class="Special">&lt;-</span> <a href='../501draw-text.mu.html#L148'>render-grapheme</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, *g, xmin, ymin, xmax, ymax, x, y, background-color, color
<span id="L157" class="LineNr">157 </span>    i <span class="Special">&lt;-</span> decrement
<span id="L158" class="LineNr">158 </span>  <span class="Delimiter">}</span>
<span id="L159" class="LineNr">159 </span>  <span class="muComment"># remaining iterations</span>
<span id="L160" class="LineNr">160 </span>  <span class="Delimiter">{</span>
<span id="L161" class="LineNr">161 </span>    compare i, <span class="Constant">0</span>
<span id="L162" class="LineNr">162 </span>    <span class="PreProc">break-if-&lt;</span>
<span id="L163" class="LineNr">163 </span>    <span class="muComment"># highlight matching paren if needed</span>
<span id="L164" class="LineNr">164 </span>    <span class="PreProc">var</span> fg: int
<span id="L165" class="LineNr">165 </span>    <span class="Delimiter">{</span>
<span id="L166" class="LineNr">166 </span>      <span class="PreProc">var</span> tmp/eax: int <span class="Special">&lt;-</span> copy color
<span id="L167" class="LineNr">167 </span>      copy-to fg, tmp
<span id="L168" class="LineNr">168 </span>    <span class="Delimiter">}</span>
<span id="L169" class="LineNr">169 </span>    compare i, matching-close-paren-index
<span id="L170" class="LineNr">170 </span>    <span class="Delimiter">{</span>
<span id="L171" class="LineNr">171 </span>      <span class="PreProc">break-if-!=</span>
<span id="L172" class="LineNr">172 </span>      copy-to fg, <span class="Constant">0xf</span>/highlight
<span id="L173" class="LineNr">173 </span>    <span class="Delimiter">}</span>
<span id="L174" class="LineNr">174 </span>    <span class="muComment">#</span>
<span id="L175" class="LineNr">175 </span>    <span class="PreProc">var</span> g/<span class="muRegEsi">esi</span>: (addr grapheme) <span class="Special">&lt;-</span> index data, i
<span id="L176" class="LineNr">176 </span>    x, y <span class="Special">&lt;-</span> <a href='../501draw-text.mu.html#L148'>render-grapheme</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, *g, xmin, ymin, xmax, ymax, x, y, fg, background-color
<span id="L177" class="LineNr">177 </span>    i <span class="Special">&lt;-</span> decrement
<span id="L178" class="LineNr">178 </span>    <span class="PreProc">loop</span>
<span id="L179" class="LineNr">179 </span>  <span class="Delimiter">}</span>
<span id="L180" class="LineNr">180 </span>  <span class="PreProc">return</span> x, y
<span id="L181" class="LineNr">181 </span><span class="Delimiter">}</span>
<span id="L182" class="LineNr">182 </span>
<span id="L183" class="LineNr">183 </span><span class="muComment"># helper for small words</span>
<span id="L184" class="LineNr">184 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L184'>render-stack-from-top</a></span> <a href='../500fake-screen.mu.html#L14'>screen</a>: (addr <a href='../500fake-screen.mu.html#L14'>screen</a>), self: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>), x: int, y: int, render-cursor?: boolean<span class="PreProc"> -&gt; </span>_/eax: int <span class="Delimiter">{</span>
<span id="L185" class="LineNr">185 </span>  <span class="PreProc">var</span> _width/eax: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
<span id="L186" class="LineNr">186 </span>  <span class="PreProc">var</span> _height/<span class="muRegEcx">ecx</span>: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
<span id="L187" class="LineNr">187 </span>  _width, _height <span class="Special">&lt;-</span> <a href='../500fake-screen.mu.html#L86'>screen-size</a> <a href='../500fake-screen.mu.html#L14'>screen</a>
<span id="L188" class="LineNr">188 </span>  <span class="PreProc">var</span> width/<span class="muRegEdx">edx</span>: int <span class="Special">&lt;-</span> copy _width
<span id="L189" class="LineNr">189 </span>  <span class="PreProc">var</span> height/<span class="muRegEbx">ebx</span>: int <span class="Special">&lt;-</span> copy _height
<span id="L190" class="LineNr">190 </span>  <span class="PreProc">var</span> x2/eax: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
<span id="L191" class="LineNr">191 </span>  <span class="PreProc">var</span> y2/<span class="muRegEcx">ecx</span>: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
<span id="L192" class="LineNr">192 </span>  x2, y2 <span class="Special">&lt;-</span> <a href='grapheme-stack.mu.html#L138'>render-stack-from-top-wrapping-right-then-down</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, self, x, y, width, height, x, y, render-cursor?, <span class="Constant">3</span>/fg=cyan, <span class="Constant">0xc5</span>/bg=blue-bg
<span id="L193" class="LineNr">193 </span>  <span class="PreProc">return</span> x2  <span class="muComment"># y2? yolo</span>
<span id="L194" class="LineNr">194 </span><span class="Delimiter">}</span>
<span id="L195" class="LineNr">195 </span>
<span id="L196" class="LineNr">196 </span><span class="PreProc">fn</span> <span class="muTest"><a href='grapheme-stack.mu.html#L196'>test-render-grapheme-stack</a></span> <span class="Delimiter">{</span>
<span id="L197" class="LineNr">197 </span>  <span class="muComment"># setup: gs = &quot;abc&quot;</span>
<span id="L198" class="LineNr">198 </span>  <span class="PreProc">var</span> gs-storage: <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>
<span id="L199" class="LineNr">199 </span>  <span class="PreProc">var</span> gs/<span class="muRegEdi">edi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> address gs-storage
<span id="L200" class="LineNr">200 </span>  <a href='grapheme-stack.mu.html#L8'>initialize-grapheme-stack</a> gs, <span class="Constant">5</span>
<span id="L201" class="LineNr">201 </span>  <span class="PreProc">var</span> g/eax: grapheme <span class="Special">&lt;-</span> copy <span class="Constant">0x61</span>/a
<span id="L202" class="LineNr">202 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L203" class="LineNr">203 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x62</span>/b
<span id="L204" class="LineNr">204 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L205" class="LineNr">205 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x63</span>/c
<span id="L206" class="LineNr">206 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L207" class="LineNr">207 </span>  <span class="muComment"># setup: screen</span>
<span id="L208" class="LineNr">208 </span>  <span class="PreProc">var</span> screen-on-stack: <a href='../500fake-screen.mu.html#L14'>screen</a>
<span id="L209" class="LineNr">209 </span>  <span class="PreProc">var</span> <a href='../500fake-screen.mu.html#L14'>screen</a>/<span class="muRegEsi">esi</span>: (addr <a href='../500fake-screen.mu.html#L14'>screen</a>) <span class="Special">&lt;-</span> address screen-on-stack
<span id="L210" class="LineNr">210 </span>  <a href='../500fake-screen.mu.html#L33'>initialize-screen</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">5</span>, <span class="Constant">4</span>, <span class="Constant">0</span>/no-pixel-graphics
<span id="L211" class="LineNr">211 </span>  <span class="muComment">#</span>
<span id="L212" class="LineNr">212 </span>  <span class="PreProc">var</span> x/eax: int <span class="Special">&lt;-</span> <a href='grapheme-stack.mu.html#L121'>render-stack-from-bottom</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, gs, <span class="Constant">0</span>/x, <span class="Constant">0</span>/y, <span class="Constant">0</span>/no-highlight-matching-open-paren, <span class="Constant">0</span>/open-paren-depth
<span id="L213" class="LineNr">213 </span>  <a href='../504test-screen.mu.html#L7'>check-screen-row</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">0</span>/y, <span class="Constant">&quot;abc &quot;</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L196'>test-render-grapheme-stack</a> from bottom&quot;</span>
<span id="L214" class="LineNr">214 </span>  <a href='../502test.mu.html#L2'>check-ints-equal</a> x, <span class="Constant">3</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L196'>test-render-grapheme-stack</a> from bottom: result&quot;</span>
<span id="L215" class="LineNr">215 </span>  <a href='../504test-screen.mu.html#L257'>check-background-color-in-screen-row</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">3</span>/bg=reverse, <span class="Constant">0</span>/y, <span class="Constant">&quot;   &quot;</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L196'>test-render-grapheme-stack</a> from bottom: bg&quot;</span>
<span id="L216" class="LineNr">216 </span>  <span class="muComment">#</span>
<span id="L217" class="LineNr">217 </span>  <span class="PreProc">var</span> x/eax: int <span class="Special">&lt;-</span> <a href='grapheme-stack.mu.html#L184'>render-stack-from-top</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, gs, <span class="Constant">0</span>/x, <span class="Constant">1</span>/y, <span class="Constant">0</span>/cursor=false
<span id="L218" class="LineNr">218 </span>  <a href='../504test-screen.mu.html#L7'>check-screen-row</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">1</span>/y, <span class="Constant">&quot;cba &quot;</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L196'>test-render-grapheme-stack</a> from top without cursor&quot;</span>
<span id="L219" class="LineNr">219 </span>  <a href='../502test.mu.html#L2'>check-ints-equal</a> x, <span class="Constant">3</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L196'>test-render-grapheme-stack</a> from top without cursor: result&quot;</span>
<span id="L220" class="LineNr">220 </span>  <a href='../504test-screen.mu.html#L257'>check-background-color-in-screen-row</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">3</span>/bg=reverse, <span class="Constant">1</span>/y, <span class="Constant">&quot;   &quot;</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L196'>test-render-grapheme-stack</a> from top without cursor: bg&quot;</span>
<span id="L221" class="LineNr">221 </span>  <span class="muComment">#</span>
<span id="L222" class="LineNr">222 </span>  <span class="PreProc">var</span> x/eax: int <span class="Special">&lt;-</span> <a href='grapheme-stack.mu.html#L184'>render-stack-from-top</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, gs, <span class="Constant">0</span>/x, <span class="Constant">2</span>/y, <span class="Constant">1</span>/cursor=true
<span id="L223" class="LineNr">223 </span>  <a href='../504test-screen.mu.html#L7'>check-screen-row</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">2</span>/y, <span class="Constant">&quot;cba &quot;</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L196'>test-render-grapheme-stack</a> from top with cursor&quot;</span>
<span id="L224" class="LineNr">224 </span>  <a href='../502test.mu.html#L2'>check-ints-equal</a> x, <span class="Constant">3</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L196'>test-render-grapheme-stack</a> from top with cursor: result&quot;</span>
<span id="L225" class="LineNr">225 </span>  <a href='../504test-screen.mu.html#L257'>check-background-color-in-screen-row</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">3</span>/bg=reverse, <span class="Constant">2</span>/y, <span class="Constant">&quot;|   &quot;</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L196'>test-render-grapheme-stack</a> from top with cursor: bg&quot;</span>
<span id="L226" class="LineNr">226 </span><span class="Delimiter">}</span>
<span id="L227" class="LineNr">227 </span>
<span id="L228" class="LineNr">228 </span><span class="PreProc">fn</span> <span class="muTest"><a href='grapheme-stack.mu.html#L228'>test-render-grapheme-stack-while-highlighting-matching-close-paren</a></span> <span class="Delimiter">{</span>
<span id="L229" class="LineNr">229 </span>  <span class="muComment"># setup: gs = &quot;(b)&quot;</span>
<span id="L230" class="LineNr">230 </span>  <span class="PreProc">var</span> gs-storage: <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>
<span id="L231" class="LineNr">231 </span>  <span class="PreProc">var</span> gs/<span class="muRegEdi">edi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> address gs-storage
<span id="L232" class="LineNr">232 </span>  <a href='grapheme-stack.mu.html#L8'>initialize-grapheme-stack</a> gs, <span class="Constant">5</span>
<span id="L233" class="LineNr">233 </span>  <span class="PreProc">var</span> g/eax: grapheme <span class="Special">&lt;-</span> copy <span class="Constant">0x29</span>/close-paren
<span id="L234" class="LineNr">234 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L235" class="LineNr">235 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x62</span>/b
<span id="L236" class="LineNr">236 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L237" class="LineNr">237 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x28</span>/open-paren
<span id="L238" class="LineNr">238 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L239" class="LineNr">239 </span>  <span class="muComment"># setup: screen</span>
<span id="L240" class="LineNr">240 </span>  <span class="PreProc">var</span> screen-on-stack: <a href='../500fake-screen.mu.html#L14'>screen</a>
<span id="L241" class="LineNr">241 </span>  <span class="PreProc">var</span> <a href='../500fake-screen.mu.html#L14'>screen</a>/<span class="muRegEsi">esi</span>: (addr <a href='../500fake-screen.mu.html#L14'>screen</a>) <span class="Special">&lt;-</span> address screen-on-stack
<span id="L242" class="LineNr">242 </span>  <a href='../500fake-screen.mu.html#L33'>initialize-screen</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">5</span>, <span class="Constant">4</span>, <span class="Constant">0</span>/no-pixel-graphics
<span id="L243" class="LineNr">243 </span>  <span class="muComment">#</span>
<span id="L244" class="LineNr">244 </span>  <span class="PreProc">var</span> x/eax: int <span class="Special">&lt;-</span> <a href='grapheme-stack.mu.html#L184'>render-stack-from-top</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, gs, <span class="Constant">0</span>/x, <span class="Constant">2</span>/y, <span class="Constant">1</span>/cursor=true
<span id="L245" class="LineNr">245 </span>  <a href='../504test-screen.mu.html#L7'>check-screen-row</a>                      <a href='../500fake-screen.mu.html#L14'>screen</a>,               <span class="Constant">2</span>/y, <span class="Constant">&quot;(b) &quot;</span>, <span class="Constant">&quot;F - test-render-grapheme-stack-while-highlighting-matching-close-paren&quot;</span>
<span id="L246" class="LineNr">246 </span>  <a href='../504test-screen.mu.html#L257'>check-background-color-in-screen-row</a>  <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">3</span>/bg=reverse,  <span class="Constant">2</span>/y, <span class="Constant">&quot;|   &quot;</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L228'>test-render-grapheme-stack-while-highlighting-matching-close-paren</a>: cursor&quot;</span>
<span id="L247" class="LineNr">247 </span>  <a href='../504test-screen.mu.html#L71'>check-screen-row-in-color</a>             <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">0xf</span>/fg=white, <span class="Constant">2</span>/y, <span class="Constant">&quot;  ) &quot;</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L228'>test-render-grapheme-stack-while-highlighting-matching-close-paren</a>: matching paren&quot;</span>
<span id="L248" class="LineNr">248 </span><span class="Delimiter">}</span>
<span id="L249" class="LineNr">249 </span>
<span id="L250" class="LineNr">250 </span><span class="PreProc">fn</span> <span class="muTest"><a href='grapheme-stack.mu.html#L250'>test-render-grapheme-stack-while-highlighting-matching-close-paren-2</a></span> <span class="Delimiter">{</span>
<span id="L251" class="LineNr">251 </span>  <span class="muComment"># setup: gs = &quot;(a (b)) c&quot;</span>
<span id="L252" class="LineNr">252 </span>  <span class="PreProc">var</span> gs-storage: <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>
<span id="L253" class="LineNr">253 </span>  <span class="PreProc">var</span> gs/<span class="muRegEdi">edi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> address gs-storage
<span id="L254" class="LineNr">254 </span>  <a href='grapheme-stack.mu.html#L8'>initialize-grapheme-stack</a> gs, <span class="Constant">0x10</span>
<span id="L255" class="LineNr">255 </span>  <span class="PreProc">var</span> g/eax: grapheme <span class="Special">&lt;-</span> copy <span class="Constant">0x63</span>/c
<span id="L256" class="LineNr">256 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L257" class="LineNr">257 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x20</span>/space
<span id="L258" class="LineNr">258 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L259" class="LineNr">259 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x29</span>/close-paren
<span id="L260" class="LineNr">260 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L261" class="LineNr">261 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x29</span>/close-paren
<span id="L262" class="LineNr">262 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L263" class="LineNr">263 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x62</span>/b
<span id="L264" class="LineNr">264 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L265" class="LineNr">265 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x28</span>/open-paren
<span id="L266" class="LineNr">266 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L267" class="LineNr">267 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x20</span>/space
<span id="L268" class="LineNr">268 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L269" class="LineNr">269 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x61</span>/a
<span id="L270" class="LineNr">270 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L271" class="LineNr">271 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x28</span>/open-paren
<span id="L272" class="LineNr">272 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L273" class="LineNr">273 </span>  <span class="muComment"># setup: screen</span>
<span id="L274" class="LineNr">274 </span>  <span class="PreProc">var</span> screen-on-stack: <a href='../500fake-screen.mu.html#L14'>screen</a>
<span id="L275" class="LineNr">275 </span>  <span class="PreProc">var</span> <a href='../500fake-screen.mu.html#L14'>screen</a>/<span class="muRegEsi">esi</span>: (addr <a href='../500fake-screen.mu.html#L14'>screen</a>) <span class="Special">&lt;-</span> address screen-on-stack
<span id="L276" class="LineNr">276 </span>  <a href='../500fake-screen.mu.html#L33'>initialize-screen</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">5</span>, <span class="Constant">4</span>, <span class="Constant">0</span>/no-pixel-graphics
<span id="L277" class="LineNr">277 </span>  <span class="muComment">#</span>
<span id="L278" class="LineNr">278 </span>  <span class="PreProc">var</span> x/eax: int <span class="Special">&lt;-</span> <a href='grapheme-stack.mu.html#L184'>render-stack-from-top</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, gs, <span class="Constant">0</span>/x, <span class="Constant">2</span>/y, <span class="Constant">1</span>/cursor=true
<span id="L279" class="LineNr">279 </span>  <a href='../504test-screen.mu.html#L7'>check-screen-row</a>                      <a href='../500fake-screen.mu.html#L14'>screen</a>,               <span class="Constant">2</span>/y, <span class="Constant">&quot;(a (b)) c &quot;</span>, <span class="Constant">&quot;F - test-render-grapheme-stack-while-highlighting-matching-close-paren-2&quot;</span>
<span id="L280" class="LineNr">280 </span>  <a href='../504test-screen.mu.html#L257'>check-background-color-in-screen-row</a>  <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">3</span>/bg=reverse,  <span class="Constant">2</span>/y, <span class="Constant">&quot;|         &quot;</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L250'>test-render-grapheme-stack-while-highlighting-matching-close-paren-2</a>: cursor&quot;</span>
<span id="L281" class="LineNr">281 </span>  <a href='../504test-screen.mu.html#L71'>check-screen-row-in-color</a>             <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">0xf</span>/fg=white, <span class="Constant">2</span>/y, <span class="Constant">&quot;      )   &quot;</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L250'>test-render-grapheme-stack-while-highlighting-matching-close-paren-2</a>: matching paren&quot;</span>
<span id="L282" class="LineNr">282 </span><span class="Delimiter">}</span>
<span id="L283" class="LineNr">283 </span>
<span id="L284" class="LineNr">284 </span><span class="PreProc">fn</span> <span class="muTest"><a href='grapheme-stack.mu.html#L284'>test-render-grapheme-stack-while-highlighting-matching-open-paren-with-close-paren-at-end</a></span> <span class="Delimiter">{</span>
<span id="L285" class="LineNr">285 </span>  <span class="muComment"># setup: gs = &quot;(b)&quot;</span>
<span id="L286" class="LineNr">286 </span>  <span class="PreProc">var</span> gs-storage: <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>
<span id="L287" class="LineNr">287 </span>  <span class="PreProc">var</span> gs/<span class="muRegEdi">edi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> address gs-storage
<span id="L288" class="LineNr">288 </span>  <a href='grapheme-stack.mu.html#L8'>initialize-grapheme-stack</a> gs, <span class="Constant">5</span>
<span id="L289" class="LineNr">289 </span>  <span class="PreProc">var</span> g/eax: grapheme <span class="Special">&lt;-</span> copy <span class="Constant">0x28</span>/open-paren
<span id="L290" class="LineNr">290 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L291" class="LineNr">291 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x62</span>/b
<span id="L292" class="LineNr">292 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L293" class="LineNr">293 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x29</span>/close-paren
<span id="L294" class="LineNr">294 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L295" class="LineNr">295 </span>  <span class="muComment"># setup: screen</span>
<span id="L296" class="LineNr">296 </span>  <span class="PreProc">var</span> screen-on-stack: <a href='../500fake-screen.mu.html#L14'>screen</a>
<span id="L297" class="LineNr">297 </span>  <span class="PreProc">var</span> <a href='../500fake-screen.mu.html#L14'>screen</a>/<span class="muRegEsi">esi</span>: (addr <a href='../500fake-screen.mu.html#L14'>screen</a>) <span class="Special">&lt;-</span> address screen-on-stack
<span id="L298" class="LineNr">298 </span>  <a href='../500fake-screen.mu.html#L33'>initialize-screen</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">5</span>, <span class="Constant">4</span>, <span class="Constant">0</span>/no-pixel-graphics
<span id="L299" class="LineNr">299 </span>  <span class="muComment">#</span>
<span id="L300" class="LineNr">300 </span>  <span class="PreProc">var</span> x/eax: int <span class="Special">&lt;-</span> <a href='grapheme-stack.mu.html#L121'>render-stack-from-bottom</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, gs, <span class="Constant">0</span>/x, <span class="Constant">2</span>/y, <span class="Constant">1</span>/highlight-matching-open-paren, <span class="Constant">1</span>/open-paren-depth
<span id="L301" class="LineNr">301 </span>  <a href='../504test-screen.mu.html#L7'>check-screen-row</a>          <a href='../500fake-screen.mu.html#L14'>screen</a>,               <span class="Constant">2</span>/y, <span class="Constant">&quot;(b) &quot;</span>, <span class="Constant">&quot;F - test-render-grapheme-stack-while-highlighting-matching-open-paren-with-close-paren-at-end&quot;</span>
<span id="L302" class="LineNr">302 </span>  <a href='../504test-screen.mu.html#L71'>check-screen-row-in-color</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">0xf</span>/fg=white, <span class="Constant">2</span>/y, <span class="Constant">&quot;(   &quot;</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L284'>test-render-grapheme-stack-while-highlighting-matching-open-paren-with-close-paren-at-end</a>: matching paren&quot;</span>
<span id="L303" class="LineNr">303 </span><span class="Delimiter">}</span>
<span id="L304" class="LineNr">304 </span>
<span id="L305" class="LineNr">305 </span><span class="PreProc">fn</span> <span class="muTest"><a href='grapheme-stack.mu.html#L305'>test-render-grapheme-stack-while-highlighting-matching-open-paren-with-close-paren-at-end-2</a></span> <span class="Delimiter">{</span>
<span id="L306" class="LineNr">306 </span>  <span class="muComment"># setup: gs = &quot;a((b))&quot;</span>
<span id="L307" class="LineNr">307 </span>  <span class="PreProc">var</span> gs-storage: <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>
<span id="L308" class="LineNr">308 </span>  <span class="PreProc">var</span> gs/<span class="muRegEdi">edi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> address gs-storage
<span id="L309" class="LineNr">309 </span>  <a href='grapheme-stack.mu.html#L8'>initialize-grapheme-stack</a> gs, <span class="Constant">0x10</span>
<span id="L310" class="LineNr">310 </span>  <span class="PreProc">var</span> g/eax: grapheme <span class="Special">&lt;-</span> copy <span class="Constant">0x61</span>/a
<span id="L311" class="LineNr">311 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L312" class="LineNr">312 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x28</span>/open-paren
<span id="L313" class="LineNr">313 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L314" class="LineNr">314 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x28</span>/open-paren
<span id="L315" class="LineNr">315 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L316" class="LineNr">316 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x62</span>/b
<span id="L317" class="LineNr">317 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L318" class="LineNr">318 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x29</span>/close-paren
<span id="L319" class="LineNr">319 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L320" class="LineNr">320 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x29</span>/close-paren
<span id="L321" class="LineNr">321 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L322" class="LineNr">322 </span>  <span class="muComment"># setup: screen</span>
<span id="L323" class="LineNr">323 </span>  <span class="PreProc">var</span> screen-on-stack: <a href='../500fake-screen.mu.html#L14'>screen</a>
<span id="L324" class="LineNr">324 </span>  <span class="PreProc">var</span> <a href='../500fake-screen.mu.html#L14'>screen</a>/<span class="muRegEsi">esi</span>: (addr <a href='../500fake-screen.mu.html#L14'>screen</a>) <span class="Special">&lt;-</span> address screen-on-stack
<span id="L325" class="LineNr">325 </span>  <a href='../500fake-screen.mu.html#L33'>initialize-screen</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">5</span>, <span class="Constant">4</span>, <span class="Constant">0</span>/no-pixel-graphics
<span id="L326" class="LineNr">326 </span>  <span class="muComment">#</span>
<span id="L327" class="LineNr">327 </span>  <span class="PreProc">var</span> x/eax: int <span class="Special">&lt;-</span> <a href='grapheme-stack.mu.html#L121'>render-stack-from-bottom</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, gs, <span class="Constant">0</span>/x, <span class="Constant">2</span>/y, <span class="Constant">1</span>/highlight-matching-open-paren, <span class="Constant">1</span>/open-paren-depth
<span id="L328" class="LineNr">328 </span>  <a href='../504test-screen.mu.html#L7'>check-screen-row</a>          <a href='../500fake-screen.mu.html#L14'>screen</a>,               <span class="Constant">2</span>/y, <span class="Constant">&quot;a((b)) &quot;</span>, <span class="Constant">&quot;F - test-render-grapheme-stack-while-highlighting-matching-open-paren-with-close-paren-at-end-2&quot;</span>
<span id="L329" class="LineNr">329 </span>  <a href='../504test-screen.mu.html#L71'>check-screen-row-in-color</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">0xf</span>/fg=white, <span class="Constant">2</span>/y, <span class="Constant">&quot; (     &quot;</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L305'>test-render-grapheme-stack-while-highlighting-matching-open-paren-with-close-paren-at-end-2</a>: matching paren&quot;</span>
<span id="L330" class="LineNr">330 </span><span class="Delimiter">}</span>
<span id="L331" class="LineNr">331 </span>
<span id="L332" class="LineNr">332 </span><span class="PreProc">fn</span> <span class="muTest"><a href='grapheme-stack.mu.html#L332'>test-render-grapheme-stack-while-highlighting-matching-open-paren</a></span> <span class="Delimiter">{</span>
<span id="L333" class="LineNr">333 </span>  <span class="muComment"># setup: gs = &quot;(b&quot;</span>
<span id="L334" class="LineNr">334 </span>  <span class="PreProc">var</span> gs-storage: <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>
<span id="L335" class="LineNr">335 </span>  <span class="PreProc">var</span> gs/<span class="muRegEdi">edi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> address gs-storage
<span id="L336" class="LineNr">336 </span>  <a href='grapheme-stack.mu.html#L8'>initialize-grapheme-stack</a> gs, <span class="Constant">5</span>
<span id="L337" class="LineNr">337 </span>  <span class="PreProc">var</span> g/eax: grapheme <span class="Special">&lt;-</span> copy <span class="Constant">0x28</span>/open-paren
<span id="L338" class="LineNr">338 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L339" class="LineNr">339 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x62</span>/b
<span id="L340" class="LineNr">340 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L341" class="LineNr">341 </span>  <span class="muComment"># setup: screen</span>
<span id="L342" class="LineNr">342 </span>  <span class="PreProc">var</span> screen-on-stack: <a href='../500fake-screen.mu.html#L14'>screen</a>
<span id="L343" class="LineNr">343 </span>  <span class="PreProc">var</span> <a href='../500fake-screen.mu.html#L14'>screen</a>/<span class="muRegEsi">esi</span>: (addr <a href='../500fake-screen.mu.html#L14'>screen</a>) <span class="Special">&lt;-</span> address screen-on-stack
<span id="L344" class="LineNr">344 </span>  <a href='../500fake-screen.mu.html#L33'>initialize-screen</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">5</span>, <span class="Constant">4</span>, <span class="Constant">0</span>/no-pixel-graphics
<span id="L345" class="LineNr">345 </span>  <span class="muComment">#</span>
<span id="L346" class="LineNr">346 </span>  <span class="PreProc">var</span> x/eax: int <span class="Special">&lt;-</span> <a href='grapheme-stack.mu.html#L121'>render-stack-from-bottom</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, gs, <span class="Constant">0</span>/x, <span class="Constant">2</span>/y, <span class="Constant">1</span>/highlight-matching-open-paren, <span class="Constant">0</span>/open-paren-depth
<span id="L347" class="LineNr">347 </span>  <a href='../504test-screen.mu.html#L7'>check-screen-row</a>          <a href='../500fake-screen.mu.html#L14'>screen</a>,               <span class="Constant">2</span>/y, <span class="Constant">&quot;(b &quot;</span>, <span class="Constant">&quot;F - test-render-grapheme-stack-while-highlighting-matching-open-paren&quot;</span>
<span id="L348" class="LineNr">348 </span>  <a href='../504test-screen.mu.html#L71'>check-screen-row-in-color</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">0xf</span>/fg=white, <span class="Constant">2</span>/y, <span class="Constant">&quot;(  &quot;</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L332'>test-render-grapheme-stack-while-highlighting-matching-open-paren</a>: matching paren&quot;</span>
<span id="L349" class="LineNr">349 </span><span class="Delimiter">}</span>
<span id="L350" class="LineNr">350 </span>
<span id="L351" class="LineNr">351 </span><span class="PreProc">fn</span> <span class="muTest"><a href='grapheme-stack.mu.html#L351'>test-render-grapheme-stack-while-highlighting-matching-open-paren-2</a></span> <span class="Delimiter">{</span>
<span id="L352" class="LineNr">352 </span>  <span class="muComment"># setup: gs = &quot;a((b)&quot;</span>
<span id="L353" class="LineNr">353 </span>  <span class="PreProc">var</span> gs-storage: <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>
<span id="L354" class="LineNr">354 </span>  <span class="PreProc">var</span> gs/<span class="muRegEdi">edi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> address gs-storage
<span id="L355" class="LineNr">355 </span>  <a href='grapheme-stack.mu.html#L8'>initialize-grapheme-stack</a> gs, <span class="Constant">0x10</span>
<span id="L356" class="LineNr">356 </span>  <span class="PreProc">var</span> g/eax: grapheme <span class="Special">&lt;-</span> copy <span class="Constant">0x61</span>/a
<span id="L357" class="LineNr">357 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L358" class="LineNr">358 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x28</span>/open-paren
<span id="L359" class="LineNr">359 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L360" class="LineNr">360 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x28</span>/open-paren
<span id="L361" class="LineNr">361 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L362" class="LineNr">362 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x62</span>/b
<span id="L363" class="LineNr">363 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L364" class="LineNr">364 </span>  g <span class="Special">&lt;-</span> copy <span class="Constant">0x29</span>/close-paren
<span id="L365" class="LineNr">365 </span>  <a href='grapheme-stack.mu.html#L39'>push-grapheme-stack</a> gs, g
<span id="L366" class="LineNr">366 </span>  <span class="muComment"># setup: screen</span>
<span id="L367" class="LineNr">367 </span>  <span class="PreProc">var</span> screen-on-stack: <a href='../500fake-screen.mu.html#L14'>screen</a>
<span id="L368" class="LineNr">368 </span>  <span class="PreProc">var</span> <a href='../500fake-screen.mu.html#L14'>screen</a>/<span class="muRegEsi">esi</span>: (addr <a href='../500fake-screen.mu.html#L14'>screen</a>) <span class="Special">&lt;-</span> address screen-on-stack
<span id="L369" class="LineNr">369 </span>  <a href='../500fake-screen.mu.html#L33'>initialize-screen</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">5</span>, <span class="Constant">4</span>, <span class="Constant">0</span>/no-pixel-graphics
<span id="L370" class="LineNr">370 </span>  <span class="muComment">#</span>
<span id="L371" class="LineNr">371 </span>  <span class="PreProc">var</span> x/eax: int <span class="Special">&lt;-</span> <a href='grapheme-stack.mu.html#L121'>render-stack-from-bottom</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, gs, <span class="Constant">0</span>/x, <span class="Constant">2</span>/y, <span class="Constant">1</span>/highlight-matching-open-paren, <span class="Constant">0</span>/open-paren-depth
<span id="L372" class="LineNr">372 </span>  <a href='../504test-screen.mu.html#L7'>check-screen-row</a>          <a href='../500fake-screen.mu.html#L14'>screen</a>,               <span class="Constant">2</span>/y, <span class="Constant">&quot;a((b) &quot;</span>, <span class="Constant">&quot;F - test-render-grapheme-stack-while-highlighting-matching-open-paren-2&quot;</span>
<span id="L373" class="LineNr">373 </span>  <a href='../504test-screen.mu.html#L71'>check-screen-row-in-color</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">0xf</span>/fg=white, <span class="Constant">2</span>/y, <span class="Constant">&quot; (    &quot;</span>, <span class="Constant">&quot;F - <a href='grapheme-stack.mu.html#L351'>test-render-grapheme-stack-while-highlighting-matching-open-paren-2</a>: matching paren&quot;</span>
<span id="L374" class="LineNr">374 </span><span class="Delimiter">}</span>
<span id="L375" class="LineNr">375 </span>
<span id="L376" class="LineNr">376 </span><span class="muComment"># return the index of the matching close-paren of the grapheme at cursor (top of stack)</span>
<span id="L377" class="LineNr">377 </span><span class="muComment"># or top index if there's no matching close-paren</span>
<span id="L378" class="LineNr">378 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L378'>get-matching-close-paren-index</a></span> _self: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>), render-cursor?: boolean<span class="PreProc"> -&gt; </span>_/<span class="muRegEdx">edx</span>: int <span class="Delimiter">{</span>
<span id="L379" class="LineNr">379 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> copy _self
<span id="L380" class="LineNr">380 </span>  <span class="PreProc">var</span> top-addr/<span class="muRegEdx">edx</span>: (addr int) <span class="Special">&lt;-</span> get self, top
<span id="L381" class="LineNr">381 </span>  <span class="muComment"># if not rendering cursor, return</span>
<span id="L382" class="LineNr">382 </span>  compare render-cursor?, <span class="Constant">0</span>/false
<span id="L383" class="LineNr">383 </span>  <span class="Delimiter">{</span>
<span id="L384" class="LineNr">384 </span>    <span class="PreProc">break-if-!=</span>
<span id="L385" class="LineNr">385 </span>    <span class="PreProc">return</span> *top-addr
<span id="L386" class="LineNr">386 </span>  <span class="Delimiter">}</span>
<span id="L387" class="LineNr">387 </span>  <span class="PreProc">var</span> data-ah/eax: (addr handle array grapheme) <span class="Special">&lt;-</span> get self, data
<span id="L388" class="LineNr">388 </span>  <span class="PreProc">var</span> data/eax: (addr array grapheme) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *data-ah
<span id="L389" class="LineNr">389 </span>  <span class="PreProc">var</span> i/<span class="muRegEcx">ecx</span>: int <span class="Special">&lt;-</span> copy *top-addr
<span id="L390" class="LineNr">390 </span>  <span class="muComment"># if stack is empty, return</span>
<span id="L391" class="LineNr">391 </span>  compare i, <span class="Constant">0</span>
<span id="L392" class="LineNr">392 </span>  <span class="Delimiter">{</span>
<span id="L393" class="LineNr">393 </span>    <span class="PreProc">break-if-&gt;</span>
<span id="L394" class="LineNr">394 </span>    <span class="PreProc">return</span> *top-addr
<span id="L395" class="LineNr">395 </span>  <span class="Delimiter">}</span>
<span id="L396" class="LineNr">396 </span>  <span class="muComment"># if cursor is not '(' return</span>
<span id="L397" class="LineNr">397 </span>  i <span class="Special">&lt;-</span> decrement
<span id="L398" class="LineNr">398 </span>  <span class="PreProc">var</span> g/<span class="muRegEsi">esi</span>: (addr grapheme) <span class="Special">&lt;-</span> index data, i
<span id="L399" class="LineNr">399 </span>  compare *g, <span class="Constant">0x28</span>/open-paren
<span id="L400" class="LineNr">400 </span>  <span class="Delimiter">{</span>
<span id="L401" class="LineNr">401 </span>    <span class="PreProc">break-if-=</span>
<span id="L402" class="LineNr">402 </span>    <span class="PreProc">return</span> *top-addr
<span id="L403" class="LineNr">403 </span>  <span class="Delimiter">}</span>
<span id="L404" class="LineNr">404 </span>  <span class="muComment"># otherwise scan to matching paren</span>
<span id="L405" class="LineNr">405 </span>  <span class="PreProc">var</span> paren-count/<span class="muRegEbx">ebx</span>: int <span class="Special">&lt;-</span> copy <span class="Constant">1</span>
<span id="L406" class="LineNr">406 </span>  i <span class="Special">&lt;-</span> decrement
<span id="L407" class="LineNr">407 </span>  <span class="Delimiter">{</span>
<span id="L408" class="LineNr">408 </span>    compare i, <span class="Constant">0</span>
<span id="L409" class="LineNr">409 </span>    <span class="PreProc">break-if-&lt;</span>
<span id="L410" class="LineNr">410 </span>    <span class="PreProc">var</span> g/<span class="muRegEsi">esi</span>: (addr grapheme) <span class="Special">&lt;-</span> index data, i
<span id="L411" class="LineNr">411 </span>    compare *g, <span class="Constant">0x28</span>/open-paren
<span id="L412" class="LineNr">412 </span>    <span class="Delimiter">{</span>
<span id="L413" class="LineNr">413 </span>      <span class="PreProc">break-if-!=</span>
<span id="L414" class="LineNr">414 </span>      paren-count <span class="Special">&lt;-</span> increment
<span id="L415" class="LineNr">415 </span>    <span class="Delimiter">}</span>
<span id="L416" class="LineNr">416 </span>    compare *g, <span class="Constant">0x29</span>/close-paren
<span id="L417" class="LineNr">417 </span>    <span class="Delimiter">{</span>
<span id="L418" class="LineNr">418 </span>      <span class="PreProc">break-if-!=</span>
<span id="L419" class="LineNr">419 </span>      compare paren-count, <span class="Constant">1</span>
<span id="L420" class="LineNr">420 </span>      <span class="Delimiter">{</span>
<span id="L421" class="LineNr">421 </span>        <span class="PreProc">break-if-!=</span>
<span id="L422" class="LineNr">422 </span>        <span class="PreProc">return</span> i
<span id="L423" class="LineNr">423 </span>      <span class="Delimiter">}</span>
<span id="L424" class="LineNr">424 </span>      paren-count <span class="Special">&lt;-</span> decrement
<span id="L425" class="LineNr">425 </span>    <span class="Delimiter">}</span>
<span id="L426" class="LineNr">426 </span>    i <span class="Special">&lt;-</span> decrement
<span id="L427" class="LineNr">427 </span>    <span class="PreProc">loop</span>
<span id="L428" class="LineNr">428 </span>  <span class="Delimiter">}</span>
<span id="L429" class="LineNr">429 </span>  <span class="PreProc">return</span> *top-addr
<span id="L430" class="LineNr">430 </span><span class="Delimiter">}</span>
<span id="L431" class="LineNr">431 </span>
<span id="L432" class="LineNr">432 </span><span class="muComment"># return the index of the first open-paren at the given depth</span>
<span id="L433" class="LineNr">433 </span><span class="muComment"># or top index if there's no matching close-paren</span>
<span id="L434" class="LineNr">434 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L434'>get-matching-open-paren-index</a></span> _self: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>), control: boolean, depth: int<span class="PreProc"> -&gt; </span>_/<span class="muRegEdx">edx</span>: int <span class="Delimiter">{</span>
<span id="L435" class="LineNr">435 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> copy _self
<span id="L436" class="LineNr">436 </span>  <span class="PreProc">var</span> top-addr/<span class="muRegEdx">edx</span>: (addr int) <span class="Special">&lt;-</span> get self, top
<span id="L437" class="LineNr">437 </span>  <span class="muComment"># if not rendering cursor, return</span>
<span id="L438" class="LineNr">438 </span>  compare control, <span class="Constant">0</span>/false
<span id="L439" class="LineNr">439 </span>  <span class="Delimiter">{</span>
<span id="L440" class="LineNr">440 </span>    <span class="PreProc">break-if-!=</span>
<span id="L441" class="LineNr">441 </span>    <span class="PreProc">return</span> *top-addr
<span id="L442" class="LineNr">442 </span>  <span class="Delimiter">}</span>
<span id="L443" class="LineNr">443 </span>  <span class="PreProc">var</span> data-ah/eax: (addr handle array grapheme) <span class="Special">&lt;-</span> get self, data
<span id="L444" class="LineNr">444 </span>  <span class="PreProc">var</span> data/eax: (addr array grapheme) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *data-ah
<span id="L445" class="LineNr">445 </span>  <span class="PreProc">var</span> i/<span class="muRegEcx">ecx</span>: int <span class="Special">&lt;-</span> copy *top-addr
<span id="L446" class="LineNr">446 </span>  <span class="muComment"># if stack is empty, return</span>
<span id="L447" class="LineNr">447 </span>  compare i, <span class="Constant">0</span>
<span id="L448" class="LineNr">448 </span>  <span class="Delimiter">{</span>
<span id="L449" class="LineNr">449 </span>    <span class="PreProc">break-if-&gt;</span>
<span id="L450" class="LineNr">450 </span>    <span class="PreProc">return</span> *top-addr
<span id="L451" class="LineNr">451 </span>  <span class="Delimiter">}</span>
<span id="L452" class="LineNr">452 </span>  <span class="muComment"># scan to matching open paren</span>
<span id="L453" class="LineNr">453 </span>  <span class="PreProc">var</span> paren-count/<span class="muRegEbx">ebx</span>: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
<span id="L454" class="LineNr">454 </span>  i <span class="Special">&lt;-</span> decrement
<span id="L455" class="LineNr">455 </span>  <span class="Delimiter">{</span>
<span id="L456" class="LineNr">456 </span>    compare i, <span class="Constant">0</span>
<span id="L457" class="LineNr">457 </span>    <span class="PreProc">break-if-&lt;</span>
<span id="L458" class="LineNr">458 </span>    <span class="PreProc">var</span> g/<span class="muRegEsi">esi</span>: (addr grapheme) <span class="Special">&lt;-</span> index data, i
<span id="L459" class="LineNr">459 </span>    compare *g, <span class="Constant">0x29</span>/close-paren
<span id="L460" class="LineNr">460 </span>    <span class="Delimiter">{</span>
<span id="L461" class="LineNr">461 </span>      <span class="PreProc">break-if-!=</span>
<span id="L462" class="LineNr">462 </span>      paren-count <span class="Special">&lt;-</span> increment
<span id="L463" class="LineNr">463 </span>    <span class="Delimiter">}</span>
<span id="L464" class="LineNr">464 </span>    compare *g, <span class="Constant">0x28</span>/open-paren
<span id="L465" class="LineNr">465 </span>    <span class="Delimiter">{</span>
<span id="L466" class="LineNr">466 </span>      <span class="PreProc">break-if-!=</span>
<span id="L467" class="LineNr">467 </span>      compare paren-count, depth
<span id="L468" class="LineNr">468 </span>      <span class="Delimiter">{</span>
<span id="L469" class="LineNr">469 </span>        <span class="PreProc">break-if-!=</span>
<span id="L470" class="LineNr">470 </span>        <span class="PreProc">return</span> i
<span id="L471" class="LineNr">471 </span>      <span class="Delimiter">}</span>
<span id="L472" class="LineNr">472 </span>      paren-count <span class="Special">&lt;-</span> decrement
<span id="L473" class="LineNr">473 </span>    <span class="Delimiter">}</span>
<span id="L474" class="LineNr">474 </span>    i <span class="Special">&lt;-</span> decrement
<span id="L475" class="LineNr">475 </span>    <span class="PreProc">loop</span>
<span id="L476" class="LineNr">476 </span>  <span class="Delimiter">}</span>
<span id="L477" class="LineNr">477 </span>  <span class="PreProc">return</span> *top-addr
<span id="L478" class="LineNr">478 </span><span class="Delimiter">}</span>
<span id="L479" class="LineNr">479 </span>
<span id="L480" class="LineNr">480 </span><span class="muComment"># compare from bottom</span>
<span id="L481" class="LineNr">481 </span><span class="muComment"># beware: modifies 'stream', which must be disposed of after a false result</span>
<span id="L482" class="LineNr">482 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L482'>prefix-match?</a></span> _self: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>), s: (addr stream byte)<span class="PreProc"> -&gt; </span>_/eax: boolean <span class="Delimiter">{</span>
<span id="L483" class="LineNr">483 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> copy _self
<span id="L484" class="LineNr">484 </span>  <span class="PreProc">var</span> data-ah/<span class="muRegEdi">edi</span>: (addr handle array grapheme) <span class="Special">&lt;-</span> get self, data
<span id="L485" class="LineNr">485 </span>  <span class="PreProc">var</span> _data/eax: (addr array grapheme) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *data-ah
<span id="L486" class="LineNr">486 </span>  <span class="PreProc">var</span> data/<span class="muRegEdi">edi</span>: (addr array grapheme) <span class="Special">&lt;-</span> copy _data
<span id="L487" class="LineNr">487 </span>  <span class="PreProc">var</span> top-addr/<span class="muRegEcx">ecx</span>: (addr int) <span class="Special">&lt;-</span> get self, top
<span id="L488" class="LineNr">488 </span>  <span class="PreProc">var</span> i/<span class="muRegEbx">ebx</span>: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
<span id="L489" class="LineNr">489 </span>  <span class="Delimiter">{</span>
<span id="L490" class="LineNr">490 </span>    compare i, *top-addr
<span id="L491" class="LineNr">491 </span>    <span class="PreProc">break-if-&gt;=</span>
<span id="L492" class="LineNr">492 </span>    <span class="muComment"># if curr != expected, return false</span>
<span id="L493" class="LineNr">493 </span>    <span class="Delimiter">{</span>
<span id="L494" class="LineNr">494 </span>      <span class="PreProc">var</span> curr-a/<span class="muRegEdx">edx</span>: (addr grapheme) <span class="Special">&lt;-</span> index data, i
<span id="L495" class="LineNr">495 </span>      <span class="PreProc">var</span> expected/eax: grapheme <span class="Special">&lt;-</span> <a href='../403unicode.mu.html#L92'>read-grapheme</a> s
<span id="L496" class="LineNr">496 </span>      <span class="Delimiter">{</span>
<span id="L497" class="LineNr">497 </span>        compare expected, *curr-a
<span id="L498" class="LineNr">498 </span>        <span class="PreProc">break-if-=</span>
<span id="L499" class="LineNr">499 </span>        <span class="PreProc">return</span> <span class="Constant">0</span>/false
<span id="L500" class="LineNr">500 </span>      <span class="Delimiter">}</span>
<span id="L501" class="LineNr">501 </span>    <span class="Delimiter">}</span>
<span id="L502" class="LineNr">502 </span>    i <span class="Special">&lt;-</span> increment
<span id="L503" class="LineNr">503 </span>    <span class="PreProc">loop</span>
<span id="L504" class="LineNr">504 </span>  <span class="Delimiter">}</span>
<span id="L505" class="LineNr">505 </span>  <span class="PreProc">return</span> <span class="Constant">1</span>   <span class="muComment"># true</span>
<span id="L506" class="LineNr">506 </span><span class="Delimiter">}</span>
<span id="L507" class="LineNr">507 </span>
<span id="L508" class="LineNr">508 </span><span class="muComment"># compare from bottom</span>
<span id="L509" class="LineNr">509 </span><span class="muComment"># beware: modifies 'stream', which must be disposed of after a false result</span>
<span id="L510" class="LineNr">510 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L510'>suffix-match?</a></span> _self: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>), s: (addr stream byte)<span class="PreProc"> -&gt; </span>_/eax: boolean <span class="Delimiter">{</span>
<span id="L511" class="LineNr">511 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> copy _self
<span id="L512" class="LineNr">512 </span>  <span class="PreProc">var</span> data-ah/<span class="muRegEdi">edi</span>: (addr handle array grapheme) <span class="Special">&lt;-</span> get self, data
<span id="L513" class="LineNr">513 </span>  <span class="PreProc">var</span> _data/eax: (addr array grapheme) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *data-ah
<span id="L514" class="LineNr">514 </span>  <span class="PreProc">var</span> data/<span class="muRegEdi">edi</span>: (addr array grapheme) <span class="Special">&lt;-</span> copy _data
<span id="L515" class="LineNr">515 </span>  <span class="PreProc">var</span> top-addr/eax: (addr int) <span class="Special">&lt;-</span> get self, top
<span id="L516" class="LineNr">516 </span>  <span class="PreProc">var</span> i/<span class="muRegEbx">ebx</span>: int <span class="Special">&lt;-</span> copy *top-addr
<span id="L517" class="LineNr">517 </span>  i <span class="Special">&lt;-</span> decrement
<span id="L518" class="LineNr">518 </span>  <span class="Delimiter">{</span>
<span id="L519" class="LineNr">519 </span>    compare i, <span class="Constant">0</span>
<span id="L520" class="LineNr">520 </span>    <span class="PreProc">break-if-&lt;</span>
<span id="L521" class="LineNr">521 </span>    <span class="Delimiter">{</span>
<span id="L522" class="LineNr">522 </span>      <span class="PreProc">var</span> curr-a/<span class="muRegEdx">edx</span>: (addr grapheme) <span class="Special">&lt;-</span> index data, i
<span id="L523" class="LineNr">523 </span>      <span class="PreProc">var</span> expected/eax: grapheme <span class="Special">&lt;-</span> <a href='../403unicode.mu.html#L92'>read-grapheme</a> s
<span id="L524" class="LineNr">524 </span>      <span class="muComment"># if curr != expected, return false</span>
<span id="L525" class="LineNr">525 </span>      <span class="Delimiter">{</span>
<span id="L526" class="LineNr">526 </span>        compare expected, *curr-a
<span id="L527" class="LineNr">527 </span>        <span class="PreProc">break-if-=</span>
<span id="L528" class="LineNr">528 </span>        <span class="PreProc">return</span> <span class="Constant">0</span>/false
<span id="L529" class="LineNr">529 </span>      <span class="Delimiter">}</span>
<span id="L530" class="LineNr">530 </span>    <span class="Delimiter">}</span>
<span id="L531" class="LineNr">531 </span>    i <span class="Special">&lt;-</span> decrement
<span id="L532" class="LineNr">532 </span>    <span class="PreProc">loop</span>
<span id="L533" class="LineNr">533 </span>  <span class="Delimiter">}</span>
<span id="L534" class="LineNr">534 </span>  <span class="PreProc">return</span> <span class="Constant">1</span>   <span class="muComment"># true</span>
<span id="L535" class="LineNr">535 </span><span class="Delimiter">}</span>
<span id="L536" class="LineNr">536 </span>
<span id="L537" class="LineNr">537 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='grapheme-stack.mu.html#L537'>grapheme-stack-is-decimal-integer?</a></span> _self: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>)<span class="PreProc"> -&gt; </span>_/eax: boolean <span class="Delimiter">{</span>
<span id="L538" class="LineNr">538 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='grapheme-stack.mu.html#L3'>grapheme-stack</a>) <span class="Special">&lt;-</span> copy _self
<span id="L539" class="LineNr">539 </span>  <span class="PreProc">var</span> data-ah/eax: (addr handle array grapheme) <span class="Special">&lt;-</span> get self, data
<span id="L540" class="LineNr">540 </span>  <span class="PreProc">var</span> _data/eax: (addr array grapheme) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *data-ah
<span id="L541" class="LineNr">541 </span>  <span class="PreProc">var</span> data/<span class="muRegEdx">edx</span>: (addr array grapheme) <span class="Special">&lt;-</span> copy _data
<span id="L542" class="LineNr">542 </span>  <span class="PreProc">var</span> top-addr/<span class="muRegEcx">ecx</span>: (addr int) <span class="Special">&lt;-</span> get self, top
<span id="L543" class="LineNr">543 </span>  <span class="PreProc">var</span> i/<span class="muRegEbx">ebx</span>: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
<span id="L544" class="LineNr">544 </span>  <span class="PreProc">var</span> result/eax: boolean <span class="Special">&lt;-</span> copy <span class="Constant">1</span>/true
<span id="L545" class="LineNr">545 </span>  $grapheme-stack-is-integer?:<span class="PreProc">loop</span>: <span class="Delimiter">{</span>
<span id="L546" class="LineNr">546 </span>    compare i, *top-addr
<span id="L547" class="LineNr">547 </span>    <span class="PreProc">break-if-&gt;=</span>
<span id="L548" class="LineNr">548 </span>    <span class="PreProc">var</span> g/<span class="muRegEdx">edx</span>: (addr grapheme) <span class="Special">&lt;-</span> index data, i
<span id="L549" class="LineNr">549 </span>    result <span class="Special">&lt;-</span> <a href='../126write-int-decimal.subx.html#L327'>decimal-digit?</a> *g
<span id="L550" class="LineNr">550 </span>    compare result, <span class="Constant">0</span>/false
<span id="L551" class="LineNr">551 </span>    <span class="PreProc">break-if-=</span>
<span id="L552" class="LineNr">552 </span>    i <span class="Special">&lt;-</span> increment
<span id="L553" class="LineNr">553 </span>    <span class="PreProc">loop</span>
<span id="L554" class="LineNr">554 </span>  <span class="Delimiter">}</span>
<span id="L555" class="LineNr">555 </span>  <span class="PreProc">return</span> result
<span id="L556" class="LineNr">556 </span><span class="Delimiter">}</span>
</pre>
</body>
</html>
<!-- vim: set foldmethod=manual : -->