Skip to content
Snippets Groups Projects
Commit 97b5d2aa authored by Moe Jette's avatar Moe Jette
Browse files

Fix for test that didn't work for bluegene systems on v2.2

parent 97573c66
No related branches found
No related tags found
No related merge requests found
...@@ -38,6 +38,7 @@ set exit_code 0 ...@@ -38,6 +38,7 @@ set exit_code 0
set matches 0 set matches 0
set non_bg 0 set non_bg 0
set too_small 0 set too_small 0
set stuff ""
print_header $test_id print_header $test_id
...@@ -60,42 +61,46 @@ expect { ...@@ -60,42 +61,46 @@ expect {
set non_bg 1 set non_bg 1
exp_continue exp_continue
} }
-re "ID" {
incr matches
exp_continue
}
-re "PARTITION" { -re "PARTITION" {
set stuff [concat $stuff "1"]
incr matches incr matches
exp_continue exp_continue
} }
-re "BG_BLOCK" { -re "BG_BLOCK" {
set stuff [concat $stuff "2"]
incr matches incr matches
exp_continue exp_continue
} }
-re "STATE" { -re "STATE" {
set stuff [concat $stuff "3"]
incr matches incr matches
exp_continue exp_continue
} }
-re "USER" { -re "USER" {
set stuff [concat $stuff "4"]
incr matches incr matches
exp_continue exp_continue
} }
-re "CONN" { -re "CONN" {
set stuff [concat $stuff "5"]
incr matches incr matches
exp_continue exp_continue
} }
-re "NODES" { -re "NODES" {
set stuff [concat $stuff "6"]
incr matches incr matches
exp_continue exp_continue
} }
-re "NODELIST" { -re "NODELIST" {
set stuff [concat $stuff "7a"]
incr matches incr matches
send "q" send "q\n"
exp_continue exp_continue
} }
-re "BP_LIST" { -re "BP_LIST" {
set stuff [concat $stuff "7b"]
incr matches incr matches
send "q" send "q\n"
exp_continue exp_continue
} }
-re "error" { -re "error" {
...@@ -124,8 +129,9 @@ if {$non_bg != 0} { ...@@ -124,8 +129,9 @@ if {$non_bg != 0} {
send_user "\nWARNING: Must be on a BG SYSTEM to run this command\n" send_user "\nWARNING: Must be on a BG SYSTEM to run this command\n"
exit 0 exit 0
} }
if {$matches != 8} { if {$matches != 7} {
send_user "\nFAILURE: smap bg partition display in curses mode\n" send_user "\nFAILURE: smap bg partition display in curses mode\n"
send_user "\n(matches $matches of 7, $stuff)\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