blob: 548a888ea79e95f535af3b76386f06a1b4b09d8b (
plain)
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
|
# Simple function to test maps of strings containing strings
set test "ss"
set ::result_string {foo[0] = The Result is 0
foo[1] = The Result is 1
foo[2] = The Result is 4
foo[3] = The Result is 9
foo[4] = The Result is 16
foo[5] = The Result is 25
foo[6] = The Result is 36
foo[7] = The Result is 49
foo[8] = The Result is 64
foo[9] = The Result is 81
foo[10] = The Result is 100
foo[0] = The Result is 0
foo[1] = The Result is 1
foo[2] = The Result is 4
foo[3] = The Result is 9
foo[4] = The Result is 16
foo[6] = The Result is 36
foo[7] = The Result is 49
foo[8] = The Result is 64
foo[9] = The Result is 81
foo[10] = The Result is 100
foo[1] = The Result is 1
foo[2] = The Result is 4
foo[3] = The Result is 9
foo[4] = The Result is 16
foo[6] = The Result is 36
foo[7] = The Result is 49
foo[8] = The Result is 64
foo[9] = The Result is 81
foo[1] = The Result is 1
foo[2] = The Result is 4
foo[3] = The Result is 4<------
foo[4] = The Result is 16(CHANGED)
foo[6] = The Result is 36
foo[7] = The Result is 49
foo[8] = The Result is 64
foo[9] = New result is -81
foo[1] = The Result is 1
foo[2] = The Result is 4
foo[3] = The Result is 4<------
foo[6] = The Result is 36
foo[7] = The Result is 49
foo[8] = The Result is 64
foo[9] = New result is -81
foo[0] = # 0
foo[1] = # 1
foo[2] = # 4
foo[3] = # 9
foo[4] = # 16
foo[5] = # 25
foo[6] = # 36
foo[7] = # 49
foo[8] = # 64
foo[9] = # 81
foo[10] = # 100
}
stap_run2 $srcdir/$subdir/$test.stp
|
