main_testing3/re_test4.scala
author Christian Urban <christian.urban@kcl.ac.uk>
Thu, 10 Nov 2022 09:52:40 +0000
changeset 438 a02e9efd7bc9
parent 430 4029552de5fc
child 472 fbff6f601370
permissions -rw-r--r--
updated
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
403
312c9eb39ad8 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 347
diff changeset
     1
import M3._
153
316f9c6cc2ff updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset
     2
430
4029552de5fc updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 403
diff changeset
     3
assert(denest(List(ONE, ZERO, ALTs(List(ONE, CHAR('a'))))) 
4029552de5fc updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 403
diff changeset
     4
   == List(ONE, ONE, CHAR('a')))
4029552de5fc updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 403
diff changeset
     5
assert(denest(List(ONE ~ ONE, ZERO, ZERO | ONE)) == List(ONE ~ ONE, ZERO, ONE))