2505 - test_all_layers now passes

Drop the display-list test because it's subsumed by the stash-on-list
test right below, which doesn't require the notion of a screen from
later layers.

1 files changed, 2 insertions, 15 deletions

diff --git a/073list.mu b/073list.mu
index e2879624..7b7d9e18 100644
--- a/073list.mu
+++ b/073list.mu
@@ -88,27 +88,14 @@ recipe to-buffer in:address:list:_elem, buf:address:buffer -> buf:address:buffer
   buf <- to-buffer next, buf
 ]
 
-scenario display-list [
-  assume-screen 40/width, 10/height
-  run [
-    1:address:list:number <- push 4, 0
-    1:address:list:number <- push 5, 1:address:list:number
-    1:address:list:number <- push 6, 1:address:list:number
-    2:address:array:character <- to-text 1:address:list:number
-    3:array:character <- copy *2:address:array:character
-  ]
-  memory-should-contain [
-    3:array:character <- [6 -> 5 -> 4]
-  ]
-]
-
 scenario stash-on-list-converts-to-text [
   run [
     x:address:list:number <- push 4, 0
     x <- push 5, x
+    x <- push 6, x
     stash [foo foo], x
   ]
   trace-should-contain [
-    app: foo foo 5 -> 4
+    app: foo foo 6 -> 5 -> 4
   ]
 ]