From b2eff9f97e02fe6f5f55133002c16116aac13ed4 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Fri, 23 Jun 2017 19:47:09 -0700 Subject: 3942 No, my conclusion in the previous commit was wrong. When you print a character on the right margin, the cursor coordinates always wrap around to the left margin on the next row. It's just that if you're at the bottom of the screen, scrolling gives the impression that the row didn't change. --- edit/001-editor.mu | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'edit/001-editor.mu') diff --git a/edit/001-editor.mu b/edit/001-editor.mu index f7b7fb89..d4e0a479 100644 --- a/edit/001-editor.mu +++ b/edit/001-editor.mu @@ -207,7 +207,7 @@ def render screen:&:screen, editor:&:editor -> last-row:num, last-column:num, sc def clear-screen-from screen:&:screen, row:num, column:num, left:num, right:num -> screen:&:screen [ local-scope load-ingredients - stash [clear-screen-from] row column [between] left [and] right +#? stash [clear-screen-from] row column [between] left [and] right # if it's the real screen, use the optimized primitive { break-if screen @@ -218,7 +218,7 @@ def clear-screen-from screen:&:screen, row:num, column:num, left:num, right:num screen <- move-cursor screen, row, column clear-line-until screen, right clear-rest-of-screen screen, row, left, right - screen <- move-cursor screen, row, column +#? screen <- move-cursor screen, row, column ] def clear-rest-of-screen screen:&:screen, row:num, left:num, right:num -> screen:&:screen [ -- cgit 1.4.1-2-gfad0