# HG changeset patch # User Christian Urban # Date 1547641487 0 # Node ID 2801734b934a12231419693e9acd4f06aeb95f27 # Parent 4da8550b2d0bf860ecf353d1e222992b708f6ad1 updated diff -r 4da8550b2d0b -r 2801734b934a marking5/bf1a_test.scala --- a/marking5/bf1a_test.scala Wed Jan 16 12:20:34 2019 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ - -assert(sread(Map(), 2) == 0) -assert(sread(Map(2 -> 1), 2) == 1) -assert(write(Map(), 1, 2) == Map(1 -> 2)) -assert(write(Map(1 -> 0), 1, 2) == Map(1 -> 2)) diff -r 4da8550b2d0b -r 2801734b934a marking5/bf1c_test.scala --- a/marking5/bf1c_test.scala Wed Jan 16 12:20:34 2019 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,17 +0,0 @@ - -import CW8b._ - -assert(start("[-]", Map(0 -> 100)) == Map(0 -> 0)) -assert(start("[->+<]", Map(0 -> 10)) == Map(0 -> 0, 1 -> 10)) -assert(start("[>>+>>+<<<<-]", Map(0 -> 42)) == Map(0 -> 0, 2 -> 42, 4 -> 42)) - -val hello = """++++++++[>++++[>++>+++>+++>+<<<<-]>+>+>->>+[<]<-]>>.>---. - +++++++..+++.>>.<-.<.+++.------.--------.>>+.>++.""" -assert(start(hello, Map()) == Map(0 -> 0, 5 -> 33, 1 -> 0, 6 -> 10, 2 -> 72, 3 -> 100, 4 -> 87)) - -assert(start("+++++[->++++++++++<]>--<+++[->>++++++++++<<]>>++<<----------[+>.>.<+<]", Map()) == Map(0 -> 0, 1 -> 58, 2 -> 32)) - -val hello2 = """++++++++[>++++[>++>+++>+++>+<<<<-]>+>+>->>+[<]<-]>>.>---.+++++++..+++.>>.<-.<.+++.------.--------.>>+.>++.!!!!!!!!!""" - -assert(start(hello2, Map()) == Map(0 -> 0, 5 -> 33, 1 -> 0, 6 -> 10, 2 -> 72, 3 -> 100, 4 -> 87)) -