| 
286
 | 
     1  | 
import CW10b._
  | 
| 
255
 | 
     2  | 
  | 
| 
 | 
     3  | 
assert(combine(optimise(load_bff("benchmark.bf"))).length == 134)
 | 
| 
 | 
     4  | 
assert(combine(optimise(load_bff("mandelbrot.bf"))).length == 6509)
 | 
| 
 | 
     5  | 
  | 
| 
 | 
     6  | 
  | 
| 
 | 
     7  | 
  | 
| 
 | 
     8  | 
assert(run4("[-]", Map(0 -> 100)) == Map(0 -> 0))
 | 
| 
 | 
     9  | 
assert(run4("[->+<]", Map(0 -> 10)) == Map(0 -> 0, 1 -> 10))
 | 
| 
 | 
    10  | 
assert(run4("[>>+>>+<<<<-]", Map(0 -> 42)) == Map(0 -> 0, 2 -> 42, 4 -> 42))
 | 
| 
 | 
    11  | 
val hw_urban2 = """+++++[->++++++++++<]>--<+++[->>++++++++++
  | 
| 
 | 
    12  | 
                  <<]>>++<<----------[+>.>.<+<]"""
  | 
| 
 | 
    13  | 
assert(run4(hw_urban2) == Map(0 -> 0, 1 -> 58, 2 -> 32))
  | 
| 
 | 
    14  | 
  | 
| 
 | 
    15  | 
val hw_urban3 = """++++++++[>++++[>++>+++>+++>+<<<<-]>+>+>->>+[<]<-]>>.>---.
  | 
| 
 | 
    16  | 
                   +++++++..+++.>>.<-.<.+++.------.--------.>>+.>++."""
  | 
| 
 | 
    17  | 
  | 
| 
 | 
    18  | 
assert(run4(hw_urban3) == Map(0 -> 0, 5 -> 33, 1 -> 0, 6 -> 10, 2 -> 72, 3 -> 100, 4 -> 87))
  |