diff options
Diffstat (limited to 'html/edit/003-shortcuts.mu.html')
| -rw-r--r-- | html/edit/003-shortcuts.mu.html | 36 |
1 files changed, 18 insertions, 18 deletions
diff --git a/html/edit/003-shortcuts.mu.html b/html/edit/003-shortcuts.mu.html index bf5f463c..d14f0950 100644 --- a/html/edit/003-shortcuts.mu.html +++ b/html/edit/003-shortcuts.mu.html @@ -158,7 +158,7 @@ if ('onhashchange' in window) { <span id="L96" class="LineNr"> 96 </span> before-cursor <span class="Special"><-</span> copy <a href='../065duplex_list.mu.html#L36'>prev</a> <span id="L97" class="LineNr"> 97 </span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">before-cursor:offset</span>, before-cursor <span id="L98" class="LineNr"> 98 </span> <span class="muControl">return-if</span> scroll?, <span class="Constant">1/go-render</span> -<span id="L99" class="LineNr"> 99 </span> <a href='../081print.mu.html#L712'>screen-width</a>:num <span class="Special"><-</span> <a href='../081print.mu.html#L712'>screen-width</a> <a href='../081print.mu.html#L4'>screen</a> +<span id="L99" class="LineNr"> 99 </span> <a href='../081print.mu.html#L735'>screen-width</a>:num <span class="Special"><-</span> <a href='../081print.mu.html#L735'>screen-width</a> <a href='../081print.mu.html#L4'>screen</a> <span id="L100" class="LineNr"> 100 </span> cursor-row:num <span class="Special"><-</span> get *editor, <span class="Constant">cursor-row:offset</span> <span id="L101" class="LineNr"> 101 </span> cursor-column:num <span class="Special"><-</span> get *editor, <span class="Constant">cursor-column:offset</span> <span id="L102" class="LineNr"> 102 </span> <span class="Comment"># did we just backspace over a newline?</span> @@ -424,10 +424,10 @@ if ('onhashchange' in window) { <span id="L362" class="LineNr"> 362 </span> cursor-column:num <span class="Special"><-</span> get *editor, <span class="Constant">cursor-column:offset</span> <span id="L363" class="LineNr"> 363 </span> <a href='../081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='../081print.mu.html#L573'>move-cursor</a> <a href='../081print.mu.html#L4'>screen</a>, cursor-row, cursor-column <span id="L364" class="LineNr"> 364 </span> curr-column:num <span class="Special"><-</span> copy cursor-column -<span id="L365" class="LineNr"> 365 </span> <a href='../081print.mu.html#L712'>screen-width</a>:num <span class="Special"><-</span> <a href='../081print.mu.html#L712'>screen-width</a> <a href='../081print.mu.html#L4'>screen</a> +<span id="L365" class="LineNr"> 365 </span> <a href='../081print.mu.html#L735'>screen-width</a>:num <span class="Special"><-</span> <a href='../081print.mu.html#L735'>screen-width</a> <a href='../081print.mu.html#L4'>screen</a> <span id="L366" class="LineNr"> 366 </span> <span class="Delimiter">{</span> <span id="L367" class="LineNr"> 367 </span> <span class="Conceal">¦</span> <span class="Comment"># hit right margin? give up and let caller render</span> -<span id="L368" class="LineNr"> 368 </span> <span class="Conceal">¦</span> at-right?:bool <span class="Special"><-</span> greater-or-equal curr-column, <a href='../081print.mu.html#L712'>screen-width</a> +<span id="L368" class="LineNr"> 368 </span> <span class="Conceal">¦</span> at-right?:bool <span class="Special"><-</span> greater-or-equal curr-column, <a href='../081print.mu.html#L735'>screen-width</a> <span id="L369" class="LineNr"> 369 </span> <span class="Conceal">¦</span> <span class="muControl">return-if</span> at-right?, <span class="Constant">1/go-render</span> <span id="L370" class="LineNr"> 370 </span> <span class="Conceal">¦</span> <span class="muControl">break-unless</span> curr <span id="L371" class="LineNr"> 371 </span> <span class="Conceal">¦</span> <span class="Comment"># newline? done.</span> @@ -480,7 +480,7 @@ if ('onhashchange' in window) { <span id="L418" class="LineNr"> 418 </span><span class="Constant"> </span><span class="Conceal">¦</span><span class="Constant"> <move-cursor-begin></span> <span id="L419" class="LineNr"> 419 </span> <span class="Conceal">¦</span> before-cursor <span class="Special"><-</span> copy next-cursor <span id="L420" class="LineNr"> 420 </span> <span class="Conceal">¦</span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">before-cursor:offset</span>, before-cursor -<span id="L421" class="LineNr"> 421 </span> <span class="Conceal">¦</span> go-render?:bool <span class="Special"><-</span> <a href='003-shortcuts.mu.html#L429'>move-cursor-coordinates-right</a> editor, <a href='../081print.mu.html#L725'>screen-height</a> +<span id="L421" class="LineNr"> 421 </span> <span class="Conceal">¦</span> go-render?:bool <span class="Special"><-</span> <a href='003-shortcuts.mu.html#L429'>move-cursor-coordinates-right</a> editor, <a href='../081print.mu.html#L748'>screen-height</a> <span id="L422" class="LineNr"> 422 </span> <span class="Conceal">¦</span> <a href='../081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='../081print.mu.html#L573'>move-cursor</a> <a href='../081print.mu.html#L4'>screen</a>, cursor-row, cursor-column <span id="L423" class="LineNr"> 423 </span> <span class="Conceal">¦</span> undo-coalesce-tag:num <span class="Special"><-</span> copy <span class="Constant">2/right-arrow</span> <span id="L424" class="LineNr"> 424 </span><span class="Constant"> </span><span class="Conceal">¦</span><span class="Constant"> <move-cursor-end></span> @@ -488,7 +488,7 @@ if ('onhashchange' in window) { <span id="L426" class="LineNr"> 426 </span> <span class="Delimiter">}</span> <span id="L427" class="LineNr"> 427 </span>] <span id="L428" class="LineNr"> 428 </span> -<span id="L429" class="LineNr"> 429 </span><span class="muRecipe">def</span> <a href='003-shortcuts.mu.html#L429'>move-cursor-coordinates-right</a> editor:&:editor, <a href='../081print.mu.html#L725'>screen-height</a>:num<span class="muRecipe"> -> </span>go-render?:bool, editor:&:editor [ +<span id="L429" class="LineNr"> 429 </span><span class="muRecipe">def</span> <a href='003-shortcuts.mu.html#L429'>move-cursor-coordinates-right</a> editor:&:editor, <a href='../081print.mu.html#L748'>screen-height</a>:num<span class="muRecipe"> -> </span>go-render?:bool, editor:&:editor [ <span id="L430" class="LineNr"> 430 </span> <span class="Constant">local-scope</span> <span id="L431" class="LineNr"> 431 </span> <span class="Constant">load-ingredients</span> <span id="L432" class="LineNr"> 432 </span> before-cursor:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get *editor <span class="Constant">before-cursor:offset</span> @@ -505,7 +505,7 @@ if ('onhashchange' in window) { <span id="L443" class="LineNr"> 443 </span> <span class="Conceal">¦</span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">cursor-row:offset</span>, cursor-row <span id="L444" class="LineNr"> 444 </span> <span class="Conceal">¦</span> cursor-column <span class="Special"><-</span> copy left <span id="L445" class="LineNr"> 445 </span> <span class="Conceal">¦</span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">cursor-column:offset</span>, cursor-column -<span id="L446" class="LineNr"> 446 </span> <span class="Conceal">¦</span> below-screen?:bool <span class="Special"><-</span> greater-or-equal cursor-row, <a href='../081print.mu.html#L725'>screen-height</a> <span class="Comment"># must be equal</span> +<span id="L446" class="LineNr"> 446 </span> <span class="Conceal">¦</span> below-screen?:bool <span class="Special"><-</span> greater-or-equal cursor-row, <a href='../081print.mu.html#L748'>screen-height</a> <span class="Comment"># must be equal</span> <span id="L447" class="LineNr"> 447 </span> <span class="Conceal">¦</span> <span class="muControl">return-unless</span> below-screen?, <span class="Constant">0/don't-render</span> <span id="L448" class="LineNr"> 448 </span><span class="Constant"> </span><span class="Conceal">¦</span><span class="Constant"> <scroll-down></span> <span id="L449" class="LineNr"> 449 </span> <span class="Conceal">¦</span> cursor-row <span class="Special"><-</span> subtract cursor-row,<span class="Constant"> 1</span> <span class="Comment"># bring back into screen range</span> @@ -528,7 +528,7 @@ if ('onhashchange' in window) { <span id="L466" class="LineNr"> 466 </span> <span class="Conceal">¦</span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">cursor-row:offset</span>, cursor-row <span id="L467" class="LineNr"> 467 </span> <span class="Conceal">¦</span> cursor-column <span class="Special"><-</span> copy left <span id="L468" class="LineNr"> 468 </span> <span class="Conceal">¦</span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">cursor-column:offset</span>, cursor-column -<span id="L469" class="LineNr"> 469 </span> <span class="Conceal">¦</span> below-screen?:bool <span class="Special"><-</span> greater-or-equal cursor-row, <a href='../081print.mu.html#L725'>screen-height</a> <span class="Comment"># must be equal</span> +<span id="L469" class="LineNr"> 469 </span> <span class="Conceal">¦</span> below-screen?:bool <span class="Special"><-</span> greater-or-equal cursor-row, <a href='../081print.mu.html#L748'>screen-height</a> <span class="Comment"># must be equal</span> <span id="L470" class="LineNr"> 470 </span> <span class="Conceal">¦</span> <span class="muControl">return-unless</span> below-screen?, <span class="Constant">0/no-more-render</span> <span id="L471" class="LineNr"> 471 </span><span class="Constant"> </span><span class="Conceal">¦</span><span class="Constant"> <scroll-down></span> <span id="L472" class="LineNr"> 472 </span> <span class="Conceal">¦</span> cursor-row <span class="Special"><-</span> subtract cursor-row,<span class="Constant"> 1</span> <span class="Comment"># bring back into screen range</span> @@ -1259,14 +1259,14 @@ if ('onhashchange' in window) { <span id="L1197" class="LineNr">1197 </span> <span class="Conceal">¦</span> move-to-next-line?:bool <span class="Special"><-</span> equal k, <span class="Constant">65516/down-arrow</span> <span id="L1198" class="LineNr">1198 </span> <span class="Conceal">¦</span> <span class="muControl">break-unless</span> move-to-next-line? <span id="L1199" class="LineNr">1199 </span><span class="Constant"> </span><span class="Conceal">¦</span><span class="Constant"> <move-cursor-begin></span> -<span id="L1200" class="LineNr">1200 </span> <span class="Conceal">¦</span> go-render? <span class="Special"><-</span> <a href='003-shortcuts.mu.html#L1207'>move-to-next-line</a> editor, <a href='../081print.mu.html#L725'>screen-height</a> +<span id="L1200" class="LineNr">1200 </span> <span class="Conceal">¦</span> go-render? <span class="Special"><-</span> <a href='003-shortcuts.mu.html#L1207'>move-to-next-line</a> editor, <a href='../081print.mu.html#L748'>screen-height</a> <span id="L1201" class="LineNr">1201 </span> <span class="Conceal">¦</span> undo-coalesce-tag:num <span class="Special"><-</span> copy <span class="Constant">4/down-arrow</span> <span id="L1202" class="LineNr">1202 </span><span class="Constant"> </span><span class="Conceal">¦</span><span class="Constant"> <move-cursor-end></span> <span id="L1203" class="LineNr">1203 </span> <span class="Conceal">¦</span> <span class="muControl">return</span> <span id="L1204" class="LineNr">1204 </span> <span class="Delimiter">}</span> <span id="L1205" class="LineNr">1205 </span>] <span id="L1206" class="LineNr">1206 </span> -<span id="L1207" class="LineNr">1207 </span><span class="muRecipe">def</span> <a href='003-shortcuts.mu.html#L1207'>move-to-next-line</a> editor:&:editor, <a href='../081print.mu.html#L725'>screen-height</a>:num<span class="muRecipe"> -> </span>go-render?:bool, editor:&:editor [ +<span id="L1207" class="LineNr">1207 </span><span class="muRecipe">def</span> <a href='003-shortcuts.mu.html#L1207'>move-to-next-line</a> editor:&:editor, <a href='../081print.mu.html#L748'>screen-height</a>:num<span class="muRecipe"> -> </span>go-render?:bool, editor:&:editor [ <span id="L1208" class="LineNr">1208 </span> <span class="Constant">local-scope</span> <span id="L1209" class="LineNr">1209 </span> <span class="Constant">load-ingredients</span> <span id="L1210" class="LineNr">1210 </span> cursor-row:num <span class="Special"><-</span> get *editor, <span class="Constant">cursor-row:offset</span> @@ -1274,7 +1274,7 @@ if ('onhashchange' in window) { <span id="L1212" class="LineNr">1212 </span> before-cursor:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get *editor, <span class="Constant">before-cursor:offset</span> <span id="L1213" class="LineNr">1213 </span> left:num <span class="Special"><-</span> get *editor, <span class="Constant">left:offset</span> <span id="L1214" class="LineNr">1214 </span> right:num <span class="Special"><-</span> get *editor, <span class="Constant">right:offset</span> -<span id="L1215" class="LineNr">1215 </span> last-line:num <span class="Special"><-</span> subtract <a href='../081print.mu.html#L725'>screen-height</a>,<span class="Constant"> 1</span> +<span id="L1215" class="LineNr">1215 </span> last-line:num <span class="Special"><-</span> subtract <a href='../081print.mu.html#L748'>screen-height</a>,<span class="Constant"> 1</span> <span id="L1216" class="LineNr">1216 </span> already-at-bottom?:bool <span class="Special"><-</span> greater-or-equal cursor-row, last-line <span id="L1217" class="LineNr">1217 </span> <span class="Delimiter">{</span> <span id="L1218" class="LineNr">1218 </span> <span class="Conceal">¦</span> <span class="Comment"># if cursor not at bottom, move it</span> @@ -1787,14 +1787,14 @@ if ('onhashchange' in window) { <span id="L1725" class="LineNr">1725 </span> color:num <span class="Special"><-</span> copy <span class="Constant">7/white</span> <span id="L1726" class="LineNr">1726 </span> column:num <span class="Special"><-</span> copy left <span id="L1727" class="LineNr">1727 </span> <a href='../081print.mu.html#L4'>screen</a> <span class="Special"><-</span> <a href='../081print.mu.html#L573'>move-cursor</a> <a href='../081print.mu.html#L4'>screen</a>, row, column -<span id="L1728" class="LineNr">1728 </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="L1728" class="LineNr">1728 </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="L1729" class="LineNr">1729 </span> i:num <span class="Special"><-</span> copy<span class="Constant"> 0</span> <span id="L1730" class="LineNr">1730 </span> len:num <span class="Special"><-</span> length *s <span id="L1731" class="LineNr">1731 </span> <span class="Delimiter">{</span> <span id="L1732" class="LineNr">1732 </span><span class="Constant"> </span><span class="Conceal">¦</span><span class="Constant"> +next-character</span> <span id="L1733" class="LineNr">1733 </span> <span class="Conceal">¦</span> done?:bool <span class="Special"><-</span> greater-or-equal i, len <span id="L1734" class="LineNr">1734 </span> <span class="Conceal">¦</span> <span class="muControl">break-if</span> done? -<span id="L1735" class="LineNr">1735 </span> <span class="Conceal">¦</span> done? <span class="Special"><-</span> greater-or-equal row, <a href='../081print.mu.html#L725'>screen-height</a> +<span id="L1735" class="LineNr">1735 </span> <span class="Conceal">¦</span> done? <span class="Special"><-</span> greater-or-equal row, <a href='../081print.mu.html#L748'>screen-height</a> <span id="L1736" class="LineNr">1736 </span> <span class="Conceal">¦</span> <span class="muControl">break-if</span> done? <span id="L1737" class="LineNr">1737 </span> <span class="Conceal">¦</span> c:char <span class="Special"><-</span> index *s, i <span id="L1738" class="LineNr">1738 </span><span class="Constant"> </span><span class="Conceal">¦</span><span class="Constant"> <character-c-received></span> @@ -3052,8 +3052,8 @@ if ('onhashchange' in window) { <span id="L2990" class="LineNr">2990 </span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">before-cursor:offset</span>, before-cursor <span id="L2991" class="LineNr">2991 </span> <span class="Comment"># keep one line in common with previous page</span> <span id="L2992" class="LineNr">2992 </span> <span class="Delimiter">{</span> -<span id="L2993" class="LineNr">2993 </span> <span class="Conceal">¦</span> <a href='../065duplex_list.mu.html#L522'>last</a>:char <span class="Special"><-</span> get *before-cursor, <span class="Constant">value:offset</span> -<span id="L2994" class="LineNr">2994 </span> <span class="Conceal">¦</span> newline?:bool <span class="Special"><-</span> equal <a href='../065duplex_list.mu.html#L522'>last</a>, <span class="Constant">10/newline</span> +<span id="L2993" class="LineNr">2993 </span> <span class="Conceal">¦</span> <a href='../065duplex_list.mu.html#L544'>last</a>:char <span class="Special"><-</span> get *before-cursor, <span class="Constant">value:offset</span> +<span id="L2994" class="LineNr">2994 </span> <span class="Conceal">¦</span> newline?:bool <span class="Special"><-</span> equal <a href='../065duplex_list.mu.html#L544'>last</a>, <span class="Constant">10/newline</span> <span id="L2995" class="LineNr">2995 </span> <span class="Conceal">¦</span> <span class="muControl">break-unless</span> newline?:bool <span id="L2996" class="LineNr">2996 </span> <span class="Conceal">¦</span> before-cursor <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L36'>prev</a> before-cursor <span id="L2997" class="LineNr">2997 </span> <span class="Conceal">¦</span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">before-cursor:offset</span>, before-cursor @@ -3213,7 +3213,7 @@ if ('onhashchange' in window) { <span id="L3151" class="LineNr">3151 </span> <span class="Conceal">¦</span> <span class="muControl">break-unless</span> page-up? <span id="L3152" class="LineNr">3152 </span> <span class="Conceal">¦</span> old-top:&:<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="L3153" class="LineNr">3153 </span><span class="Constant"> </span><span class="Conceal">¦</span><span class="Constant"> <move-cursor-begin></span> -<span id="L3154" class="LineNr">3154 </span> <span class="Conceal">¦</span> editor <span class="Special"><-</span> <a href='003-shortcuts.mu.html#L3179'>page-up</a> editor, <a href='../081print.mu.html#L725'>screen-height</a> +<span id="L3154" class="LineNr">3154 </span> <span class="Conceal">¦</span> editor <span class="Special"><-</span> <a href='003-shortcuts.mu.html#L3179'>page-up</a> editor, <a href='../081print.mu.html#L748'>screen-height</a> <span id="L3155" class="LineNr">3155 </span> <span class="Conceal">¦</span> undo-coalesce-tag:num <span class="Special"><-</span> copy <span class="Constant">0/never</span> <span id="L3156" class="LineNr">3156 </span><span class="Constant"> </span><span class="Conceal">¦</span><span class="Constant"> <move-cursor-end></span> <span id="L3157" class="LineNr">3157 </span> <span class="Conceal">¦</span> top-of-screen:&:<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> @@ -3228,7 +3228,7 @@ if ('onhashchange' in window) { <span id="L3166" class="LineNr">3166 </span> <span class="Conceal">¦</span> <span class="muControl">break-unless</span> page-up? <span id="L3167" class="LineNr">3167 </span> <span class="Conceal">¦</span> old-top:&:<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="L3168" class="LineNr">3168 </span><span class="Constant"> </span><span class="Conceal">¦</span><span class="Constant"> <move-cursor-begin></span> -<span id="L3169" class="LineNr">3169 </span> <span class="Conceal">¦</span> editor <span class="Special"><-</span> <a href='003-shortcuts.mu.html#L3179'>page-up</a> editor, <a href='../081print.mu.html#L725'>screen-height</a> +<span id="L3169" class="LineNr">3169 </span> <span class="Conceal">¦</span> editor <span class="Special"><-</span> <a href='003-shortcuts.mu.html#L3179'>page-up</a> editor, <a href='../081print.mu.html#L748'>screen-height</a> <span id="L3170" class="LineNr">3170 </span> <span class="Conceal">¦</span> undo-coalesce-tag:num <span class="Special"><-</span> copy <span class="Constant">0/never</span> <span id="L3171" class="LineNr">3171 </span><span class="Constant"> </span><span class="Conceal">¦</span><span class="Constant"> <move-cursor-end></span> <span id="L3172" class="LineNr">3172 </span> <span class="Conceal">¦</span> top-of-screen:&:<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> @@ -3238,10 +3238,10 @@ if ('onhashchange' in window) { <span id="L3176" class="LineNr">3176 </span> <span class="Delimiter">}</span> <span id="L3177" class="LineNr">3177 </span>] <span id="L3178" class="LineNr">3178 </span> -<span id="L3179" class="LineNr">3179 </span><span class="muRecipe">def</span> <a href='003-shortcuts.mu.html#L3179'>page-up</a> editor:&:editor, <a href='../081print.mu.html#L725'>screen-height</a>:num<span class="muRecipe"> -> </span>editor:&:editor [ +<span id="L3179" class="LineNr">3179 </span><span class="muRecipe">def</span> <a href='003-shortcuts.mu.html#L3179'>page-up</a> editor:&:editor, <a href='../081print.mu.html#L748'>screen-height</a>:num<span class="muRecipe"> -> </span>editor:&:editor [ <span id="L3180" class="LineNr">3180 </span> <span class="Constant">local-scope</span> <span id="L3181" class="LineNr">3181 </span> <span class="Constant">load-ingredients</span> -<span id="L3182" class="LineNr">3182 </span> max:num <span class="Special"><-</span> subtract <a href='../081print.mu.html#L725'>screen-height</a>, <span class="Constant">1/menu-bar</span>, <span class="Constant">1/overlapping-line</span> +<span id="L3182" class="LineNr">3182 </span> max:num <span class="Special"><-</span> subtract <a href='../081print.mu.html#L748'>screen-height</a>, <span class="Constant">1/menu-bar</span>, <span class="Constant">1/overlapping-line</span> <span id="L3183" class="LineNr">3183 </span> count:num <span class="Special"><-</span> copy<span class="Constant"> 0</span> <span id="L3184" class="LineNr">3184 </span> top-of-screen:&:<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="L3185" class="LineNr">3185 </span> <span class="Delimiter">{</span> |