Skip to content
Snippets Groups Projects
Commit 6d3ba92b authored by Morris Jette's avatar Morris Jette
Browse files

Test fix for use with POE

parent beb0ab7d
No related branches found
No related tags found
No related merge requests found
...@@ -100,6 +100,18 @@ proc srun_test {exp_cnt account} { ...@@ -100,6 +100,18 @@ proc srun_test {exp_cnt account} {
set job_id $expect_out(1,string) set job_id $expect_out(1,string)
exp_continue exp_continue
} }
-re "($number)-($number):($number)" {
# NOTE: POE format
incr count [expr $expect_out(2,string) - $expect_out(1,string) + 1]
set job_id $expect_out(3,string)
exp_continue
}
-re "$number:($number)" {
# NOTE: POE format
incr count
set job_id $expect_out(1,string)
exp_continue
}
timeout { timeout {
send_user "\nFAILURE srun is not responding\n" send_user "\nFAILURE srun is not responding\n"
set exit_code 1 set exit_code 1
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment