forked from psug/dojos
-
Notifications
You must be signed in to change notification settings - Fork 0
/
TestP009.scala
56 lines (45 loc) · 1.74 KB
/
TestP009.scala
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
package psug.dojos
import org.specs2.mutable._
import org.specs2.runner._
import org.junit.runner.RunWith
import psug.dojos.P009._
import psug.dojos.Utils._
import org.specs2.ScalaCheck
import org.scalacheck.Prop
import org.specs2.execute.Result
@RunWith(classOf[JUnitRunner])
class TestP009 extends Specification with ScalaCheck {
val solutions = List[(String, List[Symbol] => List[List[Symbol]])](
( "BenjaminLerman (1)" , BenjaminLerman.pack[Symbol])
, ("SteveGury", SteveGury.pack)
, ("AlexisAgahi" , AlexisAgahi.pack[Symbol])
, ( "Francois" , Francois.pack[Symbol])
, ( "BenjaminLerman (2)" , BenjaminLerman.pack2[Symbol])
, ( "StefanChris" , StefanChris.pack[Symbol] )
, ( "JérômeMainaud", JérômeMainaud.pack[Symbol] )
, ( "AriéBenichou", AriéBenichou.pack[Symbol] )
)
def miniBench() : Unit = {
val r = new util.Random
val input = (1 to 100000).map{ _ => Symbol( r.nextInt(10).toString ) }.toList
for (s <- solutions) {
println(time(s._1, s._2(input)))
}
}
"All possible solutions" should {
"at least pass the problem example" in {
val expected = List(List('a, 'a, 'a, 'a), List('b), List('c, 'c), List('a, 'a), List('d), List('e, 'e, 'e, 'e))
( (x:(String,List[List[Symbol]])) => (x._1,x._2) === (x._1,expected) ).foreach(
solutions.map {case(name, f) => (name,f(List('a, 'a, 'a, 'a, 'b, 'c, 'c, 'a, 'a, 'd, 'e, 'e, 'e, 'e))) }
)
}
}
// don't seem to work... I don't know how to compose examples.
// solutions.foreach { case (name, pack) =>
// this.addExample {
// name + " pass DavidBernard.propFlattenPackIsIdentity" in {
// check(DavidBernard.propFlattenPackIsIdentity( pack ) )
// }
// }
// }
}