diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2017-04-16 15:16:22 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2017-04-16 15:16:22 -0700 |
commit | b2a2dc9593bd8a06977830f228ee86bb80c6a36e (patch) | |
tree | 1c4a8f52d10b05a8988b1e9d6ed35b6738ff239c /sandbox | |
parent | ace7ffb714ce5314c665f28945ee0f3f1664f9ca (diff) | |
download | mu-b2a2dc9593bd8a06977830f228ee86bb80c6a36e.tar.gz |
3825
Diffstat (limited to 'sandbox')
-rw-r--r-- | sandbox/001-editor.mu | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/sandbox/001-editor.mu b/sandbox/001-editor.mu index 717e147c..a6dde85b 100644 --- a/sandbox/001-editor.mu +++ b/sandbox/001-editor.mu @@ -237,6 +237,12 @@ def clear-rest-of-screen screen:&:screen, row:num, left:num, right:num -> screen local-scope load-ingredients row <- add row, 1 + # if it's the real screen, use the optimized primitive + { + break-if screen + clear-display-from row, left, left, right + return + } screen <- move-cursor screen, row, left screen-height:num <- screen-height screen { |