Gitly


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

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