From d009e158803956c76adbf8f58a62884c3e7affb3 Mon Sep 17 00:00:00 2001
From: "Kartik K. Agaram" <vc@akkartik.com>
Date: Tue, 26 Jan 2016 23:47:23 -0800
Subject: 2605

---
 html/083scenario_screen_test.mu.html | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

(limited to 'html/083scenario_screen_test.mu.html')

diff --git a/html/083scenario_screen_test.mu.html b/html/083scenario_screen_test.mu.html
index 2fdd57bc..195d8a79 100644
--- a/html/083scenario_screen_test.mu.html
+++ b/html/083scenario_screen_test.mu.html
@@ -33,7 +33,8 @@ body { font-family: monospace; color: #eeeeee; background-color: #080808; }
 <span class="muScenario">scenario</span> print-character-at-top-left-2 [
   assume-screen <span class="Constant">3/width</span>, <span class="Constant">2/height</span>
   run [
-    screen:address:screen<span class="Special"> &lt;- </span>print screen:address:screen, <span class="Constant">97/a</span>
+    <span class="Constant">1</span>:character<span class="Special"> &lt;- </span>copy <span class="Constant">97/a</span>
+    screen:address:shared:screen<span class="Special"> &lt;- </span>print screen:address:shared:screen, <span class="Constant">1</span>:character/a
   ]
   screen-should-contain [
    <span class="Constant"> .a  .</span>
@@ -45,11 +46,12 @@ body { font-family: monospace; color: #eeeeee; background-color: #080808; }
   assume-screen <span class="Constant">5/width</span>, <span class="Constant">3/height</span>
   run [
     <span class="Comment"># print a character</span>
-    screen:address:screen<span class="Special"> &lt;- </span>print screen:address:screen, <span class="Constant">97/a</span>
+    <span class="Constant">1</span>:character<span class="Special"> &lt;- </span>copy <span class="Constant">97/a</span>
+    screen:address:shared:screen<span class="Special"> &lt;- </span>print screen:address:shared:screen, <span class="Constant">1</span>:character/a
     <span class="Comment"># move cursor to start of line</span>
-    screen:address:screen<span class="Special"> &lt;- </span>move-cursor screen:address:screen, <span class="Constant">0/row</span>, <span class="Constant">0/column</span>
+    screen:address:shared:screen<span class="Special"> &lt;- </span>move-cursor screen:address:shared:screen, <span class="Constant">0/row</span>, <span class="Constant">0/column</span>
     <span class="Comment"># clear line</span>
-    screen:address:screen<span class="Special"> &lt;- </span>clear-line screen:address:screen
+    screen:address:shared:screen<span class="Special"> &lt;- </span>clear-line screen:address:shared:screen
   ]
   screen-should-contain [
    <span class="Constant"> .     .</span>
-- 
cgit 1.4.1-2-gfad0