about summary refs log tree commit diff stats
path: root/sandbox/006-sandbox-copy.mu
diff options
context:
space:
mode:
Diffstat (limited to 'sandbox/006-sandbox-copy.mu')
-rw-r--r--sandbox/006-sandbox-copy.mu24
1 files changed, 12 insertions, 12 deletions
diff --git a/sandbox/006-sandbox-copy.mu b/sandbox/006-sandbox-copy.mu
index ea7d86ab..784ae1eb 100644
--- a/sandbox/006-sandbox-copy.mu
+++ b/sandbox/006-sandbox-copy.mu
@@ -5,11 +5,11 @@ scenario copy-a-sandbox-to-editor [
   local-scope
   trace-until 50/app  # trace too long
   assume-screen 50/width, 10/height
-  env:&:environment <- new-programming-environment screen:&:screen, [add 1, 1]
+  env:&:environment <- new-programming-environment screen, [add 1, 1]
   assume-console [
     press F4
   ]
-  event-loop screen:&:screen, console:&:console, env
+  event-loop screen, console, env
   screen-should-contain [
     .                               run (F4)           .
     .                                                  .
@@ -27,7 +27,7 @@ scenario copy-a-sandbox-to-editor [
     left-click 3, 19
   ]
   run [
-    event-loop screen:&:screen, console:&:console, env
+    event-loop screen, console, env
   ]
   # it copies into editor
   screen-should-contain [
@@ -47,7 +47,7 @@ scenario copy-a-sandbox-to-editor [
     type [0]
   ]
   run [
-    event-loop screen:&:screen, console:&:console, env
+    event-loop screen, console, env
   ]
   screen-should-contain [
     .                               run (F4)           .
@@ -67,11 +67,11 @@ scenario copy-a-sandbox-to-editor-2 [
   local-scope
   trace-until 50/app  # trace too long
   assume-screen 50/width, 10/height
-  env:&:environment <- new-programming-environment screen:&:screen, [add 1, 1]
+  env:&:environment <- new-programming-environment screen, [add 1, 1]
   assume-console [
     press F4
   ]
-  event-loop screen:&:screen, console:&:console, env
+  event-loop screen, console, env
   screen-should-contain [
     .                               run (F4)           .
     .                                                  .
@@ -89,7 +89,7 @@ scenario copy-a-sandbox-to-editor-2 [
     left-click 3, 33
   ]
   run [
-    event-loop screen:&:screen, console:&:console, env
+    event-loop screen, console, env
   ]
   # it copies into editor
   screen-should-contain [
@@ -109,7 +109,7 @@ scenario copy-a-sandbox-to-editor-2 [
     type [0]
   ]
   run [
-    event-loop screen:&:screen, console:&:console, env
+    event-loop screen, console, env
   ]
   screen-should-contain [
     .                               run (F4)           .
@@ -218,11 +218,11 @@ scenario copy-fails-if-sandbox-editor-not-empty [
   local-scope
   trace-until 50/app  # trace too long
   assume-screen 50/width, 10/height
-  env:&:environment <- new-programming-environment screen:&:screen, [add 1, 1]
+  env:&:environment <- new-programming-environment screen, [add 1, 1]
   assume-console [
     press F4
   ]
-  event-loop screen:&:screen, console:&:console, env
+  event-loop screen, console, env
   screen-should-contain [
     .                               run (F4)           .
     .                                                  .
@@ -240,7 +240,7 @@ scenario copy-fails-if-sandbox-editor-not-empty [
     left-click 3, 20  # click 'copy' button
   ]
   run [
-    event-loop screen:&:screen, console:&:console, env
+    event-loop screen, console, env
   ]
   # copy doesn't happen
   screen-should-contain [
@@ -258,7 +258,7 @@ scenario copy-fails-if-sandbox-editor-not-empty [
     type [1]
   ]
   run [
-    event-loop screen:&:screen, console:&:console, env
+    event-loop screen, console, env
   ]
   screen-should-contain [
     .                               run (F4)           .