main_marking5/bf_test4.scala
author Christian Urban <christian.urban@kcl.ac.uk>
Tue, 08 Nov 2022 18:35:41 +0000
changeset 434 8c5804b2f9d2
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))