ctlseqs/tests/ctlseqs/timeout.exp

23 lines
481 B
Plaintext

#
# Copyright (C) 2021 CismonX <admin@cismon.net>
#
# Copying and distribution of this file, with or without modification, are
# permitted in any medium without royalty, provided the copyright notice and
# this notice are preserved. This file is offered as-is, without any warranty.
#
set tool ctlseqs
set timeout 2
tcsgrep_start timeout=500
expect {
-ex "TIMEOUT\n" {
pass "pass"
}
default {
puts $expect_out(buffer)
fail "fail"
}
}