1 files changed, 42 insertions, 0 deletions
diff --git a/test/script/list.et b/test/script/list.et
new file mode 100644
index 0000000..4b493a5
--- /dev/null
+++ b/test/script/list.et
@@ -0,0 +1,42 @@
+module list
+
+asset scripts:
+    path: ../asset/list
+
+def expect_next_stdout (what) from p:
+    expect /child-stdout shell (.*)/ from p capture line
+    guard (line == what)
+
+
+test ListConcat:
+    spawn as p 
+    with p:
+        send "load ${scripts.path}/concat.et"
+        expect /load-done/
+
+        send "run Test"
+        expect_next_stdout from p:
+            "c1 1"
+            "c1-end"
+            "c2 1"
+            "c2-end"
+            "c3 1"
+            "c3 2"
+            "c3 3"
+            "c3 6"
+            "c3 5"
+            "c3 2"
+            "c3 3"
+            "c3-end"
+            "c4 1"
+            "c4 2"
+            "c4 3"
+            "c4 6"
+            "c4 5"
+            "c4 2"
+            "c4 3"
+            "c4-end"
+        local:
+            expect /run-test-result Test (.*)/ capture result
+            guard (result == "done")
+            expect /run-done/