about summary refs log tree commit diff stats
path: root/edit/010-sandbox-trace.mu
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2016-10-06 10:51:11 -0700
committerKartik K. Agaram <vc@akkartik.com>2016-10-06 10:52:37 -0700
commit55479bc29dfc7148e38d8c24b072e3588739f18e (patch)
tree98fc37560c59bde6ee1b71163bae017df2f3abe5 /edit/010-sandbox-trace.mu
parent5af07e1c2c65e74ecacaa3077e17a492a8532ab0 (diff)
downloadmu-55479bc29dfc7148e38d8c24b072e3588739f18e.tar.gz
3445
Ugly that we didn't need 'screen' to provide a type in scenarios
(because assume-screen expands to a definition of 'screen') but we did
need a type for 'console'. Just never require types for special names in
scenarios.
Diffstat (limited to 'edit/010-sandbox-trace.mu')
-rw-r--r--edit/010-sandbox-trace.mu24
1 files changed, 12 insertions, 12 deletions
diff --git a/edit/010-sandbox-trace.mu b/edit/010-sandbox-trace.mu
index 21a3aec2..3837a0b1 100644
--- a/edit/010-sandbox-trace.mu
+++ b/edit/010-sandbox-trace.mu
@@ -9,12 +9,12 @@ scenario sandbox-click-on-code-toggles-app-trace [
 recipe foo [
   stash [abc]
 ]]
-  env:&:environment <- new-programming-environment screen:&:screen, recipes, [foo]
+  env:&:environment <- new-programming-environment screen, recipes, [foo]
   # run it
   assume-console [
     press F4
   ]
-  event-loop screen:&:screen, console:&:console, env
+  event-loop screen, console, env
   screen-should-contain [
     .                                                                                 run (F4)           .
     .                                                  ┊                                                 .
@@ -29,9 +29,9 @@ recipe foo [
     left-click 4, 51
   ]
   run [
-    event-loop screen:&:screen, console:&:console, env
+    event-loop screen, console, env
     cursor:char <- copy 9251/␣
-    print screen:&:screen, cursor
+    print screen, cursor
   ]
   # trace now printed and cursor shouldn't have budged
   screen-should-contain [
@@ -55,8 +55,8 @@ recipe foo [
     left-click 4, 55
   ]
   run [
-    event-loop screen:&:screen, console:&:console, env
-    print screen:&:screen, cursor
+    event-loop screen, console, env
+    print screen, cursor
   ]
   # trace hidden again
   screen-should-contain [
@@ -80,12 +80,12 @@ recipe foo [
   stash [abc]
   reply 4
 ]]
-  env:&:environment <- new-programming-environment screen:&:screen, recipes, [foo]
+  env:&:environment <- new-programming-environment screen, recipes, [foo]
   # run it
   assume-console [
     press F4
   ]
-  event-loop screen:&:screen, console:&:console, env
+  event-loop screen, console, env
   screen-should-contain [
     .                                                                                 run (F4)           .
     .                                                  ┊                                                 .
@@ -101,7 +101,7 @@ recipe foo [
     left-click 4, 51
   ]
   run [
-    event-loop screen:&:screen, console:&:console, env
+    event-loop screen, console, env
   ]
   # trace now printed above result
   screen-should-contain [
@@ -122,13 +122,13 @@ scenario clicking-on-app-trace-does-nothing [
   local-scope
   trace-until 100/app  # trace too long
   assume-screen 100/width, 10/height
-  env:&:environment <- new-programming-environment screen:&:screen, [], [stash 123456789]
+  env:&:environment <- new-programming-environment screen, [], [stash 123456789]
   # create and expand the trace
   assume-console [
     press F4
     left-click 4, 51
   ]
-  event-loop screen:&:screen, console:&:console, env
+  event-loop screen, console, env
   screen-should-contain [
     .                                                                                 run (F4)           .
     .                                                  ┊                                                 .
@@ -142,7 +142,7 @@ scenario clicking-on-app-trace-does-nothing [
     left-click 5, 57
   ]
   run [
-    event-loop screen:&:screen, console:&:console, env
+    event-loop screen, console, env
   ]
   # no change; doesn't die
   screen-should-contain [