about summary refs log tree commit diff stats
path: root/051scenario_test.mu
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2016-05-20 12:49:31 -0700
committerKartik K. Agaram <vc@akkartik.com>2016-05-20 12:49:31 -0700
commitbe92feb7611687539d62e53407273d1ef2ade76e (patch)
treedbc094a32a579ab79b05f7e454ef182d2d326e8f /051scenario_test.mu
parent7890b8cef2c330ad69e2ce5861931ff2768d6194 (diff)
downloadmu-be92feb7611687539d62e53407273d1ef2ade76e.tar.gz
2987
Diffstat (limited to '051scenario_test.mu')
-rw-r--r--051scenario_test.mu70
1 files changed, 70 insertions, 0 deletions
diff --git a/051scenario_test.mu b/051scenario_test.mu
new file mode 100644
index 00000000..4f86c188
--- /dev/null
+++ b/051scenario_test.mu
@@ -0,0 +1,70 @@
+# tests for 'scenario' in previous layer
+
+scenario first_scenario_in_mu [
+  run [
+    1:number <- add 2, 2
+  ]
+  memory-should-contain [
+    1 <- 4
+  ]
+]
+
+scenario scenario_with_comment_in_mu [
+  run [
+    # comment
+    1:number <- add 2, 2
+  ]
+  memory-should-contain [
+    1 <- 4
+  ]
+]
+
+scenario scenario_with_multiple_comments_in_mu [
+  run [
+    # comment1
+    # comment2
+    1:number <- add 2, 2
+  ]
+  memory-should-contain [
+    1 <- 4
+  ]
+]
+
+scenario check_text_in_memory [
+  run [
+    1:number <- copy 3
+    2:character <- copy 97  # 'a'
+    3:character <- copy 98  # 'b'
+    4:character <- copy 99  # 'c'
+  ]
+  memory-should-contain [
+    1:array:character <- [abc]
+  ]
+]
+
+scenario check_trace [
+  run [
+    1:number <- add 2, 2
+  ]
+  trace-should-contain [
+    mem: storing 4 in location 1
+  ]
+]
+
+scenario check_trace_negative [
+  run [
+    1:number <- add 2, 2
+  ]
+  trace-should-not-contain [
+    mem: storing 5 in location 1
+  ]
+]
+
+scenario check_trace_instruction [
+  run [
+    trace 1, [foo], [aaa]
+  ]
+  trace-should-contain [
+    foo: aaa
+  ]
+]