mirror of https://github.com/sbt/sbt.git
14 lines
526 B
Scala
14 lines
526 B
Scala
package xsbt.boot
|
|
|
|
import org.scalacheck._
|
|
import Prop._
|
|
|
|
object CacheTest extends Properties("Cache") {
|
|
implicit val functions: Arbitrary[Int => Int] = Arbitrary { Gen.oneOf(Seq(identity[Int], i => -i, i => i / 2, i => i + 1)) }
|
|
|
|
property("Cache") = Prop.forAll { (key: Int, keys: List[Int], map: Int => Int) =>
|
|
val cache = new Cache((i: Int, _: Unit) => map(i))
|
|
def toProperty(key: Int) = ("Key " + key) |: ("Value: " + map(key)) |: (cache.apply(key, ()) == map(key))
|
|
Prop.all(keys.map(toProperty): _*)
|
|
}
|
|
} |