ERROR: -------------------------------------------
ERROR: in testcase ./testsuite/runtest.libs/libs.exp
ERROR: send: spawn id exp6 not open
ERROR: tcl error code NONE
ERROR: tcl error info:
send: spawn id exp6 not open
while executing
"exp_send "interp delete test_case""
invoked from within
"if [file exists $test] {
verbose "Processing test $test" 2
exp_send "interp create test_case\n"
expect "interp create test_case*test_case*expect*>..."
(procedure "process_test" line 9)
invoked from within
"process_test $i "
("foreach" body line 2)
invoked from within
"foreach i [lsort -dictionary [glob [testsuite file -source -test
*.test]]] {
if { [runtest_file_p $runtests $i] } { process_test $i }
}"
(file "./testsuite/runtest.libs/libs.exp" line 100)
invoked from within
"source ./testsuite/runtest.libs/libs.exp"
("uplevel" body line 1)
invoked from within
"uplevel #0 source ./testsuite/runtest.libs/libs.exp"
invoked from within
"catch "uplevel #0 source $test_file_name" msg"
--------------------------------------------------
I know almost nothing about tcl/expect so I have no idea why did this
happen.
--
Xi Ruoyao <[email protected]>
School of Aerospace Science and Technology, Xidian University
_______________________________________________
Bug-dejagnu mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/bug-dejagnu
