File: var_scope.stp

package info (click to toggle)
systemtap 5.1-5
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 47,964 kB
  • sloc: cpp: 80,838; ansic: 54,757; xml: 49,725; exp: 43,665; sh: 11,527; python: 5,003; perl: 2,252; tcl: 1,312; makefile: 1,006; javascript: 149; lisp: 105; awk: 101; asm: 91; java: 70; sed: 16
file content (42 lines) | stat: -rw-r--r-- 740 bytes parent folder | download | duplicates (7)
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
/*
 * var_scope.stp
 *
 * Check variables scope
 */
global var_global=2015;

probe begin {
    println("systemtap starting probe")
    var_probe=2015
}

function changevar()
{
    var_local=2014
}

probe end
{
    println("systemtap ending probe")

    ret=0
    if (var_global != 2015) {
        ret=1
        printf("systemtap test failure - var_global:%d != 2015\n", var_global)
    }

    var_local=2015
    changevar()
    if (var_local != 2015) {
        ret=1
        printf("systemtap test failure - var_local:%d != 2015\n", var_local)
    }

    if (var_probe == 2015) {
        ret=1
        printf("systemtap test failure - var_probe:%d == 2015\n", var_probe)
    }

    if (ret == 0)
        println("systemtap test success")
}