test/benchmarks/src/scala/collection/parallel/benchmarks/parallel_array/ForallHeavy.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
57
58
59

package scala.collection.parallel.benchmarks.parallel_array


object ForallHeavy extends Companion {
  def benchName = "forall-heavy";
  def apply(sz: Int, parallelism: Int, what: String) = new ForallHeavy(sz, parallelism, what)
  override def comparisons = List("jsr")
  override def defaultSize = 16
  
  val pred = (a: Cont) => heavyCheck(a)
  val predjsr = new extra166y.Ops.Predicate[Cont] {
    def op(a: Cont) = heavyCheck(a)
  }
  
  def heavyCheck(a: Cont) = {
    val init = a.in + 1
    var cnt = init
    var i = 0
    while (i < 10000) {
      cnt = -2 * cnt
      cnt /= 2
      i += 1
    }
    cnt += init * 5 + 10
    cnt >= 0
  }
}

class ForallHeavy(sz: Int, p: Int, what: String)
extends Resettable(sz, p, what, new Cont(_), new Array[Any](_), classOf[Cont]) {
  def companion = ForallHeavy
  
  def runpar = pa.forall(ForallHeavy.pred)
  def runseq = sequentialForall(ForallHeavy.pred, sz)
  def runjsr = jsrarr.withFilter(ForallHeavy.predjsr).size == sz
  def comparisonMap = collection.Map("jsr" -> runjsr _)
}