diff options
Diffstat (limited to 'test/imode/completion.exp')
-rw-r--r-- | test/imode/completion.exp | 54 |
1 files changed, 0 insertions, 54 deletions
diff --git a/test/imode/completion.exp b/test/imode/completion.exp deleted file mode 100644 index d9ea477..0000000 --- a/test/imode/completion.exp +++ /dev/null @@ -1,54 +0,0 @@ -#!/usr/bin/expect -f - -set timeout 1 - -expect_after { - timeout { exit -1 } -} - -set LMI lmi -if {[info exists env(LMI)]} { - set LMI $env(LMI) -} - -spawn {*}$LMI -expect "lmi> " -send " " -expect "EOF exit help test" -send "E " -expect "EOF" -send "" -expect "lmi> " -send "e " -expect "xit" -send " " -expect "exit" -expect "lmi> exit" -send "\r" -expect "" -catch wait result -if {[lindex $result 3] != 0} { - exit [expr 10 + [lindex $result 3]] -} else { - puts "\n" -} - -spawn {*}$LMI -expect "lmi> " -send ":cd test\r" -expect ">test> " -send " " -expect "EOF exit help list log show" -send "l " -expect "list log" -expect ">test> l" -send "i " -expect "st" -send "" -expect ">test> " -send "ex " -expect "it" -send " 20\r" -expect "" -catch wait result -exit [lindex $result 3] |