main_marking5/bf_test4.scala
author Christian Urban <christian.urban@kcl.ac.uk>
Mon, 08 Nov 2021 02:29:24 +0000
changeset 411 f55742af79ef
parent 392 97ecdc8cb61b
child 424 daf561a83ba6
permissions -rw-r--r--
updated

import CW10a._

assert(run("[-]", Map(0 -> 100)) == Map(0 -> 0))
assert(run("[->+<]", Map(0 -> 10)) == Map(0 -> 0, 1 -> 10))
assert(run("[>>+>>+<<<<-]", Map(0 -> 42)) == Map(0 -> 0, 2 -> 42, 4 -> 42))
assert(run("++++++++++#>+***#") == Map(0 -> 10, 1 -> 1000))
assert(run("+++>+@+@+@+@+@") == Map(0 -> 3, 1 -> 7, 4 -> 3, 5 -> 3, 6 -> 3, 7 -> 3))

val hw_urban = """+++++[->++++++++++<]>--<+++[->>++++++++++
                  <<]>>++<<----------[+>.>.<+<]"""
assert(run(hw_urban) == Map(0 -> 0, 1 -> 58, 2 -> 32))

val hw_urban1 = """++++++++[>++++[>++>+++>+++>+<<<<-]>+>+>->>+[<]<-]>>.>---.
                   +++++++..+++.>>.<-.<.+++.------.--------.>>+.>++."""

assert(run(hw_urban1) == Map(0 -> 0, 5 -> 33, 1 -> 0, 6 -> 10, 2 -> 72, 3 -> 100, 4 -> 87))