blob: 6e3702b677097d3631b1940a38bf4b226c47dcbf (
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
|
proc setup {} {
save_env
}
proc teardown {} {
assert_env_unmodified {/OLDPWD=/d}
}
setup
# b: assuming we have at least bash that starts with b in $PATH
assert_complete_any "valgrind b"
sync_after_int
assert_complete_any "valgrind -"
sync_after_int
set test "--tool=memche<TAB> should complete \"memcheck\""
assert_complete "--tool=memcheck" "valgrind --tool=memche" $test
sync_after_int
set test "--tool=helgrind --history-l<TAB> should complete \"--history-level=\""
assert_complete "--history-level=" "valgrind --tool=helgrind --history-l" $test -nospace
sync_after_int
set test "it should be possible to complete file paths"
set dir $::srcdir/fixtures/shared
set files [split [exec bash -c "cd $dir/bin && ls -p"] "\n"]
assert_complete_dir $files "valgrind --log-file=v\\ 0.log ./bin/" $dir $test
sync_after_int
teardown
|