diff options
author | Paul Phillips <paulp@improving.org> | 2009-07-17 15:04:53 +0000 |
---|---|---|
committer | Paul Phillips <paulp@improving.org> | 2009-07-17 15:04:53 +0000 |
commit | 3355ead4eb75d2bc1f02300b82d154c76191a48a (patch) | |
tree | 8a121fc4b7199eaadb14519a85517a46c3a8d61a /test/files | |
parent | 9dd3236b92dbd03a89e75a7b2acf0e47345d812d (diff) | |
download | scala-3355ead4eb75d2bc1f02300b82d154c76191a48a.tar.gz scala-3355ead4eb75d2bc1f02300b82d154c76191a48a.tar.bz2 scala-3355ead4eb75d2bc1f02300b82d154c76191a48a.zip |
A start on a more comprehensive test suite for ...
A start on a more comprehensive test suite for sequences. It performs
3600 different tests attempting to exercise the potentially buggy
variations of startsWith, endsWith, indexOfSeq, and sameElements.
And, a KMP implementation of indexOfSeq which in addition to being a
lot faster for definite sized sequences, should give the wrong answer
somewhat less frequently.
Diffstat (limited to 'test/files')
-rw-r--r-- | test/files/run/sequenceComparisons.check | 1 | ||||
-rw-r--r-- | test/files/run/sequenceComparisons.scala | 123 |
2 files changed, 124 insertions, 0 deletions
diff --git a/test/files/run/sequenceComparisons.check b/test/files/run/sequenceComparisons.check new file mode 100644 index 0000000000..bb7669b154 --- /dev/null +++ b/test/files/run/sequenceComparisons.check @@ -0,0 +1 @@ +All 3600 tests passed. diff --git a/test/files/run/sequenceComparisons.scala b/test/files/run/sequenceComparisons.scala new file mode 100644 index 0000000000..ee4df8e40e --- /dev/null +++ b/test/files/run/sequenceComparisons.scala @@ -0,0 +1,123 @@ +import scala.collection.{ mutable, immutable } +import collection.{ Sequence, Traversable } + +object Test { + // TODO: + // + // SequenceProxy + // SequenceForwarder + // the commented out ones in seqMakers + + val seqMakers = List[List[Int] => Sequence[Int]]( + mutable.ArrayBuffer(_: _*), + // mutable.ArrayStack(_: _*), + mutable.Buffer(_: _*), + mutable.LinearSequence(_: _*), + // null on Nil + // mutable.LinkedList(_: _*), + mutable.ListBuffer(_: _*), + // immutable.Queue(_: _*), + // mutable.Queue(_: _*), + immutable.Sequence(_: _*), + mutable.Sequence(_: _*), + // immutable.Stack(_: _*), + // mutable.Stack(_: _*), + immutable.Vector(_: _*), + mutable.Vector(_: _*), + immutable.List(_: _*), + immutable.Stream(_: _*) + ) + + abstract class Data[T] { + val seq: Sequence[T] + // _1 is inputs which must be true, _2 which must be false + type Inputs = (List[List[T]], List[List[T]]) + case class Method( + f: (Sequence[T], Sequence[T]) => Boolean, + inputs: Inputs, + descr: String + ) { + def trueList = inputs._1 + def falseList = inputs._2 + } + + val startsWithInputs: Inputs + lazy val startsWith = Method(_ startsWith _, startsWithInputs, "%s startsWith %s") + + val endsWithInputs: Inputs + lazy val endsWith = Method(_ endsWith _, endsWithInputs, "%s endsWith %s") + + val indexOfSeqInputs: Inputs + private def subseqTest(s1: Sequence[T], s2: Sequence[T]) = (s1 indexOfSeq s2) != -1 + lazy val indexOfSeq = Method(subseqTest _, indexOfSeqInputs, "(%s indexOfSeq %s) != -1") + + val sameElementsInputs: Inputs + lazy val sameElements = Method(_ sameElements _, sameElementsInputs, "%s sameElements %s") + + def methodList = List(startsWith, endsWith, indexOfSeq, sameElements) + } + + object test1 extends Data[Int] { + val seq = List(1,2,3,4,5) + + val startsWithInputs = ( + List(Nil, List(1), List(1,2), seq), + List(List(1,2,3,4,6), seq ::: List(5), List(0)) + ) + + val endsWithInputs = ( + List(Nil, List(5), List(4,5), seq), + List(0 :: seq, List(5,2,3,4,5), List(3,4), List(5,6)) + ) + + val indexOfSeqInputs = ( + List(Nil, List(1), List(3), List(5), List(1,2), List(2,3,4), List(4,5), seq), + List(List(1,2,3,5), List(6), List(5,4,3,2,1), List(2,1)) + ) + + val sameElementsInputs = ( + List(List(1,2,3,4,5)), + List(Nil, List(1), List(1,2), List(2,3,4), List(2,3,4,5), List(2,3,4,5,1), List(1,2,3,5,4), seq reverse) + ) + } + + val failures = new mutable.ListBuffer[String] + var testCount = 0 + + def assertOne(op1: Any, op2: Any, res: Boolean, str: String) { + testCount += 1 + val resStr = str.format(op1, op2) + // println(resStr) + if (!res) + failures += ("FAIL: " + resStr) + // assert(res, resStr) + } + + def runSeqs() = { + for (s1f <- seqMakers ; s2f <- seqMakers ; testData <- List(test1)) { + import testData._ + val scrut = s1f(seq) + + // for (s <- starters ; val rhs = s2f(s)) + // assertOne(scrut, rhs, scrut startsWith rhs, "%s startsWith %s") + // + // for (ns <- nonStarters ; val rhs = s2f(ns)) + // assertOne(scrut, rhs, !(scrut startsWith rhs), "!(%s startsWith %s)") + + for (Method(f, (trueList, falseList), descr) <- methodList) { + for (s <- trueList; val rhs = s2f(s)) + assertOne(scrut, rhs, f(scrut, rhs), descr) + + for (s <- falseList; val rhs = s2f(s)) + assertOne(scrut, rhs, !f(scrut, rhs), "!(" + descr + ")") + } + } + } + + def main(args: Array[String]): Unit = { + runSeqs() + + if (failures.isEmpty) println("All %d tests passed.".format(testCount)) + else failures foreach println + } +}
\ No newline at end of file |