main_testing3/re_test1.scala
author Christian Urban <christian.urban@kcl.ac.uk>
Mon, 25 Dec 2023 01:10:55 +0100
changeset 479 78cb5cdda3c3
parent 472 fbff6f601370
permissions -rw-r--r--
updated jars
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
472
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
     1
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
     2
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
     3
def urbanmain() = {
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
     4
  import M3._
221
d061f3a94fa7 updated
Christian Urban <urbanc@in.tum.de>
parents: 215
diff changeset
     5
472
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
     6
  assert(nullable(ZERO) == false)
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
     7
  assert(nullable(ONE) == true)
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
     8
  assert(nullable(CHAR('a')) == false)
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
     9
  assert(nullable(ZERO | ONE) == true)
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
    10
  assert(nullable(ZERO | CHAR('a')) == false)
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
    11
  assert(nullable(ONE ~  ONE) == true)
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
    12
  assert(nullable(ONE ~ CHAR('a')) == false)
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
    13
  assert(nullable(STAR(ZERO)) == true)
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
    14
  assert(nullable(ALTs(List(ONE, CHAR('a'), ZERO))) == true)
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
    15
  assert(nullable(SEQs(List(ONE, ALTs(List(ONE, CHAR('a'), ZERO)), STAR(ZERO)))) == true)
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
    16
}