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 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110
|
# Test of foreach statements using "limit EXP".
set test "foreach_limit"
set ::result_string {
Arrays:
unsorted:
key 9, value 18
key 1, value 40
key 8, value 16
key 2, value 4
key 7, value 14
key 3, value 36
key 6, value 12
key 5, value 10
key 4, value 8
key 10, value 20
unsorted limit 5:
key 9, value 18
key 1, value 40
key 8, value 16
key 2, value 4
key 7, value 14
loop had 5 iterations
sorted (by values) limit 5:
key 2, value 4
key 4, value 8
key 5, value 10
key 6, value 12
key 7, value 14
loop had 5 iterations
sorted (by keys) limit 5:
key 1, value 40
key 2, value 4
key 3, value 36
key 4, value 8
key 5, value 10
loop had 5 iterations
sorted (by values) limit x (3):
key 2, value 4
key 4, value 8
key 5, value 10
loop had 3 iterations
sorted (by values) limit x * 2 (6):
key 2, value 4
key 4, value 8
key 5, value 10
key 6, value 12
key 7, value 14
key 8, value 16
loop had 6 iterations
sorted (by values) limit ++x:
key 2, value 4
key 4, value 8
key 5, value 10
key 6, value 12
loop had 4 iterations
x ended up as 4
sorted (by values) limit x++:
key 2, value 4
key 4, value 8
key 5, value 10
key 6, value 12
loop had 4 iterations
x ended up as 5
sorted (by values) with key specified limit x++:
key 6, value 12
loop had 1 iterations
x ended up as 6
Aggregates:
count=150 sum=21360
min=4 max=600
value |-------------------------------------------------- count
1 | 0
2 | 0
4 |@ 1
8 |@@@@@@ 6
16 |@@@@@@@@@@@@@ 13
32 |@@@@@@@@@@@@@@@@@@@@@@@@@@@@ 28
64 |@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ 39
128 |@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ 42
256 |@@@@@@@@@@@@@@@@@ 17
512 |@@@@ 4
1024 | 0
2048 | 0
bucket 67: 1
bucket 68: 6
bucket 69: 13
bucket 70: 28
loop had 71 iterations
Done.}
foreach runtime [get_runtime_list] {
if {$runtime != ""} {
stap_run2 $srcdir/$subdir/$test.stp --runtime=$runtime
} else {
stap_run2 $srcdir/$subdir/$test.stp
}
}
|