diff options
Diffstat (limited to 'html/edit/004-programming-environment.mu.html')
-rw-r--r-- | html/edit/004-programming-environment.mu.html | 28 |
1 files changed, 14 insertions, 14 deletions
diff --git a/html/edit/004-programming-environment.mu.html b/html/edit/004-programming-environment.mu.html index 14c9af6f..72593aa7 100644 --- a/html/edit/004-programming-environment.mu.html +++ b/html/edit/004-programming-environment.mu.html @@ -71,7 +71,7 @@ if ('onhashchange' in window) { <span id="L8" class="LineNr"> 8 </span> open-console <span id="L9" class="LineNr"> 9 </span> <a href='../081print.mu.html#L33'>clear-screen</a> <span class="Constant">0/screen</span> <span class="Comment"># non-scrolling app</span> <span id="L10" class="LineNr"> 10 </span> env:&:environment <span class="Special"><-</span> <a href='004-programming-environment.mu.html#L21'>new-programming-environment</a> <span class="Constant">0/filesystem</span>, <span class="Constant">0/screen</span> -<span id="L11" class="LineNr"> 11 </span> <a href='004-programming-environment.mu.html#L400'>render-all</a> <span class="Constant">0/screen</span>, env, <a href='001-editor.mu.html#L122'>render</a> +<span id="L11" class="LineNr"> 11 </span> <a href='004-programming-environment.mu.html#L400'>render-all</a> <span class="Constant">0/screen</span>, env, <a href='001-editor.mu.html#L107'>render</a> <span id="L12" class="LineNr"> 12 </span> <a href='004-programming-environment.mu.html#L39'>event-loop</a> <span class="Constant">0/screen</span>, <span class="Constant">0/console</span>, env, <span class="Constant">0/filesystem</span> <span id="L13" class="LineNr"> 13 </span>] <span id="L14" class="LineNr"> 14 </span> @@ -84,7 +84,7 @@ if ('onhashchange' in window) { <span id="L21" class="LineNr"> 21 </span><span class="muRecipe">def</span> <a href='004-programming-environment.mu.html#L21'>new-programming-environment</a> <a href='../088file.mu.html#L11'>resources</a>:&:<a href='../088file.mu.html#L11'>resources</a>, <a href='../081print.mu.html#L4'>screen</a>:&:<a href='../081print.mu.html#L4'>screen</a>, test-sandbox-editor-contents:text<span class="muRecipe"> -> </span>result:&:environment [ <span id="L22" class="LineNr"> 22 </span> <span class="Constant">local-scope</span> <span id="L23" class="LineNr"> 23 </span> <span class="Constant">load-ingredients</span> -<span id="L24" class="LineNr"> 24 </span> width:num <span class="Special"><-</span> <a href='../081print.mu.html#L712'>screen-width</a> <a href='../081print.mu.html#L4'>screen</a> +<span id="L24" class="LineNr"> 24 </span> width:num <span class="Special"><-</span> <a href='../081print.mu.html#L735'>screen-width</a> <a href='../081print.mu.html#L4'>screen</a> <span id="L25" class="LineNr"> 25 </span> result <span class="Special"><-</span> new <span class="Constant">environment:type</span> <span id="L26" class="LineNr"> 26 </span> <span class="Comment"># recipe editor on the left</span> <span id="L27" class="LineNr"> 27 </span> initial-recipe-contents:text <span class="Special"><-</span> <a href='../088file.mu.html#L38'>slurp</a> <a href='../088file.mu.html#L11'>resources</a>, <span class="Constant">[lesson/recipes.mu]</span> <span class="Comment"># ignore errors</span> @@ -177,12 +177,12 @@ if ('onhashchange' in window) { <span id="L114" class="LineNr">114 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Delimiter">{</span> <span id="L115" class="LineNr">115 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="muControl">break-unless</span> render-recipes-on-no-more-events? <span id="L116" class="LineNr">116 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> render-recipes-on-no-more-events? <span class="Special"><-</span> copy <span class="Constant">0/false</span> -<span id="L117" class="LineNr">117 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='../081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='004-programming-environment.mu.html#L432'>render-recipes</a> <a href='../081print.mu.html#L4'>screen</a>, env, <a href='001-editor.mu.html#L122'>render</a> +<span id="L117" class="LineNr">117 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='../081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='004-programming-environment.mu.html#L432'>render-recipes</a> <a href='../081print.mu.html#L4'>screen</a>, env, <a href='001-editor.mu.html#L107'>render</a> <span id="L118" class="LineNr">118 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> <span id="L119" class="LineNr">119 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Delimiter">{</span> <span id="L120" class="LineNr">120 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="muControl">break-unless</span> render-sandboxes-on-no-more-events? <span id="L121" class="LineNr">121 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> render-sandboxes-on-no-more-events? <span class="Special"><-</span> copy <span class="Constant">0/false</span> -<span id="L122" class="LineNr">122 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='../081print.mu.html#L4'>screen</a> <span class="Special"><-</span> render-sandbox-side <a href='../081print.mu.html#L4'>screen</a>, env, <a href='001-editor.mu.html#L122'>render</a> +<span id="L122" class="LineNr">122 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='../081print.mu.html#L4'>screen</a> <span class="Special"><-</span> render-sandbox-side <a href='../081print.mu.html#L4'>screen</a>, env, <a href='001-editor.mu.html#L107'>render</a> <span id="L123" class="LineNr">123 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> <span id="L124" class="LineNr">124 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> <span id="L125" class="LineNr">125 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='../081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='004-programming-environment.mu.html#L466'>update-cursor</a> <a href='../081print.mu.html#L4'>screen</a>, recipes, current-sandbox, sandbox-in-focus?, env @@ -195,7 +195,7 @@ if ('onhashchange' in window) { <span id="L132" class="LineNr">132 </span> <span class="Constant">local-scope</span> <span id="L133" class="LineNr">133 </span> <span class="Constant">load-ingredients</span> <span id="L134" class="LineNr">134 </span> <a href='../081print.mu.html#L33'>clear-screen</a> <a href='../081print.mu.html#L4'>screen</a> <span class="Comment"># update screen dimensions</span> -<span id="L135" class="LineNr">135 </span> width:num <span class="Special"><-</span> <a href='../081print.mu.html#L712'>screen-width</a> <a href='../081print.mu.html#L4'>screen</a> +<span id="L135" class="LineNr">135 </span> width:num <span class="Special"><-</span> <a href='../081print.mu.html#L735'>screen-width</a> <a href='../081print.mu.html#L4'>screen</a> <span id="L136" class="LineNr">136 </span> divider:num, _ <span class="Special"><-</span> divide-with-remainder width,<span class="Constant"> 2</span> <span id="L137" class="LineNr">137 </span> <span class="Comment"># update recipe editor</span> <span id="L138" class="LineNr">138 </span> recipes:&:editor <span class="Special"><-</span> get *env, <span class="Constant">recipes:offset</span> @@ -223,7 +223,7 @@ if ('onhashchange' in window) { <span id="L160" class="LineNr">160 </span> <span class="Constant">load-ingredients</span> <span id="L161" class="LineNr">161 </span> <span class="muControl">return-unless</span> editor, <span class="Constant">1/top</span>, <span class="Constant">0/left</span> <span id="L162" class="LineNr">162 </span> left:num <span class="Special"><-</span> get *editor, <span class="Constant">left:offset</span> -<span id="L163" class="LineNr">163 </span> <a href='../081print.mu.html#L725'>screen-height</a>:num <span class="Special"><-</span> <a href='../081print.mu.html#L725'>screen-height</a> <a href='../081print.mu.html#L4'>screen</a> +<span id="L163" class="LineNr">163 </span> <a href='../081print.mu.html#L748'>screen-height</a>:num <span class="Special"><-</span> <a href='../081print.mu.html#L748'>screen-height</a> <a href='../081print.mu.html#L4'>screen</a> <span id="L164" class="LineNr">164 </span> right:num <span class="Special"><-</span> get *editor, <span class="Constant">right:offset</span> <span id="L165" class="LineNr">165 </span> curr:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get *editor, <span class="Constant">top-of-screen:offset</span> <span id="L166" class="LineNr">166 </span> <a href='../065duplex_list.mu.html#L36'>prev</a>:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> copy curr <span class="Comment"># just in case curr becomes null and we can't compute prev</span> @@ -243,7 +243,7 @@ if ('onhashchange' in window) { <span id="L180" class="LineNr">180 </span> <span class="Delimiter">{</span> <span id="L181" class="LineNr">181 </span><span class="Constant"> </span><span class="Conceal">¦</span><span class="Constant"> +next-character</span> <span id="L182" class="LineNr">182 </span> <span class="Conceal">¦</span> <span class="muControl">break-unless</span> curr -<span id="L183" class="LineNr">183 </span> <span class="Conceal">¦</span> off-screen?:bool <span class="Special"><-</span> greater-or-equal row, <a href='../081print.mu.html#L725'>screen-height</a> +<span id="L183" class="LineNr">183 </span> <span class="Conceal">¦</span> off-screen?:bool <span class="Special"><-</span> greater-or-equal row, <a href='../081print.mu.html#L748'>screen-height</a> <span id="L184" class="LineNr">184 </span> <span class="Conceal">¦</span> <span class="muControl">break-if</span> off-screen? <span id="L185" class="LineNr">185 </span> <span class="Conceal">¦</span> <span class="Comment"># if we find old-before-cursor still on the new resized screen, update</span> <span id="L186" class="LineNr">186 </span> <span class="Conceal">¦</span> <span class="Comment"># editor.cursor-row and editor.cursor-column based on</span> @@ -338,7 +338,7 @@ if ('onhashchange' in window) { <span id="L275" class="LineNr">275 </span> <span class="Conceal">¦</span> ] <span id="L276" class="LineNr">276 </span> ] <span id="L277" class="LineNr">277 </span> env:&:environment <span class="Special"><-</span> <a href='004-programming-environment.mu.html#L21'>new-programming-environment</a> <a href='../088file.mu.html#L11'>resources</a>, <a href='../081print.mu.html#L4'>screen</a>, <span class="Constant">[def]</span> <span class="Comment"># contents of sandbox</span> -<span id="L278" class="LineNr">278 </span> <a href='004-programming-environment.mu.html#L400'>render-all</a> <a href='../081print.mu.html#L4'>screen</a>, env, <a href='001-editor.mu.html#L122'>render</a> +<span id="L278" class="LineNr">278 </span> <a href='004-programming-environment.mu.html#L400'>render-all</a> <a href='../081print.mu.html#L4'>screen</a>, env, <a href='001-editor.mu.html#L107'>render</a> <span id="L279" class="LineNr">279 </span> <span class="Comment"># type one letter in each of them</span> <span id="L280" class="LineNr">280 </span> assume-console [ <span id="L281" class="LineNr">281 </span> <span class="Conceal">¦</span> left-click<span class="Constant"> 1</span>,<span class="Constant"> 1</span> @@ -388,7 +388,7 @@ if ('onhashchange' in window) { <span id="L325" class="LineNr">325 </span> <span class="Conceal">¦</span> ] <span id="L326" class="LineNr">326 </span> ] <span id="L327" class="LineNr">327 </span> env:&:environment <span class="Special"><-</span> <a href='004-programming-environment.mu.html#L21'>new-programming-environment</a> <a href='../088file.mu.html#L11'>resources</a>, <a href='../081print.mu.html#L4'>screen</a>, <span class="Constant">[def]</span> -<span id="L328" class="LineNr">328 </span> <a href='004-programming-environment.mu.html#L400'>render-all</a> <a href='../081print.mu.html#L4'>screen</a>, env, <a href='001-editor.mu.html#L122'>render</a> +<span id="L328" class="LineNr">328 </span> <a href='004-programming-environment.mu.html#L400'>render-all</a> <a href='../081print.mu.html#L4'>screen</a>, env, <a href='001-editor.mu.html#L107'>render</a> <span id="L329" class="LineNr">329 </span> <span class="Comment"># initialize programming environment and highlight cursor</span> <span id="L330" class="LineNr">330 </span> assume-console <span class="Constant">[]</span> <span id="L331" class="LineNr">331 </span> run [ @@ -433,7 +433,7 @@ if ('onhashchange' in window) { <span id="L370" class="LineNr">370 </span> test-sandbox-editor-contents:text <span class="Special"><-</span> new <span class="Constant">[abc</span> <span id="L371" class="LineNr">371 </span><span class="Constant">def]</span> <span id="L372" class="LineNr">372 </span> env:&:environment <span class="Special"><-</span> <a href='004-programming-environment.mu.html#L21'>new-programming-environment</a> <a href='../088file.mu.html#L11'>resources</a>, <a href='../081print.mu.html#L4'>screen</a>, test-sandbox-editor-contents -<span id="L373" class="LineNr">373 </span> <a href='004-programming-environment.mu.html#L400'>render-all</a> <a href='../081print.mu.html#L4'>screen</a>, env, <a href='001-editor.mu.html#L122'>render</a> +<span id="L373" class="LineNr">373 </span> <a href='004-programming-environment.mu.html#L400'>render-all</a> <a href='../081print.mu.html#L4'>screen</a>, env, <a href='001-editor.mu.html#L107'>render</a> <span id="L374" class="LineNr">374 </span> screen-should-contain [ <span id="L375" class="LineNr">375 </span> <span class="Conceal">¦</span><span class="Constant"> . run (F4) .</span> <span id="L376" class="LineNr">376 </span> <span class="Conceal">¦</span><span class="Constant"> . ╎abc .</span> @@ -467,7 +467,7 @@ if ('onhashchange' in window) { <span id="L404" class="LineNr">404 </span> old-top-idx:num <span class="Special"><-</span> <a href='../081print.mu.html#L493'>save-top-idx</a> <a href='../081print.mu.html#L4'>screen</a> <span id="L405" class="LineNr">405 </span> <span class="Comment"># top menu</span> <span id="L406" class="LineNr">406 </span> trace<span class="Constant"> 11</span>, <span class="Constant">[app]</span>, <span class="Constant">[render top menu]</span> -<span id="L407" class="LineNr">407 </span> width:num <span class="Special"><-</span> <a href='../081print.mu.html#L712'>screen-width</a> <a href='../081print.mu.html#L4'>screen</a> +<span id="L407" class="LineNr">407 </span> width:num <span class="Special"><-</span> <a href='../081print.mu.html#L735'>screen-width</a> <a href='../081print.mu.html#L4'>screen</a> <span id="L408" class="LineNr">408 </span> <a href='002-typing.mu.html#L1060'>draw-horizontal</a> <a href='../081print.mu.html#L4'>screen</a>,<span class="Constant"> 0</span>, <span class="Constant">0/left</span>, width, <span class="Constant">32/space</span>, <span class="Constant">0/black</span>, <span class="Constant">238/grey</span> <span id="L409" class="LineNr">409 </span> button-start:num <span class="Special"><-</span> subtract width,<span class="Constant"> 20</span> <span id="L410" class="LineNr">410 </span> button-on-screen?:bool <span class="Special"><-</span> greater-or-equal button-start,<span class="Constant"> 0</span> @@ -477,7 +477,7 @@ if ('onhashchange' in window) { <span id="L414" class="LineNr">414 </span> <span class="Comment"># dotted line down the middle</span> <span id="L415" class="LineNr">415 </span> trace<span class="Constant"> 11</span>, <span class="Constant">[app]</span>, <span class="Constant">[render divider]</span> <span id="L416" class="LineNr">416 </span> divider:num, _ <span class="Special"><-</span> divide-with-remainder width,<span class="Constant"> 2</span> -<span id="L417" class="LineNr">417 </span> height:num <span class="Special"><-</span> <a href='../081print.mu.html#L725'>screen-height</a> <a href='../081print.mu.html#L4'>screen</a> +<span id="L417" class="LineNr">417 </span> height:num <span class="Special"><-</span> <a href='../081print.mu.html#L748'>screen-height</a> <a href='../081print.mu.html#L4'>screen</a> <span id="L418" class="LineNr">418 </span> <a href='004-programming-environment.mu.html#L500'>draw-vertical</a> <a href='../081print.mu.html#L4'>screen</a>, divider, <span class="Constant">1/top</span>, height, <span class="Constant">9482/vertical-dotted</span> <span id="L419" class="LineNr">419 </span> <span class="Comment">#</span> <span id="L420" class="LineNr">420 </span> <a href='../081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='004-programming-environment.mu.html#L432'>render-recipes</a> <a href='../081print.mu.html#L4'>screen</a>, env, render-editor @@ -507,7 +507,7 @@ if ('onhashchange' in window) { <span id="L444" class="LineNr">444 </span> <span class="Comment"># draw dotted line after recipes</span> <span id="L445" class="LineNr">445 </span> <a href='002-typing.mu.html#L1060'>draw-horizontal</a> <a href='../081print.mu.html#L4'>screen</a>, row, left, right, <span class="Constant">9480/horizontal-dotted</span> <span id="L446" class="LineNr">446 </span> row <span class="Special"><-</span> add row,<span class="Constant"> 1</span> -<span id="L447" class="LineNr">447 </span> <a href='001-editor.mu.html#L222'>clear-screen-from</a> <a href='../081print.mu.html#L4'>screen</a>, row, left, left, right +<span id="L447" class="LineNr">447 </span> <a href='001-editor.mu.html#L207'>clear-screen-from</a> <a href='../081print.mu.html#L4'>screen</a>, row, left, left, right <span id="L448" class="LineNr">448 </span>] <span id="L449" class="LineNr">449 </span> <span id="L450" class="LineNr">450 </span><span class="Comment"># replaced in a later layer</span> @@ -523,7 +523,7 @@ if ('onhashchange' in window) { <span id="L460" class="LineNr">460 </span> <span class="Comment"># draw solid line after code (you'll see why in later layers)</span> <span id="L461" class="LineNr">461 </span> <a href='002-typing.mu.html#L1060'>draw-horizontal</a> <a href='../081print.mu.html#L4'>screen</a>, row, left, right <span id="L462" class="LineNr">462 </span> row <span class="Special"><-</span> add row,<span class="Constant"> 1</span> -<span id="L463" class="LineNr">463 </span> <a href='001-editor.mu.html#L222'>clear-screen-from</a> <a href='../081print.mu.html#L4'>screen</a>, row, left, left, right +<span id="L463" class="LineNr">463 </span> <a href='001-editor.mu.html#L207'>clear-screen-from</a> <a href='../081print.mu.html#L4'>screen</a>, row, left, left, right <span id="L464" class="LineNr">464 </span>] <span id="L465" class="LineNr">465 </span> <span id="L466" class="LineNr">466 </span><span class="muRecipe">def</span> <a href='004-programming-environment.mu.html#L466'>update-cursor</a> <a href='../081print.mu.html#L4'>screen</a>:&:<a href='../081print.mu.html#L4'>screen</a>, recipes:&:editor, current-sandbox:&:editor, sandbox-in-focus?:bool, env:&:environment<span class="muRecipe"> -> </span><a href='../081print.mu.html#L4'>screen</a>:&:<a href='../081print.mu.html#L4'>screen</a> [ |