# Need a partition
set diskstats [ exec cat /proc/diskstats ]
-regexp "\\s+\\d+\\s+\\d+\\s+\(\[a-z\]+\\d+\)\\s+\(\[0-9\]\[0-9\]+\)" $diskstats -> partition
-set test "vmstat partition (using $partition)"
-spawn $vmstat -p $partition
-expect_pass "$test" "^${partition}\\s+reads"
-#\\s+read sectors\\s+writes\\s+requested writes"
-#\(\\s+\\d+\){4}\\s*$"
+if [ regexp "\\s+\\d+\\s+\\d+\\s+\(\[a-z\]+\\d+\)\\s+\[0-9\]\[0-9\]+" $diskstats line partition == 1 ] {
+ set test "vmstat partition (using $partition)"
+ spawn $vmstat -p $partition
+ expect_pass "$test" "^${partition}\\s+reads"
+} else {
+ unsupported "vmstat partition (cannot find partition)"
+}