| set test_name "testcommands" |
| if {![info exists env(QUAGGA_TEST_COMMANDS)]} { |
| # sadly, the test randomly fails when configure parameters differ from |
| # what was used to create testcommands.refout. this can be fixed by |
| # shipping a matching vtysh_cmd.c, which we'll add after 0.99.23 |
| spawn sh -c "./testcommands -e 0 < $env(srcdir)/testcommands.in | diff -au - $env(srcdir)/testcommands.refout" |
| fail "$test_name: timeout" |
| set os_error [lindex $result 2] |
| set exit_status [lindex $result 3] |
| if { $os_error == 0 && $exit_status == 0 } { |