From ce1a7a131f7c4df8eae5c019eba2893b56f04d46 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Thu, 24 Jun 2021 03:42:57 -0400
Subject: Added a macro for type-casting JVM objects.

---
 stdlib/source/test/aedifex/command/build.lux | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

(limited to 'stdlib/source/test/aedifex/command/build.lux')

diff --git a/stdlib/source/test/aedifex/command/build.lux b/stdlib/source/test/aedifex/command/build.lux
index 85231ae33..234343fea 100644
--- a/stdlib/source/test/aedifex/command/build.lux
+++ b/stdlib/source/test/aedifex/command/build.lux
@@ -45,9 +45,9 @@
       (: (shell.Simulation [])
          (structure
           (def: (on_read state)
-            (#try.Failure "on_read"))
+            (exception.throw shell.no_more_output []))
           (def: (on_error state)
-            (#try.Failure "on_error"))
+            (exception.throw shell.no_more_output []))
           (def: (on_write input state)
             (#try.Failure "on_write"))
           (def: (on_destroy state)
@@ -63,9 +63,9 @@
       (: (shell.Simulation [])
          (structure
           (def: (on_read state)
-            (#try.Failure "on_read"))
+            (exception.throw shell.no_more_output []))
           (def: (on_error state)
-            (#try.Failure "on_error"))
+            (exception.throw shell.no_more_output []))
           (def: (on_write input state)
             (#try.Failure "on_write"))
           (def: (on_destroy state)
@@ -98,7 +98,9 @@
   Test
   (<| (_.covering /._)
       (do {! random.monad}
-        [#let [fs (file.mock (\ file.default separator))
+        [last_read (random.ascii/alpha 5)
+         last_error (random.ascii/alpha 5)
+         #let [fs (file.mock (\ file.default separator))
                shell (shell.async (..good_shell []))]
          program (random.ascii/alpha 5)
          target (random.ascii/alpha 5)
-- 
cgit v1.2.3