| author | Christian Urban <christian.urban@kcl.ac.uk> |
| Tue, 08 Nov 2022 00:27:47 +0000 | |
| changeset 430 | 4029552de5fc |
| parent 403 | main_testing3/re_test4.scala@312c9eb39ad8 |
| child 472 | fbff6f601370 |
| permissions | -rw-r--r-- |
import M3._ assert(SEQs_smart(Nil) == ONE) assert(SEQs_smart(List(ZERO)) == ZERO) assert(SEQs_smart(List(CHAR('a'))) == CHAR('a')) assert(SEQs_smart(List(ONE ~ ONE)) == ONE ~ ONE) assert(SEQs_smart(List(ONE, ONE)) == SEQs(List(ONE, ONE))) assert(ALTs_smart(Nil) == ZERO) assert(ALTs_smart(List(ONE ~ ONE)) == ONE ~ ONE) assert(ALTs_smart(List(ZERO, ZERO)) == ALTs(List(ZERO, ZERO)))