summaryrefslogtreecommitdiffstats
path: root/testsuite/systemtap.maps/foreach_fail.exp
blob: 75fcfcc4d20550305a5eae3ff9aee54cf5d1397d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
# Simple function to test maps of ints containing ints

# modifying maps while in a foreach should produce a compilation error.

set test foreach_fail
if {![installtest_p]} { untested $test; return }

spawn stap  $srcdir/$subdir/$test.stp
expect {
  -timeout 60
  timeout { 
    fail "$test timed out" }
  eof { 
    fail "$test unexpected EOF" }
  -re "semantic error:" { pass "$test correctly failed to compile" }
}
close
wait