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

Avoid leaving reservation on test failure

parent 4d691ccb
No related branches found
No related tags found
No related merge requests found
...@@ -173,8 +173,9 @@ proc inc3_11_9 {} { ...@@ -173,8 +173,9 @@ proc inc3_11_9 {} {
if {$core_res_num < 2} { if {$core_res_num < 2} {
send_user "\n\033\[32mWARNING: not enough cores for testing (Within: inc3.11.9)\033\[m\n" send_user "\n\033\[32mWARNING: not enough cores for remaining tests (Within: inc3.11.9)\033\[m\n"
set ret_code [delete_res $res_name] set ret_code [delete_res $res_name]
return
} }
set res_name1 "$res_name" set res_name1 "$res_name"
...@@ -184,6 +185,7 @@ proc inc3_11_9 {} { ...@@ -184,6 +185,7 @@ proc inc3_11_9 {} {
set ret_code [create_res "StartTime=now Duration=60 Nodes=$def_node_name\[$min_node_inx\-$max_node_inx\] CoreCnt=1,1,1,1,$total_core_res User=$user_name" 1] set ret_code [create_res "StartTime=now Duration=60 Nodes=$def_node_name\[$min_node_inx\-$max_node_inx\] CoreCnt=1,1,1,1,$total_core_res User=$user_name" 1]
if {$ret_code == 0} { if {$ret_code == 0} {
send_user "\n\033\[31mFAILURE: reservation was created when it should not (Within: inc3.11.9)\033\[m\n" send_user "\n\033\[31mFAILURE: reservation was created when it should not (Within: inc3.11.9)\033\[m\n"
delete_res $res_name
set ret_code [delete_res $res_name1] set ret_code [delete_res $res_name1]
exit $ret_code exit $ret_code
} }
......
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