main_marking5/bf_test4.scala
author Christian Urban <christian.urban@kcl.ac.uk>
Thu, 10 Nov 2022 20:10:20 +0000
changeset 443 80c691a4caab
parent 424 daf561a83ba6
child 463 0315d9983cd0
permissions -rw-r--r--
updated

import M5a._

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))


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))