main_testing3/re_test9.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
def urbanmain() = {
300
be9900ba65ff updated testing files
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset
     3
472
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
     4
  import M3._
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
     5
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
     6
  val EVIL_urban = SEQ(STAR(STAR(CHAR('a'))), CHAR('b'))
300
be9900ba65ff updated testing files
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset
     7
be9900ba65ff updated testing files
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset
     8
472
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
     9
  assert(simp(Iterator.iterate(ONE:Rexp)(r => SEQ(r, ONE | ONE)).drop(50).next) == ONE)
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
    10
  assert(simp(Iterator.iterate(ONE:Rexp)(r => ALT(r, r)).drop(20).next) == ONE)
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
    11
  assert(matcher(EVIL_urban, "a" * 1000000) == false)
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
    12
  assert(matcher(EVIL_urban, "a" * 1000000 ++ "b") == true)
fbff6f601370 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 430
diff changeset
    13
}