test/config/default.exp


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

# Set default expect fallback routines
expect_after {
    eof {
        if {[info exists test]} {
            fail "$test at eof"
        } elseif {[info level] > 0} {
            fail "[info level 1] at eof"
        } else {
            fail "eof"
        }
    }
    timeout {
        if {[info exists test]} {
            fail "$test at timeout"
        } elseif {[info level] > 0} {
            fail "[info level 1] at timeout"
        } else {
            fail "timeout"
        }
    }
}