diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2016-12-26 21:23:55 -0800 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2016-12-26 21:23:55 -0800 |
| commit | fdfe34ded306526bd87568e50ac9a6e03c9c0594 (patch) | |
| tree | ee2ae7e7ef788213397f8b74c3be2d79379d276d /html/edit/001-editor.mu.html | |
| parent | e932f72d36e7b9217ea2e12c12dbd8ed9ea4747b (diff) | |
| download | mu-fdfe34ded306526bd87568e50ac9a6e03c9c0594.tar.gz | |
3715
Fix cross-links in html for the edit/ app. I originally thought I'd need to provide a commandline flag like --rel-path or something. But we need to support different relative paths in a single html file. So the solution instead is appropriately engineering the tags file.
Diffstat (limited to 'html/edit/001-editor.mu.html')
| -rw-r--r-- | html/edit/001-editor.mu.html | 116 |
1 files changed, 58 insertions, 58 deletions
diff --git a/html/edit/001-editor.mu.html b/html/edit/001-editor.mu.html index 3d19d408..e9523e13 100644 --- a/html/edit/001-editor.mu.html +++ b/html/edit/001-editor.mu.html @@ -65,19 +65,19 @@ if ('onhashchange' in window) { <span id="L6" class="LineNr"> 6 </span> <span class="Constant">local-scope</span> <span id="L7" class="LineNr"> 7 </span> <span class="Constant">load-ingredients</span> <span id="L8" class="LineNr"> 8 </span> open-console -<span id="L9" class="LineNr"> 9 </span> <a href='081print.mu.html#L623'>hide-screen</a> <span class="Constant">0/screen</span> -<span id="L10" class="LineNr"> 10 </span> new-editor text, <span class="Constant">0/left</span>, <span class="Constant">5/right</span> -<span id="L11" class="LineNr"> 11 </span> <a href='081print.mu.html#L631'>show-screen</a> <span class="Constant">0/screen</span> -<span id="L12" class="LineNr"> 12 </span> <a href='084console.mu.html#L88'>wait-for-event</a> <span class="Constant">0/console</span> +<span id="L9" class="LineNr"> 9 </span> <a href='../081print.mu.html#L623'>hide-screen</a> <span class="Constant">0/screen</span> +<span id="L10" class="LineNr"> 10 </span> <a href='001-editor.mu.html#L51'>new-editor</a> text, <span class="Constant">0/left</span>, <span class="Constant">5/right</span> +<span id="L11" class="LineNr"> 11 </span> <a href='../081print.mu.html#L631'>show-screen</a> <span class="Constant">0/screen</span> +<span id="L12" class="LineNr"> 12 </span> <a href='../084console.mu.html#L88'>wait-for-event</a> <span class="Constant">0/console</span> <span id="L13" class="LineNr"> 13 </span> close-console <span id="L14" class="LineNr"> 14 </span>] <span id="L15" class="LineNr"> 15 </span> <span id="L16" class="LineNr"> 16 </span><span class="muScenario">scenario</span> editor-renders-text-to-screen [ <span id="L17" class="LineNr"> 17 </span> <span class="Constant">local-scope</span> <span id="L18" class="LineNr"> 18 </span> assume-screen <span class="Constant">10/width</span>, <span class="Constant">5/height</span> -<span id="L19" class="LineNr"> 19 </span> e:&:editor <span class="Special"><-</span> new-editor <span class="Constant">[abc]</span>, <span class="Constant">0/left</span>, <span class="Constant">10/right</span> +<span id="L19" class="LineNr"> 19 </span> e:&:editor <span class="Special"><-</span> <a href='001-editor.mu.html#L51'>new-editor</a> <span class="Constant">[abc]</span>, <span class="Constant">0/left</span>, <span class="Constant">10/right</span> <span id="L20" class="LineNr"> 20 </span> run [ -<span id="L21" class="LineNr"> 21 </span> render <a href='081print.mu.html#L4'>screen</a>, e +<span id="L21" class="LineNr"> 21 </span> <a href='001-editor.mu.html#L122'>render</a> <a href='../081print.mu.html#L4'>screen</a>, e <span id="L22" class="LineNr"> 22 </span> ] <span id="L23" class="LineNr"> 23 </span> screen-should-contain [ <span id="L24" class="LineNr"> 24 </span> <span class="Comment"># top line of screen reserved for menu</span> @@ -107,7 +107,7 @@ if ('onhashchange' in window) { <span id="L48" class="LineNr"> 48 </span> <span id="L49" class="LineNr"> 49 </span><span class="Comment"># creates a new editor widget</span> <span id="L50" class="LineNr"> 50 </span><span class="Comment"># right is exclusive</span> -<span id="L51" class="LineNr"> 51 </span><span class="muRecipe">def</span> new-editor s:text, left:num, right:num<span class="muRecipe"> -> </span>result:&:editor [ +<span id="L51" class="LineNr"> 51 </span><span class="muRecipe">def</span> <a href='001-editor.mu.html#L51'>new-editor</a> s:text, left:num, right:num<span class="muRecipe"> -> </span>result:&:editor [ <span id="L52" class="LineNr"> 52 </span> <span class="Constant">local-scope</span> <span id="L53" class="LineNr"> 53 </span> <span class="Constant">load-ingredients</span> <span id="L54" class="LineNr"> 54 </span> <span class="Comment"># no clipping of bounds</span> @@ -124,11 +124,11 @@ if ('onhashchange' in window) { <span id="L65" class="LineNr"> 65 </span> *result <span class="Special"><-</span> put *result, <span class="Constant">data:offset</span>, init <span id="L66" class="LineNr"> 66 </span> *result <span class="Special"><-</span> put *result, <span class="Constant">top-of-screen:offset</span>, init <span id="L67" class="LineNr"> 67 </span> *result <span class="Special"><-</span> put *result, <span class="Constant">before-cursor:offset</span>, init -<span id="L68" class="LineNr"> 68 </span> result <span class="Special"><-</span> insert-text result, s +<span id="L68" class="LineNr"> 68 </span> result <span class="Special"><-</span> <a href='001-editor.mu.html#L72'>insert-text</a> result, s <span id="L69" class="LineNr"> 69 </span><span class="Constant"> <editor-initialization></span> <span id="L70" class="LineNr"> 70 </span>] <span id="L71" class="LineNr"> 71 </span> -<span id="L72" class="LineNr"> 72 </span><span class="muRecipe">def</span> insert-text editor:&:editor, text:text<span class="muRecipe"> -> </span>editor:&:editor [ +<span id="L72" class="LineNr"> 72 </span><span class="muRecipe">def</span> <a href='001-editor.mu.html#L72'>insert-text</a> editor:&:editor, text:text<span class="muRecipe"> -> </span>editor:&:editor [ <span id="L73" class="LineNr"> 73 </span> <span class="Constant">local-scope</span> <span id="L74" class="LineNr"> 74 </span> <span class="Constant">load-ingredients</span> <span id="L75" class="LineNr"> 75 </span> <span class="Comment"># early exit if text is empty</span> @@ -144,7 +144,7 @@ if ('onhashchange' in window) { <span id="L85" class="LineNr"> 85 </span> c:char <span class="Special"><-</span> index *text, idx <span id="L86" class="LineNr"> 86 </span> insert c, curr <span id="L87" class="LineNr"> 87 </span> <span class="Comment"># next iter</span> -<span id="L88" class="LineNr"> 88 </span> curr <span class="Special"><-</span> <a href='065duplex_list.mu.html#L29'>next</a> curr +<span id="L88" class="LineNr"> 88 </span> curr <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L29'>next</a> curr <span id="L89" class="LineNr"> 89 </span> idx <span class="Special"><-</span> add idx,<span class="Constant"> 1</span> <span id="L90" class="LineNr"> 90 </span> <span class="muControl">loop</span> <span id="L91" class="LineNr"> 91 </span> <span class="Delimiter">}</span> @@ -154,7 +154,7 @@ if ('onhashchange' in window) { <span id="L95" class="LineNr"> 95 </span> <span class="Constant">local-scope</span> <span id="L96" class="LineNr"> 96 </span> assume-screen <span class="Constant">5/width</span>, <span class="Constant">3/height</span> <span id="L97" class="LineNr"> 97 </span> run [ -<span id="L98" class="LineNr"> 98 </span> e:&:editor <span class="Special"><-</span> new-editor <span class="Constant">0/data</span>, <span class="Constant">2/left</span>, <span class="Constant">5/right</span> +<span id="L98" class="LineNr"> 98 </span> e:&:editor <span class="Special"><-</span> <a href='001-editor.mu.html#L51'>new-editor</a> <span class="Constant">0/data</span>, <span class="Constant">2/left</span>, <span class="Constant">5/right</span> <span id="L99" class="LineNr"> 99 </span> 2:editor/<span class="Special">raw</span> <span class="Special"><-</span> copy *e <span id="L100" class="LineNr">100 </span> ] <span id="L101" class="LineNr">101 </span> memory-should-contain [ @@ -178,17 +178,17 @@ if ('onhashchange' in window) { <span id="L119" class="LineNr">119 </span><span class="Comment"># Assumes cursor should be at coordinates (cursor-row, cursor-column) and</span> <span id="L120" class="LineNr">120 </span><span class="Comment"># updates before-cursor to match. Might also move coordinates if they're</span> <span id="L121" class="LineNr">121 </span><span class="Comment"># outside text.</span> -<span id="L122" class="LineNr">122 </span><span class="muRecipe">def</span> render <a href='081print.mu.html#L4'>screen</a>:&:<a href='081print.mu.html#L4'>screen</a>, editor:&:editor<span class="muRecipe"> -> </span>last-row:num, last-column:num, <a href='081print.mu.html#L4'>screen</a>:&:<a href='081print.mu.html#L4'>screen</a>, editor:&:editor [ +<span id="L122" class="LineNr">122 </span><span class="muRecipe">def</span> <a href='001-editor.mu.html#L122'>render</a> <a href='../081print.mu.html#L4'>screen</a>:&:<a href='../081print.mu.html#L4'>screen</a>, editor:&:editor<span class="muRecipe"> -> </span>last-row:num, last-column:num, <a href='../081print.mu.html#L4'>screen</a>:&:<a href='../081print.mu.html#L4'>screen</a>, editor:&:editor [ <span id="L123" class="LineNr">123 </span> <span class="Constant">local-scope</span> <span id="L124" class="LineNr">124 </span> <span class="Constant">load-ingredients</span> <span id="L125" class="LineNr">125 </span> <span class="muControl">return-unless</span> editor, <span class="Constant">1/top</span>, <span class="Constant">0/left</span> <span id="L126" class="LineNr">126 </span> left:num <span class="Special"><-</span> get *editor, <span class="Constant">left:offset</span> -<span id="L127" class="LineNr">127 </span> <a href='081print.mu.html#L594'>screen-height</a>:num <span class="Special"><-</span> <a href='081print.mu.html#L594'>screen-height</a> <a href='081print.mu.html#L4'>screen</a> +<span id="L127" class="LineNr">127 </span> <a href='../081print.mu.html#L594'>screen-height</a>:num <span class="Special"><-</span> <a href='../081print.mu.html#L594'>screen-height</a> <a href='../081print.mu.html#L4'>screen</a> <span id="L128" class="LineNr">128 </span> right:num <span class="Special"><-</span> get *editor, <span class="Constant">right:offset</span> <span id="L129" class="LineNr">129 </span> <span class="Comment"># traversing editor</span> <span id="L130" class="LineNr">130 </span> curr:&:duplex-list:char <span class="Special"><-</span> get *editor, <span class="Constant">top-of-screen:offset</span> -<span id="L131" class="LineNr">131 </span> <a href='065duplex_list.mu.html#L36'>prev</a>:&:duplex-list:char <span class="Special"><-</span> copy curr <span class="Comment"># just in case curr becomes null and we can't compute prev</span> -<span id="L132" class="LineNr">132 </span> curr <span class="Special"><-</span> <a href='065duplex_list.mu.html#L29'>next</a> curr +<span id="L131" class="LineNr">131 </span> <a href='../065duplex_list.mu.html#L36'>prev</a>:&:duplex-list:char <span class="Special"><-</span> copy curr <span class="Comment"># just in case curr becomes null and we can't compute prev</span> +<span id="L132" class="LineNr">132 </span> curr <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L29'>next</a> curr <span id="L133" class="LineNr">133 </span> <span class="Comment"># traversing screen</span> <span id="L134" class="LineNr">134 </span><span class="Constant"> +render-loop-initialization</span> <span id="L135" class="LineNr">135 </span> color:num <span class="Special"><-</span> copy <span class="Constant">7/white</span> @@ -197,11 +197,11 @@ if ('onhashchange' in window) { <span id="L138" class="LineNr">138 </span> cursor-row:num <span class="Special"><-</span> get *editor, <span class="Constant">cursor-row:offset</span> <span id="L139" class="LineNr">139 </span> cursor-column:num <span class="Special"><-</span> get *editor, <span class="Constant">cursor-column:offset</span> <span id="L140" class="LineNr">140 </span> before-cursor:&:duplex-list:char <span class="Special"><-</span> get *editor, <span class="Constant">before-cursor:offset</span> -<span id="L141" class="LineNr">141 </span> <a href='081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='081print.mu.html#L442'>move-cursor</a> <a href='081print.mu.html#L4'>screen</a>, row, column +<span id="L141" class="LineNr">141 </span> <a href='../081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='../081print.mu.html#L442'>move-cursor</a> <a href='../081print.mu.html#L4'>screen</a>, row, column <span id="L142" class="LineNr">142 </span> <span class="Delimiter">{</span> <span id="L143" class="LineNr">143 </span><span class="Constant"> +next-character</span> <span id="L144" class="LineNr">144 </span> <span class="muControl">break-unless</span> curr -<span id="L145" class="LineNr">145 </span> off-screen?:bool <span class="Special"><-</span> greater-or-equal row, <a href='081print.mu.html#L594'>screen-height</a> +<span id="L145" class="LineNr">145 </span> off-screen?:bool <span class="Special"><-</span> greater-or-equal row, <a href='../081print.mu.html#L594'>screen-height</a> <span id="L146" class="LineNr">146 </span> <span class="muControl">break-if</span> off-screen? <span id="L147" class="LineNr">147 </span> <span class="Comment"># update editor.before-cursor</span> <span id="L148" class="LineNr">148 </span> <span class="Comment"># Doing so at the start of each iteration ensures it stays one step behind</span> @@ -211,7 +211,7 @@ if ('onhashchange' in window) { <span id="L152" class="LineNr">152 </span> <span class="muControl">break-unless</span> at-cursor-row? <span id="L153" class="LineNr">153 </span> at-cursor?:bool <span class="Special"><-</span> equal column, cursor-column <span id="L154" class="LineNr">154 </span> <span class="muControl">break-unless</span> at-cursor? -<span id="L155" class="LineNr">155 </span> before-cursor <span class="Special"><-</span> copy <a href='065duplex_list.mu.html#L36'>prev</a> +<span id="L155" class="LineNr">155 </span> before-cursor <span class="Special"><-</span> copy <a href='../065duplex_list.mu.html#L36'>prev</a> <span id="L156" class="LineNr">156 </span> <span class="Delimiter">}</span> <span id="L157" class="LineNr">157 </span> c:char <span class="Special"><-</span> get *curr, <span class="Constant">value:offset</span> <span id="L158" class="LineNr">158 </span><span class="Constant"> <character-c-received></span> @@ -226,16 +226,16 @@ if ('onhashchange' in window) { <span id="L167" class="LineNr">167 </span> left-of-cursor?:bool <span class="Special"><-</span> lesser-than column, cursor-column <span id="L168" class="LineNr">168 </span> <span class="muControl">break-unless</span> left-of-cursor? <span id="L169" class="LineNr">169 </span> cursor-column <span class="Special"><-</span> copy column -<span id="L170" class="LineNr">170 </span> before-cursor <span class="Special"><-</span> <a href='065duplex_list.mu.html#L36'>prev</a> curr +<span id="L170" class="LineNr">170 </span> before-cursor <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L36'>prev</a> curr <span id="L171" class="LineNr">171 </span> <span class="Delimiter">}</span> <span id="L172" class="LineNr">172 </span> <span class="Comment"># clear rest of line in this window</span> -<span id="L173" class="LineNr">173 </span> <a href='081print.mu.html#L408'>clear-line-until</a> <a href='081print.mu.html#L4'>screen</a>, right +<span id="L173" class="LineNr">173 </span> <a href='../081print.mu.html#L408'>clear-line-until</a> <a href='../081print.mu.html#L4'>screen</a>, right <span id="L174" class="LineNr">174 </span> <span class="Comment"># skip to next line</span> <span id="L175" class="LineNr">175 </span> row <span class="Special"><-</span> add row,<span class="Constant"> 1</span> <span id="L176" class="LineNr">176 </span> column <span class="Special"><-</span> copy left -<span id="L177" class="LineNr">177 </span> <a href='081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='081print.mu.html#L442'>move-cursor</a> <a href='081print.mu.html#L4'>screen</a>, row, column -<span id="L178" class="LineNr">178 </span> curr <span class="Special"><-</span> <a href='065duplex_list.mu.html#L29'>next</a> curr -<span id="L179" class="LineNr">179 </span> <a href='065duplex_list.mu.html#L36'>prev</a> <span class="Special"><-</span> <a href='065duplex_list.mu.html#L29'>next</a> <a href='065duplex_list.mu.html#L36'>prev</a> +<span id="L177" class="LineNr">177 </span> <a href='../081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='../081print.mu.html#L442'>move-cursor</a> <a href='../081print.mu.html#L4'>screen</a>, row, column +<span id="L178" class="LineNr">178 </span> curr <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L29'>next</a> curr +<span id="L179" class="LineNr">179 </span> <a href='../065duplex_list.mu.html#L36'>prev</a> <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L29'>next</a> <a href='../065duplex_list.mu.html#L36'>prev</a> <span id="L180" class="LineNr">180 </span> <span class="muControl">loop</span> <span class="Constant">+next-character</span> <span id="L181" class="LineNr">181 </span> <span class="Delimiter">}</span> <span id="L182" class="LineNr">182 </span> <span class="Delimiter">{</span> @@ -245,16 +245,16 @@ if ('onhashchange' in window) { <span id="L186" class="LineNr">186 </span> <span class="muControl">break-unless</span> at-right? <span id="L187" class="LineNr">187 </span> <span class="Comment"># print wrap icon</span> <span id="L188" class="LineNr">188 </span> wrap-icon:char <span class="Special"><-</span> copy <span class="Constant">8617/loop-back-to-left</span> -<span id="L189" class="LineNr">189 </span> print <a href='081print.mu.html#L4'>screen</a>, wrap-icon, <span class="Constant">245/grey</span> +<span id="L189" class="LineNr">189 </span> print <a href='../081print.mu.html#L4'>screen</a>, wrap-icon, <span class="Constant">245/grey</span> <span id="L190" class="LineNr">190 </span> column <span class="Special"><-</span> copy left <span id="L191" class="LineNr">191 </span> row <span class="Special"><-</span> add row,<span class="Constant"> 1</span> -<span id="L192" class="LineNr">192 </span> <a href='081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='081print.mu.html#L442'>move-cursor</a> <a href='081print.mu.html#L4'>screen</a>, row, column +<span id="L192" class="LineNr">192 </span> <a href='../081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='../081print.mu.html#L442'>move-cursor</a> <a href='../081print.mu.html#L4'>screen</a>, row, column <span id="L193" class="LineNr">193 </span> <span class="Comment"># don't increment curr</span> <span id="L194" class="LineNr">194 </span> <span class="muControl">loop</span> <span class="Constant">+next-character</span> <span id="L195" class="LineNr">195 </span> <span class="Delimiter">}</span> -<span id="L196" class="LineNr">196 </span> print <a href='081print.mu.html#L4'>screen</a>, c, color -<span id="L197" class="LineNr">197 </span> curr <span class="Special"><-</span> <a href='065duplex_list.mu.html#L29'>next</a> curr -<span id="L198" class="LineNr">198 </span> <a href='065duplex_list.mu.html#L36'>prev</a> <span class="Special"><-</span> <a href='065duplex_list.mu.html#L29'>next</a> <a href='065duplex_list.mu.html#L36'>prev</a> +<span id="L196" class="LineNr">196 </span> print <a href='../081print.mu.html#L4'>screen</a>, c, color +<span id="L197" class="LineNr">197 </span> curr <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L29'>next</a> curr +<span id="L198" class="LineNr">198 </span> <a href='../065duplex_list.mu.html#L36'>prev</a> <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L29'>next</a> <a href='../065duplex_list.mu.html#L36'>prev</a> <span id="L199" class="LineNr">199 </span> column <span class="Special"><-</span> add column,<span class="Constant"> 1</span> <span id="L200" class="LineNr">200 </span> <span class="muControl">loop</span> <span id="L201" class="LineNr">201 </span> <span class="Delimiter">}</span> @@ -270,7 +270,7 @@ if ('onhashchange' in window) { <span id="L211" class="LineNr">211 </span> <span class="muControl">break-unless</span> before-cursor? <span id="L212" class="LineNr">212 </span> cursor-row <span class="Special"><-</span> copy row <span id="L213" class="LineNr">213 </span> cursor-column <span class="Special"><-</span> copy column -<span id="L214" class="LineNr">214 </span> before-cursor <span class="Special"><-</span> copy <a href='065duplex_list.mu.html#L36'>prev</a> +<span id="L214" class="LineNr">214 </span> before-cursor <span class="Special"><-</span> copy <a href='../065duplex_list.mu.html#L36'>prev</a> <span id="L215" class="LineNr">215 </span> <span class="Delimiter">}</span> <span id="L216" class="LineNr">216 </span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">bottom:offset</span>, row <span id="L217" class="LineNr">217 </span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">cursor-row:offset</span>, cursor-row @@ -279,32 +279,32 @@ if ('onhashchange' in window) { <span id="L220" class="LineNr">220 </span> <span class="muControl">return</span> row, column <span id="L221" class="LineNr">221 </span>] <span id="L222" class="LineNr">222 </span> -<span id="L223" class="LineNr">223 </span><span class="muRecipe">def</span> clear-screen-from <a href='081print.mu.html#L4'>screen</a>:&:<a href='081print.mu.html#L4'>screen</a>, row:num, column:num, left:num, right:num<span class="muRecipe"> -> </span><a href='081print.mu.html#L4'>screen</a>:&:<a href='081print.mu.html#L4'>screen</a> [ +<span id="L223" class="LineNr">223 </span><span class="muRecipe">def</span> <a href='001-editor.mu.html#L223'>clear-screen-from</a> <a href='../081print.mu.html#L4'>screen</a>:&:<a href='../081print.mu.html#L4'>screen</a>, row:num, column:num, left:num, right:num<span class="muRecipe"> -> </span><a href='../081print.mu.html#L4'>screen</a>:&:<a href='../081print.mu.html#L4'>screen</a> [ <span id="L224" class="LineNr">224 </span> <span class="Constant">local-scope</span> <span id="L225" class="LineNr">225 </span> <span class="Constant">load-ingredients</span> <span id="L226" class="LineNr">226 </span> <span class="Comment"># if it's the real screen, use the optimized primitive</span> <span id="L227" class="LineNr">227 </span> <span class="Delimiter">{</span> -<span id="L228" class="LineNr">228 </span> <span class="muControl">break-if</span> <a href='081print.mu.html#L4'>screen</a> +<span id="L228" class="LineNr">228 </span> <span class="muControl">break-if</span> <a href='../081print.mu.html#L4'>screen</a> <span id="L229" class="LineNr">229 </span> clear-display-from row, column, left, right <span id="L230" class="LineNr">230 </span> <span class="muControl">return</span> <span id="L231" class="LineNr">231 </span> <span class="Delimiter">}</span> <span id="L232" class="LineNr">232 </span> <span class="Comment"># if not, go the slower route</span> -<span id="L233" class="LineNr">233 </span> <a href='081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='081print.mu.html#L442'>move-cursor</a> <a href='081print.mu.html#L4'>screen</a>, row, column -<span id="L234" class="LineNr">234 </span> <a href='081print.mu.html#L408'>clear-line-until</a> <a href='081print.mu.html#L4'>screen</a>, right -<span id="L235" class="LineNr">235 </span> clear-rest-of-screen <a href='081print.mu.html#L4'>screen</a>, row, left, right +<span id="L233" class="LineNr">233 </span> <a href='../081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='../081print.mu.html#L442'>move-cursor</a> <a href='../081print.mu.html#L4'>screen</a>, row, column +<span id="L234" class="LineNr">234 </span> <a href='../081print.mu.html#L408'>clear-line-until</a> <a href='../081print.mu.html#L4'>screen</a>, right +<span id="L235" class="LineNr">235 </span> <a href='001-editor.mu.html#L238'>clear-rest-of-screen</a> <a href='../081print.mu.html#L4'>screen</a>, row, left, right <span id="L236" class="LineNr">236 </span>] <span id="L237" class="LineNr">237 </span> -<span id="L238" class="LineNr">238 </span><span class="muRecipe">def</span> clear-rest-of-screen <a href='081print.mu.html#L4'>screen</a>:&:<a href='081print.mu.html#L4'>screen</a>, row:num, left:num, right:num<span class="muRecipe"> -> </span><a href='081print.mu.html#L4'>screen</a>:&:<a href='081print.mu.html#L4'>screen</a> [ +<span id="L238" class="LineNr">238 </span><span class="muRecipe">def</span> <a href='001-editor.mu.html#L238'>clear-rest-of-screen</a> <a href='../081print.mu.html#L4'>screen</a>:&:<a href='../081print.mu.html#L4'>screen</a>, row:num, left:num, right:num<span class="muRecipe"> -> </span><a href='../081print.mu.html#L4'>screen</a>:&:<a href='../081print.mu.html#L4'>screen</a> [ <span id="L239" class="LineNr">239 </span> <span class="Constant">local-scope</span> <span id="L240" class="LineNr">240 </span> <span class="Constant">load-ingredients</span> <span id="L241" class="LineNr">241 </span> row <span class="Special"><-</span> add row,<span class="Constant"> 1</span> -<span id="L242" class="LineNr">242 </span> <a href='081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='081print.mu.html#L442'>move-cursor</a> <a href='081print.mu.html#L4'>screen</a>, row, left -<span id="L243" class="LineNr">243 </span> <a href='081print.mu.html#L594'>screen-height</a>:num <span class="Special"><-</span> <a href='081print.mu.html#L594'>screen-height</a> <a href='081print.mu.html#L4'>screen</a> +<span id="L242" class="LineNr">242 </span> <a href='../081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='../081print.mu.html#L442'>move-cursor</a> <a href='../081print.mu.html#L4'>screen</a>, row, left +<span id="L243" class="LineNr">243 </span> <a href='../081print.mu.html#L594'>screen-height</a>:num <span class="Special"><-</span> <a href='../081print.mu.html#L594'>screen-height</a> <a href='../081print.mu.html#L4'>screen</a> <span id="L244" class="LineNr">244 </span> <span class="Delimiter">{</span> -<span id="L245" class="LineNr">245 </span> at-bottom-of-screen?:bool <span class="Special"><-</span> greater-or-equal row, <a href='081print.mu.html#L594'>screen-height</a> +<span id="L245" class="LineNr">245 </span> at-bottom-of-screen?:bool <span class="Special"><-</span> greater-or-equal row, <a href='../081print.mu.html#L594'>screen-height</a> <span id="L246" class="LineNr">246 </span> <span class="muControl">break-if</span> at-bottom-of-screen? -<span id="L247" class="LineNr">247 </span> <a href='081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='081print.mu.html#L442'>move-cursor</a> <a href='081print.mu.html#L4'>screen</a>, row, left -<span id="L248" class="LineNr">248 </span> <a href='081print.mu.html#L408'>clear-line-until</a> <a href='081print.mu.html#L4'>screen</a>, right +<span id="L247" class="LineNr">247 </span> <a href='../081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='../081print.mu.html#L442'>move-cursor</a> <a href='../081print.mu.html#L4'>screen</a>, row, left +<span id="L248" class="LineNr">248 </span> <a href='../081print.mu.html#L408'>clear-line-until</a> <a href='../081print.mu.html#L4'>screen</a>, right <span id="L249" class="LineNr">249 </span> row <span class="Special"><-</span> add row,<span class="Constant"> 1</span> <span id="L250" class="LineNr">250 </span> <span class="muControl">loop</span> <span id="L251" class="LineNr">251 </span> <span class="Delimiter">}</span> @@ -315,9 +315,9 @@ if ('onhashchange' in window) { <span id="L256" class="LineNr">256 </span> assume-screen <span class="Constant">5/width</span>, <span class="Constant">5/height</span> <span id="L257" class="LineNr">257 </span> s:text <span class="Special"><-</span> new <span class="Constant">[abc</span> <span id="L258" class="LineNr">258 </span><span class="Constant">def]</span> -<span id="L259" class="LineNr">259 </span> e:&:editor <span class="Special"><-</span> new-editor s, <span class="Constant">0/left</span>, <span class="Constant">5/right</span> +<span id="L259" class="LineNr">259 </span> e:&:editor <span class="Special"><-</span> <a href='001-editor.mu.html#L51'>new-editor</a> s, <span class="Constant">0/left</span>, <span class="Constant">5/right</span> <span id="L260" class="LineNr">260 </span> run [ -<span id="L261" class="LineNr">261 </span> render <a href='081print.mu.html#L4'>screen</a>, e +<span id="L261" class="LineNr">261 </span> <a href='001-editor.mu.html#L122'>render</a> <a href='../081print.mu.html#L4'>screen</a>, e <span id="L262" class="LineNr">262 </span> ] <span id="L263" class="LineNr">263 </span> screen-should-contain [ <span id="L264" class="LineNr">264 </span> <span class="Constant"> . .</span> @@ -330,9 +330,9 @@ if ('onhashchange' in window) { <span id="L271" class="LineNr">271 </span><span class="muScenario">scenario</span> editor-handles-offsets [ <span id="L272" class="LineNr">272 </span> <span class="Constant">local-scope</span> <span id="L273" class="LineNr">273 </span> assume-screen <span class="Constant">5/width</span>, <span class="Constant">5/height</span> -<span id="L274" class="LineNr">274 </span> e:&:editor <span class="Special"><-</span> new-editor <span class="Constant">[abc]</span>, <span class="Constant">1/left</span>, <span class="Constant">5/right</span> +<span id="L274" class="LineNr">274 </span> e:&:editor <span class="Special"><-</span> <a href='001-editor.mu.html#L51'>new-editor</a> <span class="Constant">[abc]</span>, <span class="Constant">1/left</span>, <span class="Constant">5/right</span> <span id="L275" class="LineNr">275 </span> run [ -<span id="L276" class="LineNr">276 </span> render <a href='081print.mu.html#L4'>screen</a>, e +<span id="L276" class="LineNr">276 </span> <a href='001-editor.mu.html#L122'>render</a> <a href='../081print.mu.html#L4'>screen</a>, e <span id="L277" class="LineNr">277 </span> ] <span id="L278" class="LineNr">278 </span> screen-should-contain [ <span id="L279" class="LineNr">279 </span> <span class="Constant"> . .</span> @@ -346,9 +346,9 @@ if ('onhashchange' in window) { <span id="L287" class="LineNr">287 </span> assume-screen <span class="Constant">5/width</span>, <span class="Constant">5/height</span> <span id="L288" class="LineNr">288 </span> s:text <span class="Special"><-</span> new <span class="Constant">[abc</span> <span id="L289" class="LineNr">289 </span><span class="Constant">def]</span> -<span id="L290" class="LineNr">290 </span> e:&:editor <span class="Special"><-</span> new-editor s, <span class="Constant">1/left</span>, <span class="Constant">5/right</span> +<span id="L290" class="LineNr">290 </span> e:&:editor <span class="Special"><-</span> <a href='001-editor.mu.html#L51'>new-editor</a> s, <span class="Constant">1/left</span>, <span class="Constant">5/right</span> <span id="L291" class="LineNr">291 </span> run [ -<span id="L292" class="LineNr">292 </span> render <a href='081print.mu.html#L4'>screen</a>, e +<span id="L292" class="LineNr">292 </span> <a href='001-editor.mu.html#L122'>render</a> <a href='../081print.mu.html#L4'>screen</a>, e <span id="L293" class="LineNr">293 </span> ] <span id="L294" class="LineNr">294 </span> screen-should-contain [ <span id="L295" class="LineNr">295 </span> <span class="Constant"> . .</span> @@ -361,9 +361,9 @@ if ('onhashchange' in window) { <span id="L302" class="LineNr">302 </span><span class="muScenario">scenario</span> editor-wraps-long-lines [ <span id="L303" class="LineNr">303 </span> <span class="Constant">local-scope</span> <span id="L304" class="LineNr">304 </span> assume-screen <span class="Constant">5/width</span>, <span class="Constant">5/height</span> -<span id="L305" class="LineNr">305 </span> e:&:editor <span class="Special"><-</span> new-editor <span class="Constant">[abc def]</span>, <span class="Constant">0/left</span>, <span class="Constant">5/right</span> +<span id="L305" class="LineNr">305 </span> e:&:editor <span class="Special"><-</span> <a href='001-editor.mu.html#L51'>new-editor</a> <span class="Constant">[abc def]</span>, <span class="Constant">0/left</span>, <span class="Constant">5/right</span> <span id="L306" class="LineNr">306 </span> run [ -<span id="L307" class="LineNr">307 </span> render <a href='081print.mu.html#L4'>screen</a>, e +<span id="L307" class="LineNr">307 </span> <a href='001-editor.mu.html#L122'>render</a> <a href='../081print.mu.html#L4'>screen</a>, e <span id="L308" class="LineNr">308 </span> ] <span id="L309" class="LineNr">309 </span> screen-should-contain [ <span id="L310" class="LineNr">310 </span> <span class="Constant"> . .</span> @@ -382,9 +382,9 @@ if ('onhashchange' in window) { <span id="L323" class="LineNr">323 </span><span class="muScenario">scenario</span> editor-wraps-barely-long-lines [ <span id="L324" class="LineNr">324 </span> <span class="Constant">local-scope</span> <span id="L325" class="LineNr">325 </span> assume-screen <span class="Constant">5/width</span>, <span class="Constant">5/height</span> -<span id="L326" class="LineNr">326 </span> e:&:editor <span class="Special"><-</span> new-editor <span class="Constant">[abcde]</span>, <span class="Constant">0/left</span>, <span class="Constant">5/right</span> +<span id="L326" class="LineNr">326 </span> e:&:editor <span class="Special"><-</span> <a href='001-editor.mu.html#L51'>new-editor</a> <span class="Constant">[abcde]</span>, <span class="Constant">0/left</span>, <span class="Constant">5/right</span> <span id="L327" class="LineNr">327 </span> run [ -<span id="L328" class="LineNr">328 </span> render <a href='081print.mu.html#L4'>screen</a>, e +<span id="L328" class="LineNr">328 </span> <a href='001-editor.mu.html#L122'>render</a> <a href='../081print.mu.html#L4'>screen</a>, e <span id="L329" class="LineNr">329 </span> ] <span id="L330" class="LineNr">330 </span> <span class="Comment"># still wrap, even though the line would fit. We need room to click on the</span> <span id="L331" class="LineNr">331 </span> <span class="Comment"># end of the line</span> @@ -405,9 +405,9 @@ if ('onhashchange' in window) { <span id="L346" class="LineNr">346 </span><span class="muScenario">scenario</span> editor-with-empty-text [ <span id="L347" class="LineNr">347 </span> <span class="Constant">local-scope</span> <span id="L348" class="LineNr">348 </span> assume-screen <span class="Constant">5/width</span>, <span class="Constant">5/height</span> -<span id="L349" class="LineNr">349 </span> e:&:editor <span class="Special"><-</span> new-editor <span class="Constant">[]</span>, <span class="Constant">0/left</span>, <span class="Constant">5/right</span> +<span id="L349" class="LineNr">349 </span> e:&:editor <span class="Special"><-</span> <a href='001-editor.mu.html#L51'>new-editor</a> <span class="Constant">[]</span>, <span class="Constant">0/left</span>, <span class="Constant">5/right</span> <span id="L350" class="LineNr">350 </span> run [ -<span id="L351" class="LineNr">351 </span> render <a href='081print.mu.html#L4'>screen</a>, e +<span id="L351" class="LineNr">351 </span> <a href='001-editor.mu.html#L122'>render</a> <a href='../081print.mu.html#L4'>screen</a>, e <span id="L352" class="LineNr">352 </span> 3:num/<span class="Special">raw</span> <span class="Special"><-</span> get *e, <span class="Constant">cursor-row:offset</span> <span id="L353" class="LineNr">353 </span> 4:num/<span class="Special">raw</span> <span class="Special"><-</span> get *e, <span class="Constant">cursor-column:offset</span> <span id="L354" class="LineNr">354 </span> ] @@ -430,9 +430,9 @@ if ('onhashchange' in window) { <span id="L371" class="LineNr">371 </span> s:text <span class="Special"><-</span> new <span class="Constant">[abc</span> <span id="L372" class="LineNr">372 </span><span class="Constant"># de</span> <span id="L373" class="LineNr">373 </span><span class="Constant">f]</span> -<span id="L374" class="LineNr">374 </span> e:&:editor <span class="Special"><-</span> new-editor s, <span class="Constant">0/left</span>, <span class="Constant">5/right</span> +<span id="L374" class="LineNr">374 </span> e:&:editor <span class="Special"><-</span> <a href='001-editor.mu.html#L51'>new-editor</a> s, <span class="Constant">0/left</span>, <span class="Constant">5/right</span> <span id="L375" class="LineNr">375 </span> run [ -<span id="L376" class="LineNr">376 </span> render <a href='081print.mu.html#L4'>screen</a>, e +<span id="L376" class="LineNr">376 </span> <a href='001-editor.mu.html#L122'>render</a> <a href='../081print.mu.html#L4'>screen</a>, e <span id="L377" class="LineNr">377 </span> ] <span id="L378" class="LineNr">378 </span> screen-should-contain [ <span id="L379" class="LineNr">379 </span> <span class="Constant"> . .</span> @@ -458,11 +458,11 @@ if ('onhashchange' in window) { <span id="L399" class="LineNr">399 </span>] <span id="L400" class="LineNr">400 </span> <span id="L401" class="LineNr">401 </span><span class="muRecipe">after</span> <span class="Constant"><character-c-received></span> [ -<span id="L402" class="LineNr">402 </span> color <span class="Special"><-</span> get-color color, c +<span id="L402" class="LineNr">402 </span> color <span class="Special"><-</span> <a href='001-editor.mu.html#L406'>get-color</a> color, c <span id="L403" class="LineNr">403 </span>] <span id="L404" class="LineNr">404 </span> <span id="L405" class="LineNr">405 </span><span class="Comment"># so far the previous color is all the information we need; that may change</span> -<span id="L406" class="LineNr">406 </span><span class="muRecipe">def</span> get-color color:num, c:char<span class="muRecipe"> -> </span>color:num [ +<span id="L406" class="LineNr">406 </span><span class="muRecipe">def</span> <a href='001-editor.mu.html#L406'>get-color</a> color:num, c:char<span class="muRecipe"> -> </span>color:num [ <span id="L407" class="LineNr">407 </span> <span class="Constant">local-scope</span> <span id="L408" class="LineNr">408 </span> <span class="Constant">load-ingredients</span> <span id="L409" class="LineNr">409 </span> color-is-white?:bool <span class="Special"><-</span> equal color, <span class="Constant">7/white</span> @@ -513,9 +513,9 @@ if ('onhashchange' in window) { <span id="L454" class="LineNr">454 </span> s:text <span class="Special"><-</span> new <span class="Constant">[abc</span> <span id="L455" class="LineNr">455 </span><span class="Constant">d <- e</span> <span id="L456" class="LineNr">456 </span><span class="Constant">f]</span> -<span id="L457" class="LineNr">457 </span> e:&:editor <span class="Special"><-</span> new-editor s, <span class="Constant">0/left</span>, <span class="Constant">8/right</span> +<span id="L457" class="LineNr">457 </span> e:&:editor <span class="Special"><-</span> <a href='001-editor.mu.html#L51'>new-editor</a> s, <span class="Constant">0/left</span>, <span class="Constant">8/right</span> <span id="L458" class="LineNr">458 </span> run [ -<span id="L459" class="LineNr">459 </span> render <a href='081print.mu.html#L4'>screen</a>, e +<span id="L459" class="LineNr">459 </span> <a href='001-editor.mu.html#L122'>render</a> <a href='../081print.mu.html#L4'>screen</a>, e <span id="L460" class="LineNr">460 </span> ] <span id="L461" class="LineNr">461 </span> screen-should-contain [ <span id="L462" class="LineNr">462 </span> <span class="Constant"> . .</span> |