archive/1.vm/051scenario_test.mu

   1 # tests for 'scenario' in previous layer
   2
   3 scenario first_scenario_in_mu [
   4   run [
   5     10:num <- add 2, 2
   6   ]
   7   memory-should-contain [
   8     10 <- 4
   9   ]
  10 ]
  11
  12 scenario scenario_with_comment_in_mu [
  13   run [
  14     # comment
  15     10:num <- add 2, 2
  16   ]
  17   memory-should-contain [
  18     10 <- 4
  19   ]
  20 ]
  21
  22 scenario scenario_with_multiple_comments_in_mu [
  23   run [
  24     # comment1
  25     # comment2
  26     10:num <- add 2, 2
  27   ]
  28   memory-should-contain [
  29     10 <- 4
  30   ]
  31 ]
  32
  33 scenario check_text_in_memory [
  34   run [
  35     10:num <- copy 3
  36     11:char <- copy 97  # 'a'
  37     12:char <- copy 98  # 'b'
  38     13:char <- copy 99  # 'c'
  39   ]
  40   memory-should-contain [
  41     10:array:character <- [abc]
  42   ]
  43 ]
  44
  45 scenario check_trace [
  46   run [
  47     10:num <- add 2, 2
  48   ]
  49   trace-should-contain [
  50     mem: storing 4 in location 10
  51   ]
  52 ]
  53
  54 scenario check_trace_negative [
  55   run [
  56     10:num <- add 2, 2
  57   ]
  58   trace-should-not-contain [
  59     mem: storing 3 in location 10
  60   ]
  61 ]
  62
  63 scenario check_trace_instruction [
  64   run [
  65     trace 1, [foo], [aaa]
  66   ]
  67   trace-should-contain [
  68     foo: aaa
  69   ]
  70 ]