about summary refs log tree commit diff stats
path: root/sandbox
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2017-05-18 10:09:17 -0700
committerKartik K. Agaram <vc@akkartik.com>2017-05-18 10:14:49 -0700
commitb6fa632e2f46467c76c7fb39c731cb17e8558ee0 (patch)
treef821a84d0143eec4c1c8f53cdad1807800b90365 /sandbox
parentee1a18f050a5458ade460720091e20ce6b335011 (diff)
downloadmu-b6fa632e2f46467c76c7fb39c731cb17e8558ee0.tar.gz
3861 - screen untouched when entering console mode
Diffstat (limited to 'sandbox')
-rw-r--r--sandbox/001-editor.mu1
-rw-r--r--sandbox/002-typing.mu1
-rw-r--r--sandbox/004-programming-environment.mu1
-rw-r--r--sandbox/005-sandbox.mu1
4 files changed, 4 insertions, 0 deletions
diff --git a/sandbox/001-editor.mu b/sandbox/001-editor.mu
index a6dde85b..50ba09f5 100644
--- a/sandbox/001-editor.mu
+++ b/sandbox/001-editor.mu
@@ -6,6 +6,7 @@ def main text:text [
   local-scope
   load-ingredients
   open-console
+  clear-screen 0/screen  # non-scrolling app
   e:&:editor <- new-editor text, 0/left, 5/right
   render 0/screen, e
   wait-for-event 0/console
diff --git a/sandbox/002-typing.mu b/sandbox/002-typing.mu
index 16693429..7c385b6f 100644
--- a/sandbox/002-typing.mu
+++ b/sandbox/002-typing.mu
@@ -6,6 +6,7 @@ def! main text:text [
   local-scope
   load-ingredients
   open-console
+  clear-screen 0/screen  # non-scrolling app
   editor:&:editor <- new-editor text, 5/left, 45/right
   editor-render 0/screen, editor
   editor-event-loop 0/screen, 0/console, editor
diff --git a/sandbox/004-programming-environment.mu b/sandbox/004-programming-environment.mu
index 53f9f846..4b57f5ae 100644
--- a/sandbox/004-programming-environment.mu
+++ b/sandbox/004-programming-environment.mu
@@ -3,6 +3,7 @@
 def! main [
   local-scope
   open-console
+  clear-screen 0/screen  # non-scrolling app
   env:&:environment <- new-programming-environment 0/filesystem, 0/screen
   render-all 0/screen, env, render
   event-loop 0/screen, 0/console, env, 0/filesystem
diff --git a/sandbox/005-sandbox.mu b/sandbox/005-sandbox.mu
index a7df7a54..2d1e4c2d 100644
--- a/sandbox/005-sandbox.mu
+++ b/sandbox/005-sandbox.mu
@@ -10,6 +10,7 @@
 def! main [
   local-scope
   open-console
+  clear-screen 0/screen  # non-scrolling app
   env:&:environment <- new-programming-environment 0/filesystem, 0/screen
   env <- restore-sandboxes env
   render-all 0/screen, env, render