blob: 0d61e5aeb5db634f2d6ec262574f8c76a4be02d0 (
plain) (
blame)
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 _)
}
|