Gitly


1 #!/usr/bin/env expect
2 source "common.tcl"
3 
4 expect "Break on * smartcast in ${test_file}:3"
5 expect "${test_file}:3 vdbg> "
6 send "p a\n"
7 expect "a = 1 (int)"
8 send "q\n"
9 expect eof
10

1	#!/usr/bin/env expect
2	source "common.tcl"
3
4	expect "Break on * smartcast in ${test_file}:3"
5	expect "${test_file}:3 vdbg> "
6	send "p a\n"
7	expect "a = 1 (int)"
8	send "q\n"
9	expect eof
10