Gitly


1 #!/usr/bin/env expect
2 source "common.tcl"
3 
4 expect "Break on * comptime_variant in ${test_file}:6"
5 expect "${test_file}:6 vdbg> "
6 send "p arg\n"
7 expect "arg = 0 (int)"
8 send "c\n"
9 expect "${test_file}:6 vdbg> "
10 send "p arg\n"
11 expect "arg = foo (string)"
12 send "q\n"
13 expect eof
14

1	#!/usr/bin/env expect
2	source "common.tcl"
3
4	expect "Break on * comptime_variant in ${test_file}:6"
5	expect "${test_file}:6 vdbg> "
6	send "p arg\n"
7	expect "arg = 0 (int)"
8	send "c\n"
9	expect "${test_file}:6 vdbg> "
10	send "p arg\n"
11	expect "arg = foo (string)"
12	send "q\n"
13	expect eof
14