.

author: Kartik Agaram <vc@akkartik.com> 2021-08-15 23:44:43 -0700
committer: Kartik Agaram <vc@akkartik.com> 2021-08-15 23:44:43 -0700
commit: 52e3ea8a4bec791e4c2d64fb8aca9e26cdf60f25 (patch)
tree: 331a98b558b8d638348b3e93ce4ef036ae70130c /html/apps/ex11.mu.html
parent: 8765064d6910c65ea5ed5526b27e9752df000c3d (diff)
download: mu-52e3ea8a4bec791e4c2d64fb8aca9e26cdf60f25.tar.gz
1 files changed, 26 insertions, 26 deletions
diff --git a/html/apps/ex11.mu.html b/html/apps/ex11.mu.html
index e4ff1600..70b84f9e 100644
--- a/html/apps/ex11.mu.html
+++ b/html/apps/ex11.mu.html
@@ -1,35 +1,35 @@
-<!DOCTYPE html>
+<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
 <html>
 <head>
-<meta charset="UTF-8">
+<meta http-equiv="content-type" content="text/html; charset=UTF-8">
 <title>Mu - apps/ex11.mu</title>
-<meta name="Generator" content="Vim/8.2">
-<meta name="plugin-version" content="vim8.1_v2">
+<meta name="Generator" content="Vim/8.1">
+<meta name="plugin-version" content="vim8.1_v1">
 <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="settings" content="number_lines,use_css,pre_wrap,no_foldcolumn,expand_tabs,line_ids,prevent_copy=">
 <meta name="colorscheme" content="minimal-light">
-<style>
+<style type="text/css">
 <!--
 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; }
+.Special { color: #ff6060; }
 .LineNr { }
+.Constant { color: #008787; }
+.muRegEbx { color: #5f00ff; }
 .muRegEsi { color: #005faf; }
 .muRegEdi { color: #00af00; }
-.Constant { color: #008787; }
-.muFunction { color: #af5f00; text-decoration: underline; }
+.muRegEcx { color: #870000; }
 .Delimiter { color: #c000c0; }
+.muFunction { color: #af5f00; text-decoration: underline; }
 .muComment { color: #005faf; }
-.Special { color: #ff6060; }
 -->
 </style>
 
-<script>
+<script type='text/javascript'>
 <!--
 
 /* function to open any folds containing a jumped-to line before jumping to it */
@@ -101,13 +101,13 @@ if ('onhashchange' in window) {
 <span id="L38" class="LineNr"> 38 </span>  <a href='../500fake-screen.mu.html#L251'>clear-screen</a> <a href='../500fake-screen.mu.html#L14'>screen</a>
 <span id="L39" class="LineNr"> 39 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='ex11.mu.html#L25'>environment</a>) <span class="Special">&lt;-</span> copy _self
 <span id="L40" class="LineNr"> 40 </span>  <span class="PreProc">var</span> tmp-ah/<span class="muRegEcx">ecx</span>: (addr handle <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> get self, p0
-<span id="L41" class="LineNr"> 41 </span>  <span class="PreProc">var</span> tmp/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *tmp-ah
+<span id="L41" class="LineNr"> 41 </span>  <span class="PreProc">var</span> tmp/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L235'>lookup</a> *tmp-ah
 <span id="L42" class="LineNr"> 42 </span>  <span class="PreProc">var</span> p0/<span class="muRegEbx">ebx</span>: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> copy tmp
 <span id="L43" class="LineNr"> 43 </span>  tmp-ah <span class="Special">&lt;-</span> get self, p1
-<span id="L44" class="LineNr"> 44 </span>  tmp <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *tmp-ah
+<span id="L44" class="LineNr"> 44 </span>  tmp <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L235'>lookup</a> *tmp-ah
 <span id="L45" class="LineNr"> 45 </span>  <span class="PreProc">var</span> p1/<span class="muRegEdx">edx</span>: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> copy tmp
 <span id="L46" class="LineNr"> 46 </span>  tmp-ah <span class="Special">&lt;-</span> get self, p2
-<span id="L47" class="LineNr"> 47 </span>  tmp <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *tmp-ah
+<span id="L47" class="LineNr"> 47 </span>  tmp <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L235'>lookup</a> *tmp-ah
 <span id="L48" class="LineNr"> 48 </span>  <span class="PreProc">var</span> p2/<span class="muRegEcx">ecx</span>: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> copy tmp
 <span id="L49" class="LineNr"> 49 </span>  <span class="muComment"># control lines</span>
 <span id="L50" class="LineNr"> 50 </span>  <a href='ex11.mu.html#L216'>line</a>    <a href='../500fake-screen.mu.html#L14'>screen</a>, p0, p1,                 <span class="Constant">7</span>/color
@@ -120,7 +120,7 @@ if ('onhashchange' in window) {
 <span id="L57" class="LineNr"> 57 </span>  <a href='ex11.mu.html#L226'>disc</a>    <a href='../500fake-screen.mu.html#L14'>screen</a>, p2,           <span class="Constant">3</span>/radius, <span class="Constant">7</span>/color   <span class="Constant">0xf</span>/border
 <span id="L58" class="LineNr"> 58 </span>  <span class="muComment"># cursor last of all</span>
 <span id="L59" class="LineNr"> 59 </span>  <span class="PreProc">var</span> cursor-ah/eax: (addr handle <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> get self, <a href='ex11.mu.html#L77'>cursor</a>
-<span id="L60" class="LineNr"> 60 </span>  <span class="PreProc">var</span> <a href='ex11.mu.html#L77'>cursor</a>/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *cursor-ah
+<span id="L60" class="LineNr"> 60 </span>  <span class="PreProc">var</span> <a href='ex11.mu.html#L77'>cursor</a>/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L235'>lookup</a> *cursor-ah
 <span id="L61" class="LineNr"> 61 </span>  <a href='ex11.mu.html#L77'>cursor</a> <a href='../500fake-screen.mu.html#L14'>screen</a>, <a href='ex11.mu.html#L77'>cursor</a>, <span class="Constant">0xa</span>/side, <span class="Constant">3</span>/color
 <span id="L62" class="LineNr"> 62 </span><span class="Delimiter">}</span>
 <span id="L63" class="LineNr"> 63 </span>
@@ -205,21 +205,21 @@ if ('onhashchange' in window) {
 <span id="L142" class="LineNr">142 </span>  <span class="PreProc">var</span> p1-ah/<span class="muRegEdx">edx</span>: (addr handle <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> get self, p1
 <span id="L143" class="LineNr">143 </span>  <span class="PreProc">var</span> p2-ah/<span class="muRegEbx">ebx</span>: (addr handle <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> get self, p2
 <span id="L144" class="LineNr">144 </span>  <span class="Delimiter">{</span>
-<span id="L145" class="LineNr">145 </span>    <span class="PreProc">var</span> p0?/eax: boolean <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L448'>handle-equal?</a> *p0-ah, *cursor-ah
+<span id="L145" class="LineNr">145 </span>    <span class="PreProc">var</span> p0?/eax: boolean <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L460'>handle-equal?</a> *p0-ah, *cursor-ah
 <span id="L146" class="LineNr">146 </span>    compare p0?, <span class="Constant">0</span>/false
 <span id="L147" class="LineNr">147 </span>    <span class="PreProc">break-if-=</span>
 <span id="L148" class="LineNr">148 </span>    copy-object p1-ah, cursor-ah
 <span id="L149" class="LineNr">149 </span>    <span class="PreProc">return</span>
 <span id="L150" class="LineNr">150 </span>  <span class="Delimiter">}</span>
 <span id="L151" class="LineNr">151 </span>  <span class="Delimiter">{</span>
-<span id="L152" class="LineNr">152 </span>    <span class="PreProc">var</span> p1?/eax: boolean <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L448'>handle-equal?</a> *p1-ah, *cursor-ah
+<span id="L152" class="LineNr">152 </span>    <span class="PreProc">var</span> p1?/eax: boolean <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L460'>handle-equal?</a> *p1-ah, *cursor-ah
 <span id="L153" class="LineNr">153 </span>    compare p1?, <span class="Constant">0</span>/false
 <span id="L154" class="LineNr">154 </span>    <span class="PreProc">break-if-=</span>
 <span id="L155" class="LineNr">155 </span>    copy-object p2-ah, cursor-ah
 <span id="L156" class="LineNr">156 </span>    <span class="PreProc">return</span>
 <span id="L157" class="LineNr">157 </span>  <span class="Delimiter">}</span>
 <span id="L158" class="LineNr">158 </span>  <span class="Delimiter">{</span>
-<span id="L159" class="LineNr">159 </span>    <span class="PreProc">var</span> p2?/eax: boolean <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L448'>handle-equal?</a> *p2-ah, *cursor-ah
+<span id="L159" class="LineNr">159 </span>    <span class="PreProc">var</span> p2?/eax: boolean <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L460'>handle-equal?</a> *p2-ah, *cursor-ah
 <span id="L160" class="LineNr">160 </span>    compare p2?, <span class="Constant">0</span>/false
 <span id="L161" class="LineNr">161 </span>    <span class="PreProc">break-if-=</span>
 <span id="L162" class="LineNr">162 </span>    copy-object p0-ah, cursor-ah
@@ -231,7 +231,7 @@ if ('onhashchange' in window) {
 <span id="L168" class="LineNr">168 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='ex11.mu.html#L168'>cursor-left</a></span> _self: (addr <a href='ex11.mu.html#L25'>environment</a>) <span class="Delimiter">{</span>
 <span id="L169" class="LineNr">169 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='ex11.mu.html#L25'>environment</a>) <span class="Special">&lt;-</span> copy _self
 <span id="L170" class="LineNr">170 </span>  <span class="PreProc">var</span> cursor-ah/<span class="muRegEsi">esi</span>: (addr handle <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> get self, <a href='ex11.mu.html#L77'>cursor</a>
-<span id="L171" class="LineNr">171 </span>  <span class="PreProc">var</span> <a href='ex11.mu.html#L77'>cursor</a>/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *cursor-ah
+<span id="L171" class="LineNr">171 </span>  <span class="PreProc">var</span> <a href='ex11.mu.html#L77'>cursor</a>/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L235'>lookup</a> *cursor-ah
 <span id="L172" class="LineNr">172 </span>  <span class="PreProc">var</span> cursor-x/eax: (addr int) <span class="Special">&lt;-</span> get <a href='ex11.mu.html#L77'>cursor</a>, x
 <span id="L173" class="LineNr">173 </span>  compare *cursor-x, <span class="Constant">0x20</span>
 <span id="L174" class="LineNr">174 </span>  <span class="Delimiter">{</span>
@@ -243,7 +243,7 @@ if ('onhashchange' in window) {
 <span id="L180" class="LineNr">180 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='ex11.mu.html#L180'>cursor-right</a></span> _self: (addr <a href='ex11.mu.html#L25'>environment</a>) <span class="Delimiter">{</span>
 <span id="L181" class="LineNr">181 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='ex11.mu.html#L25'>environment</a>) <span class="Special">&lt;-</span> copy _self
 <span id="L182" class="LineNr">182 </span>  <span class="PreProc">var</span> cursor-ah/<span class="muRegEsi">esi</span>: (addr handle <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> get self, <a href='ex11.mu.html#L77'>cursor</a>
-<span id="L183" class="LineNr">183 </span>  <span class="PreProc">var</span> <a href='ex11.mu.html#L77'>cursor</a>/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *cursor-ah
+<span id="L183" class="LineNr">183 </span>  <span class="PreProc">var</span> <a href='ex11.mu.html#L77'>cursor</a>/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L235'>lookup</a> *cursor-ah
 <span id="L184" class="LineNr">184 </span>  <span class="PreProc">var</span> cursor-x/eax: (addr int) <span class="Special">&lt;-</span> get <a href='ex11.mu.html#L77'>cursor</a>, x
 <span id="L185" class="LineNr">185 </span>  compare *cursor-x, <span class="Constant">0x3f0</span>
 <span id="L186" class="LineNr">186 </span>  <span class="Delimiter">{</span>
@@ -255,7 +255,7 @@ if ('onhashchange' in window) {
 <span id="L192" class="LineNr">192 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='ex11.mu.html#L192'>cursor-up</a></span> _self: (addr <a href='ex11.mu.html#L25'>environment</a>) <span class="Delimiter">{</span>
 <span id="L193" class="LineNr">193 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='ex11.mu.html#L25'>environment</a>) <span class="Special">&lt;-</span> copy _self
 <span id="L194" class="LineNr">194 </span>  <span class="PreProc">var</span> cursor-ah/<span class="muRegEsi">esi</span>: (addr handle <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> get self, <a href='ex11.mu.html#L77'>cursor</a>
-<span id="L195" class="LineNr">195 </span>  <span class="PreProc">var</span> <a href='ex11.mu.html#L77'>cursor</a>/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *cursor-ah
+<span id="L195" class="LineNr">195 </span>  <span class="PreProc">var</span> <a href='ex11.mu.html#L77'>cursor</a>/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L235'>lookup</a> *cursor-ah
 <span id="L196" class="LineNr">196 </span>  <span class="PreProc">var</span> cursor-y/eax: (addr int) <span class="Special">&lt;-</span> get <a href='ex11.mu.html#L77'>cursor</a>, y
 <span id="L197" class="LineNr">197 </span>  compare *cursor-y, <span class="Constant">0x20</span>
 <span id="L198" class="LineNr">198 </span>  <span class="Delimiter">{</span>
@@ -267,7 +267,7 @@ if ('onhashchange' in window) {
 <span id="L204" class="LineNr">204 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='ex11.mu.html#L204'>cursor-down</a></span> _self: (addr <a href='ex11.mu.html#L25'>environment</a>) <span class="Delimiter">{</span>
 <span id="L205" class="LineNr">205 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='ex11.mu.html#L25'>environment</a>) <span class="Special">&lt;-</span> copy _self
 <span id="L206" class="LineNr">206 </span>  <span class="PreProc">var</span> cursor-ah/<span class="muRegEsi">esi</span>: (addr handle <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> get self, <a href='ex11.mu.html#L77'>cursor</a>
-<span id="L207" class="LineNr">207 </span>  <span class="PreProc">var</span> <a href='ex11.mu.html#L77'>cursor</a>/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *cursor-ah
+<span id="L207" class="LineNr">207 </span>  <span class="PreProc">var</span> <a href='ex11.mu.html#L77'>cursor</a>/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L235'>lookup</a> *cursor-ah
 <span id="L208" class="LineNr">208 </span>  <span class="PreProc">var</span> cursor-y/eax: (addr int) <span class="Special">&lt;-</span> get <a href='ex11.mu.html#L77'>cursor</a>, y
 <span id="L209" class="LineNr">209 </span>  compare *cursor-y, <span class="Constant">0x2f0</span>
 <span id="L210" class="LineNr">210 </span>  <span class="Delimiter">{</span>
@@ -297,15 +297,15 @@ if ('onhashchange' in window) {
 <span id="L234" class="LineNr">234 </span>  <span class="PreProc">var</span> self/<span class="muRegEsi">esi</span>: (addr <a href='ex11.mu.html#L25'>environment</a>) <span class="Special">&lt;-</span> copy _self
 <span id="L235" class="LineNr">235 </span>  <span class="PreProc">var</span> p0-ah/eax: (addr handle <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> get self, p0
 <span id="L236" class="LineNr">236 </span>  <a href='../120allocate.subx.html#L43'>allocate</a> p0-ah
-<span id="L237" class="LineNr">237 </span>  <span class="PreProc">var</span> p0/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *p0-ah
+<span id="L237" class="LineNr">237 </span>  <span class="PreProc">var</span> p0/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L235'>lookup</a> *p0-ah
 <span id="L238" class="LineNr">238 </span>  <a href='ex11.mu.html#L253'>initialize-point</a> p0, x0 y0
 <span id="L239" class="LineNr">239 </span>  <span class="PreProc">var</span> p1-ah/eax: (addr handle <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> get self, p1
 <span id="L240" class="LineNr">240 </span>  <a href='../120allocate.subx.html#L43'>allocate</a> p1-ah
-<span id="L241" class="LineNr">241 </span>  <span class="PreProc">var</span> p1/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *p1-ah
+<span id="L241" class="LineNr">241 </span>  <span class="PreProc">var</span> p1/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L235'>lookup</a> *p1-ah
 <span id="L242" class="LineNr">242 </span>  <a href='ex11.mu.html#L253'>initialize-point</a> p1, x1 y1
 <span id="L243" class="LineNr">243 </span>  <span class="PreProc">var</span> p2-ah/eax: (addr handle <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> get self, p2
 <span id="L244" class="LineNr">244 </span>  <a href='../120allocate.subx.html#L43'>allocate</a> p2-ah
-<span id="L245" class="LineNr">245 </span>  <span class="PreProc">var</span> p2/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L223'>lookup</a> *p2-ah
+<span id="L245" class="LineNr">245 </span>  <span class="PreProc">var</span> p2/eax: (addr <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> <a href='../120allocate.subx.html#L235'>lookup</a> *p2-ah
 <span id="L246" class="LineNr">246 </span>  <a href='ex11.mu.html#L253'>initialize-point</a> p2, x2 y2
 <span id="L247" class="LineNr">247 </span>  <span class="muComment"># cursor initially at p0</span>
 <span id="L248" class="LineNr">248 </span>  <span class="PreProc">var</span> cursor-ah/<span class="muRegEdi">edi</span>: (addr handle <a href='ex11.mu.html#L32'>point</a>) <span class="Special">&lt;-</span> get self, <a href='ex11.mu.html#L77'>cursor</a>
author	Kartik Agaram <vc@akkartik.com>	2021-08-15 23:44:43 -0700
committer	Kartik Agaram <vc@akkartik.com>	2021-08-15 23:44:43 -0700
commit	52e3ea8a4bec791e4c2d64fb8aca9e26cdf60f25 (patch)
tree	331a98b558b8d638348b3e93ce4ef036ae70130c /html/apps/ex11.mu.html
parent	8765064d6910c65ea5ed5526b27e9752df000c3d (diff)
download	mu-52e3ea8a4bec791e4c2d64fb8aca9e26cdf60f25.tar.gz