# 
# 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"
    }
}