| author | Christian Urban <christian.urban@kcl.ac.uk> |
| Sun, 15 Jan 2023 10:58:13 +0000 | |
| changeset 459 | 7acbef680bef |
| parent 404 | 5ff7ffa929cc |
| child 472 | fbff6f601370 |
| permissions | -rw-r--r-- |
| 404 | 1 |
import M5a._ |
| 235 | 2 |
|
| 236 | 3 |
assert(run("[-]", Map(0 -> 100)) == Map(0 -> 0))
|
4 |
assert(run("[->+<]", Map(0 -> 10)) == Map(0 -> 0, 1 -> 10))
|
|
5 |
assert(run("[>>+>>+<<<<-]", Map(0 -> 42)) == Map(0 -> 0, 2 -> 42, 4 -> 42))
|
|
| 404 | 6 |
|
| 340 | 7 |
|
8 |
||
| 235 | 9 |
|
| 340 | 10 |
val hw_urban = """+++++[->++++++++++<]>--<+++[->>++++++++++ |
11 |
<<]>>++<<----------[+>.>.<+<]""" |
|
12 |
assert(run(hw_urban) == Map(0 -> 0, 1 -> 58, 2 -> 32)) |
|
13 |